Diff for /np2/i286c/i286c_mn.c between versions 1.15 and 1.38

version 1.15, 2003/11/29 03:38:26 version 1.38, 2005/02/27 15:07:36
Line 1 Line 1
 #include        "compiler.h"  #include        "compiler.h"
 #include        "i286.h"  #include        "cpucore.h"
 #include        "i286c.h"  #include        "i286c.h"
 #include        "memory.h"  
 #include        "pccore.h"  #include        "pccore.h"
 #include        "iocore.h"  #include        "iocore.h"
 #include        "bios.h"  #include        "bios.h"
Line 10 Line 9
   
 #define MAX_PREFIX              8  #define MAX_PREFIX              8
   
   
 #define NEXT_OPCODE                                                                                             \  #define NEXT_OPCODE                                                                                             \
                 if (I286_REMCLOCK < 1) {                                                                \                  if (I286_REMCLOCK < 1) {                                                                \
                         I286_BASECLOCK += (1 - I286_REMCLOCK);                          \                          I286_BASECLOCK += (1 - I286_REMCLOCK);                          \
Line 27 Line 27
   
 I286FN _reserved(void) {  I286FN _reserved(void) {
   
         I286_WORKCLOCK(23);                                                     // ToDo  
         INT_NUM(6, I286_IP - 1);          INT_NUM(6, I286_IP - 1);
 }  }
   
 I286FN _add_ea_r8(void) {                                               // 00: add EA, REG8  I286FN _add_ea_r8(void) {                                               // 00: add EA, REG8
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 58  I286FN _add_ea_r8(void) {      // 00: ad Line 57  I286FN _add_ea_r8(void) {      // 00: ad
         }          }
         dst = *out;          dst = *out;
         ADDBYTE(res, dst, src);          ADDBYTE(res, dst, src);
         *out = (BYTE)res;          *out = (UINT8)res;
 }  }
   
 I286FN _add_ea_r16(void) {                                              // 01: add EA, REG16  I286FN _add_ea_r16(void) {                                              // 01: add EA, REG16
Line 93  I286FN _add_ea_r16(void) {      // 01: a Line 92  I286FN _add_ea_r16(void) {      // 01: a
   
 I286FN _add_r8_ea(void) {                                               // 02: add REG8, EA  I286FN _add_r8_ea(void) {                                               // 02: add REG8, EA
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 102  I286FN _add_r8_ea(void) {      // 02: ad Line 101  I286FN _add_r8_ea(void) {      // 02: ad
         PREPART_REG8_EA(op, src, out, 2, 7);          PREPART_REG8_EA(op, src, out, 2, 7);
         dst = *out;          dst = *out;
         ADDBYTE(res, dst, src);          ADDBYTE(res, dst, src);
         *out = (BYTE)res;          *out = (UINT8)res;
 }  }
   
 I286FN _add_r16_ea(void) {                                              // 03: add REG16, EA  I286FN _add_r16_ea(void) {                                              // 03: add REG16, EA
Line 127  I286FN _add_al_data8(void) {     // 04:  Line 126  I286FN _add_al_data8(void) {     // 04: 
         I286_WORKCLOCK(3);          I286_WORKCLOCK(3);
         GET_PCBYTE(src);          GET_PCBYTE(src);
         ADDBYTE(res, I286_AL, src);          ADDBYTE(res, I286_AL, src);
         I286_AL = (BYTE)res;          I286_AL = (UINT8)res;
 }  }
   
 I286FN _add_ax_data16(void) {                                   // 05: add ax, DATA16  I286FN _add_ax_data16(void) {                                   // 05: add ax, DATA16
Line 148  I286FN _push_es(void) {       // 06: pus Line 147  I286FN _push_es(void) {       // 06: pus
   
 I286FN _pop_es(void) {                                                  // 07: pop es  I286FN _pop_es(void) {                                                  // 07: pop es
   
         REGPOP(I286_ES, 5)          UINT    tmp;
         ES_BASE = (UINT32)I286_ES << 4;  
           REGPOP(tmp, 5)
           I286_ES = tmp;
           ES_BASE = SEGSELECT(tmp);
 }  }
   
 I286FN _or_ea_r8(void) {                                                // 08: or EA, REG8  I286FN _or_ea_r8(void) {                                                // 08: or EA, REG8
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 178  I286FN _or_ea_r8(void) {      // 08: or  Line 180  I286FN _or_ea_r8(void) {      // 08: or 
         }          }
         dst = *out;          dst = *out;
         ORBYTE(dst, src);          ORBYTE(dst, src);
         *out = (BYTE)dst;          *out = (UINT8)dst;
 }  }
   
 I286FN _or_ea_r16(void) {                                                       // 09: or EA, REG16  I286FN _or_ea_r16(void) {                                                       // 09: or EA, REG16
Line 212  I286FN _or_ea_r16(void) {       // 09: o Line 214  I286FN _or_ea_r16(void) {       // 09: o
   
 I286FN _or_r8_ea(void) {                                                // 0a: or REG8, EA  I286FN _or_r8_ea(void) {                                                // 0a: or REG8, EA
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 220  I286FN _or_r8_ea(void) {      // 0a: or  Line 222  I286FN _or_r8_ea(void) {      // 0a: or 
         PREPART_REG8_EA(op, src, out, 2, 7);          PREPART_REG8_EA(op, src, out, 2, 7);
         dst = *out;          dst = *out;
         ORBYTE(dst, src);          ORBYTE(dst, src);
         *out = (BYTE)dst;          *out = (UINT8)dst;
 }  }
   
 I286FN _or_r16_ea(void) {                                               // 0b: or REG16, EA  I286FN _or_r16_ea(void) {                                               // 0b: or REG16, EA
Line 245  I286FN _or_al_data8(void) {      // 0c:  Line 247  I286FN _or_al_data8(void) {      // 0c: 
         GET_PCBYTE(src);          GET_PCBYTE(src);
         dst = I286_AL;          dst = I286_AL;
         ORBYTE(dst, src);          ORBYTE(dst, src);
         I286_AL = (BYTE)dst;          I286_AL = (UINT8)dst;
 }  }
   
 I286FN _or_ax_data16(void) {                                    // 0d: or ax, DATA16  I286FN _or_ax_data16(void) {                                    // 0d: or ax, DATA16
Line 267  I286FN _push_cs(void) {       // 0e: pus Line 269  I286FN _push_cs(void) {       // 0e: pus
   
 I286FN _adc_ea_r8(void) {                                               // 10: adc EA, REG8  I286FN _adc_ea_r8(void) {                                               // 10: adc EA, REG8
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 292  I286FN _adc_ea_r8(void) {      // 10: ad Line 294  I286FN _adc_ea_r8(void) {      // 10: ad
         }          }
         dst = *out;          dst = *out;
         ADCBYTE(res, dst, src);          ADCBYTE(res, dst, src);
         *out = (BYTE)res;          *out = (UINT8)res;
 }  }
   
 I286FN _adc_ea_r16(void) {                                              // 11: adc EA, REG16  I286FN _adc_ea_r16(void) {                                              // 11: adc EA, REG16
Line 327  I286FN _adc_ea_r16(void) {      // 11: a Line 329  I286FN _adc_ea_r16(void) {      // 11: a
   
 I286FN _adc_r8_ea(void) {                                               // 12: adc REG8, EA  I286FN _adc_r8_ea(void) {                                               // 12: adc REG8, EA
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 336  I286FN _adc_r8_ea(void) {      // 12: ad Line 338  I286FN _adc_r8_ea(void) {      // 12: ad
         PREPART_REG8_EA(op, src, out, 2, 7);          PREPART_REG8_EA(op, src, out, 2, 7);
         dst = *out;          dst = *out;
         ADCBYTE(res, dst, src);          ADCBYTE(res, dst, src);
         *out = (BYTE)res;          *out = (UINT8)res;
 }  }
   
 I286FN _adc_r16_ea(void) {                                              // 13: adc REG16, EA  I286FN _adc_r16_ea(void) {                                              // 13: adc REG16, EA
Line 361  I286FN _adc_al_data8(void) {     // 14:  Line 363  I286FN _adc_al_data8(void) {     // 14: 
         I286_WORKCLOCK(3);          I286_WORKCLOCK(3);
         GET_PCBYTE(src);          GET_PCBYTE(src);
         ADCBYTE(res, I286_AL, src);          ADCBYTE(res, I286_AL, src);
         I286_AL = (BYTE)res;          I286_AL = (UINT8)res;
 }  }
   
 I286FN _adc_ax_data16(void) {                                   // 15: adc ax, DATA16  I286FN _adc_ax_data16(void) {                                   // 15: adc ax, DATA16
Line 382  I286FN _push_ss(void) {       // 16: pus Line 384  I286FN _push_ss(void) {       // 16: pus
   
 I286FN _pop_ss(void) {                                                  // 17: pop ss  I286FN _pop_ss(void) {                                                  // 17: pop ss
   
         REGPOP(I286_SS, 5)          UINT    tmp;
         SS_BASE = I286_SS << 4;  
           REGPOP(tmp, 5)
           I286_SS = tmp;
           SS_BASE = SEGSELECT(tmp);
         SS_FIX = SS_BASE;          SS_FIX = SS_BASE;
         NEXT_OPCODE          NEXT_OPCODE
 }  }
   
 I286FN _sbb_ea_r8(void) {                                               // 18: sbb EA, REG8  I286FN _sbb_ea_r8(void) {                                               // 18: sbb EA, REG8
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 415  I286FN _sbb_ea_r8(void) {      // 18: sb Line 420  I286FN _sbb_ea_r8(void) {      // 18: sb
         }          }
         dst = *out;          dst = *out;
         SBBBYTE(res, dst, src);          SBBBYTE(res, dst, src);
         *out = (BYTE)res;          *out = (UINT8)res;
 }  }
   
 I286FN _sbb_ea_r16(void) {                                              // 19: sbb EA, REG16  I286FN _sbb_ea_r16(void) {                                              // 19: sbb EA, REG16
Line 450  I286FN _sbb_ea_r16(void) {      // 19: s Line 455  I286FN _sbb_ea_r16(void) {      // 19: s
   
 I286FN _sbb_r8_ea(void) {                                               // 1a: sbb REG8, EA  I286FN _sbb_r8_ea(void) {                                               // 1a: sbb REG8, EA
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 459  I286FN _sbb_r8_ea(void) {      // 1a: sb Line 464  I286FN _sbb_r8_ea(void) {      // 1a: sb
         PREPART_REG8_EA(op, src, out, 2, 7);          PREPART_REG8_EA(op, src, out, 2, 7);
         dst = *out;          dst = *out;
         SBBBYTE(res, dst, src);          SBBBYTE(res, dst, src);
         *out = (BYTE)res;          *out = (UINT8)res;
 }  }
   
 I286FN _sbb_r16_ea(void) {                                              // 1b: sbb REG16, EA  I286FN _sbb_r16_ea(void) {                                              // 1b: sbb REG16, EA
Line 484  I286FN _sbb_al_data8(void) {     // 1c:  Line 489  I286FN _sbb_al_data8(void) {     // 1c: 
         I286_WORKCLOCK(3);          I286_WORKCLOCK(3);
         GET_PCBYTE(src);          GET_PCBYTE(src);
         SBBBYTE(res, I286_AL, src);          SBBBYTE(res, I286_AL, src);
         I286_AL = (BYTE)res;          I286_AL = (UINT8)res;
 }  }
   
 I286FN _sbb_ax_data16(void) {                                   // 1d: adc ax, DATA16  I286FN _sbb_ax_data16(void) {                                   // 1d: adc ax, DATA16
Line 505  I286FN _push_ds(void) {       // 1e: pus Line 510  I286FN _push_ds(void) {       // 1e: pus
   
 I286FN _pop_ds(void) {                                                  // 1f: pop ds  I286FN _pop_ds(void) {                                                  // 1f: pop ds
   
         REGPOP(I286_DS, 5)          UINT    tmp;
         DS_BASE = I286_DS << 4;  
           REGPOP(tmp, 5)
           I286_DS = tmp;
           DS_BASE = SEGSELECT(tmp);
         DS_FIX = DS_BASE;          DS_FIX = DS_BASE;
 }  }
   
 I286FN _and_ea_r8(void) {                                               // 20: and EA, REG8  I286FN _and_ea_r8(void) {                                               // 20: and EA, REG8
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 536  I286FN _and_ea_r8(void) {      // 20: an Line 544  I286FN _and_ea_r8(void) {      // 20: an
         }          }
         dst = *out;          dst = *out;
         ANDBYTE(dst, src);          ANDBYTE(dst, src);
         *out = (BYTE)dst;          *out = (UINT8)dst;
 }  }
   
 I286FN _and_ea_r16(void) {                                              // 21: and EA, REG16  I286FN _and_ea_r16(void) {                                              // 21: and EA, REG16
Line 570  I286FN _and_ea_r16(void) {      // 21: a Line 578  I286FN _and_ea_r16(void) {      // 21: a
   
 I286FN _and_r8_ea(void) {                                               // 22: and REG8, EA  I286FN _and_r8_ea(void) {                                               // 22: and REG8, EA
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 578  I286FN _and_r8_ea(void) {      // 22: an Line 586  I286FN _and_r8_ea(void) {      // 22: an
         PREPART_REG8_EA(op, src, out, 2, 7);          PREPART_REG8_EA(op, src, out, 2, 7);
         dst = *out;          dst = *out;
         ANDBYTE(dst, src);          ANDBYTE(dst, src);
         *out = (BYTE)dst;          *out = (UINT8)dst;
 }  }
   
 I286FN _and_r16_ea(void) {                                              // 23: and REG16, EA  I286FN _and_r16_ea(void) {                                              // 23: and REG16, EA
Line 603  I286FN _and_al_data8(void) {     // 24:  Line 611  I286FN _and_al_data8(void) {     // 24: 
         GET_PCBYTE(src);          GET_PCBYTE(src);
         dst = I286_AL;          dst = I286_AL;
         ANDBYTE(dst, src);          ANDBYTE(dst, src);
         I286_AL = (BYTE)dst;          I286_AL = (UINT8)dst;
 }  }
   
 I286FN _and_ax_data16(void) {                                   // 25: and ax, DATA16  I286FN _and_ax_data16(void) {                                   // 25: and ax, DATA16
Line 622  I286FN _segprefix_es(void) {     // 26:  Line 630  I286FN _segprefix_es(void) {     // 26: 
   
         SS_FIX = ES_BASE;          SS_FIX = ES_BASE;
         DS_FIX = ES_BASE;          DS_FIX = ES_BASE;
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op[op]();                  i286op[op]();
                 REMOVE_PREFIX                  REMOVE_PREFIX
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 643  I286FN _daa(void) {        // 27: daa Line 651  I286FN _daa(void) {        // 27: daa
                                 ((I286_AL >= 0x1a) && (I286_FLAGL & C_FLAG))));                                  ((I286_AL >= 0x1a) && (I286_FLAGL & C_FLAG))));
         if ((I286_FLAGL & A_FLAG) || ((I286_AL & 0x0f) > 9)) {          if ((I286_FLAGL & A_FLAG) || ((I286_AL & 0x0f) > 9)) {
                 I286_FLAGL |= A_FLAG;                  I286_FLAGL |= A_FLAG;
                 I286_FLAGL |= (BYTE)((I286_AL + 6) >> 8);                  I286_FLAGL |= (UINT8)((I286_AL + 6) >> 8);
                 I286_AL += 6;                  I286_AL += 6;
         }          }
         if ((I286_FLAGL & C_FLAG) || (I286_AL > 0x9f)) {          if ((I286_FLAGL & C_FLAG) || (I286_AL > 0x9f)) {
Line 656  I286FN _daa(void) {        // 27: daa Line 664  I286FN _daa(void) {        // 27: daa
   
 I286FN _sub_ea_r8(void) {                                               // 28: sub EA, REG8  I286FN _sub_ea_r8(void) {                                               // 28: sub EA, REG8
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 681  I286FN _sub_ea_r8(void) {      // 28: su Line 689  I286FN _sub_ea_r8(void) {      // 28: su
         }          }
         dst = *out;          dst = *out;
         SUBBYTE(res, dst, src);          SUBBYTE(res, dst, src);
         *out = (BYTE)res;          *out = (UINT8)res;
 }  }
   
 I286FN _sub_ea_r16(void) {                                              // 29: sub EA, REG16  I286FN _sub_ea_r16(void) {                                              // 29: sub EA, REG16
Line 716  I286FN _sub_ea_r16(void) {      // 29: s Line 724  I286FN _sub_ea_r16(void) {      // 29: s
   
 I286FN _sub_r8_ea(void) {                                               // 2a: sub REG8, EA  I286FN _sub_r8_ea(void) {                                               // 2a: sub REG8, EA
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 725  I286FN _sub_r8_ea(void) {      // 2a: su Line 733  I286FN _sub_r8_ea(void) {      // 2a: su
         PREPART_REG8_EA(op, src, out, 2, 7);          PREPART_REG8_EA(op, src, out, 2, 7);
         dst = *out;          dst = *out;
         SUBBYTE(res, dst, src);          SUBBYTE(res, dst, src);
         *out = (BYTE)res;          *out = (UINT8)res;
 }  }
   
 I286FN _sub_r16_ea(void) {                                              // 2b: sub REG16, EA  I286FN _sub_r16_ea(void) {                                              // 2b: sub REG16, EA
Line 750  I286FN _sub_al_data8(void) {     // 2c:  Line 758  I286FN _sub_al_data8(void) {     // 2c: 
         I286_WORKCLOCK(3);          I286_WORKCLOCK(3);
         GET_PCBYTE(src);          GET_PCBYTE(src);
         SUBBYTE(res, I286_AL, src);          SUBBYTE(res, I286_AL, src);
         I286_AL = (BYTE)res;          I286_AL = (UINT8)res;
 }  }
   
 I286FN _sub_ax_data16(void) {                                   // 2d: sub ax, DATA16  I286FN _sub_ax_data16(void) {                                   // 2d: sub ax, DATA16
Line 768  I286FN _segprefix_cs(void) {     // 2e:  Line 776  I286FN _segprefix_cs(void) {     // 2e: 
   
         SS_FIX = CS_BASE;          SS_FIX = CS_BASE;
         DS_FIX = CS_BASE;          DS_FIX = CS_BASE;
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op[op]();                  i286op[op]();
                 REMOVE_PREFIX                  REMOVE_PREFIX
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 799  I286FN _das(void) {        // 2f: das Line 807  I286FN _das(void) {        // 2f: das
   
 I286FN _xor_ea_r8(void) {                                               // 30: xor EA, REG8  I286FN _xor_ea_r8(void) {                                               // 30: xor EA, REG8
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 823  I286FN _xor_ea_r8(void) {      // 30: xo Line 831  I286FN _xor_ea_r8(void) {      // 30: xo
         }          }
         dst = *out;          dst = *out;
         XORBYTE(dst, src);          XORBYTE(dst, src);
         *out = (BYTE)dst;          *out = (UINT8)dst;
 }  }
   
 I286FN _xor_ea_r16(void) {                                              // 31: xor EA, REG16  I286FN _xor_ea_r16(void) {                                              // 31: xor EA, REG16
Line 857  I286FN _xor_ea_r16(void) {      // 31: x Line 865  I286FN _xor_ea_r16(void) {      // 31: x
   
 I286FN _xor_r8_ea(void) {                                               // 32: xor REG8, EA  I286FN _xor_r8_ea(void) {                                               // 32: xor REG8, EA
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 865  I286FN _xor_r8_ea(void) {      // 32: xo Line 873  I286FN _xor_r8_ea(void) {      // 32: xo
         PREPART_REG8_EA(op, src, out, 2, 7);          PREPART_REG8_EA(op, src, out, 2, 7);
         dst = *out;          dst = *out;
         XORBYTE(dst, src);          XORBYTE(dst, src);
         *out = (BYTE)dst;          *out = (UINT8)dst;
 }  }
   
 I286FN _xor_r16_ea(void) {                                              // 33: or REG16, EA  I286FN _xor_r16_ea(void) {                                              // 33: or REG16, EA
Line 890  I286FN _xor_al_data8(void) {     // 34:  Line 898  I286FN _xor_al_data8(void) {     // 34: 
         GET_PCBYTE(src);          GET_PCBYTE(src);
         dst = I286_AL;          dst = I286_AL;
         XORBYTE(dst, src);          XORBYTE(dst, src);
         I286_AL = (BYTE)dst;          I286_AL = (UINT8)dst;
 }  }
   
 I286FN _xor_ax_data16(void) {                                   // 35: or ax, DATA16  I286FN _xor_ax_data16(void) {                                   // 35: or ax, DATA16
Line 909  I286FN _segprefix_ss(void) {     // 36:  Line 917  I286FN _segprefix_ss(void) {     // 36: 
   
         SS_FIX = SS_BASE;          SS_FIX = SS_BASE;
         DS_FIX = SS_BASE;          DS_FIX = SS_BASE;
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op[op]();                  i286op[op]();
                 REMOVE_PREFIX                  REMOVE_PREFIX
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 933  I286FN _aaa(void) {        // 37: aaa Line 941  I286FN _aaa(void) {        // 37: aaa
         else {          else {
                 I286_FLAGL &= ~(A_FLAG | C_FLAG);                  I286_FLAGL &= ~(A_FLAG | C_FLAG);
         }          }
           I286_AL &= 0x0f;
 }  }
   
 I286FN _cmp_ea_r8(void) {                                               // 38: cmp EA, REG8  I286FN _cmp_ea_r8(void) {                                               // 38: cmp EA, REG8
Line 977  I286FN _cmp_ea_r16(void) {      // 39: c Line 986  I286FN _cmp_ea_r16(void) {      // 39: c
   
 I286FN _cmp_r8_ea(void) {                                               // 3a: cmp REG8, EA  I286FN _cmp_r8_ea(void) {                                               // 3a: cmp REG8, EA
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    dst;          UINT    dst;
Line 1025  I286FN _segprefix_ds(void) {     // 3e:  Line 1034  I286FN _segprefix_ds(void) {     // 3e: 
   
         SS_FIX = DS_BASE;          SS_FIX = DS_BASE;
         DS_FIX = DS_BASE;          DS_FIX = DS_BASE;
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op[op]();                  i286op[op]();
                 REMOVE_PREFIX                  REMOVE_PREFIX
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 1085  I286FN _pop_bp(void) REGPOP(I286_BP, 5)  Line 1094  I286FN _pop_bp(void) REGPOP(I286_BP, 5) 
 I286FN _pop_si(void) REGPOP(I286_SI, 5)         // 5E:  pop             si  I286FN _pop_si(void) REGPOP(I286_SI, 5)         // 5E:  pop             si
 I286FN _pop_di(void) REGPOP(I286_DI, 5)         // 5F:  pop             di  I286FN _pop_di(void) REGPOP(I286_DI, 5)         // 5F:  pop             di
   
   #if (defined(ARM) || defined(X11)) && defined(BYTESEX_LITTLE)
   
 I286FN _pusha(void) {                                           // 60:  pusha  I286FN _pusha(void) {                                           // 60:  pusha
   
         UINT16  tmp;          REG16   tmp;
           UINT32  addr;
   
           I286_WORKCLOCK(17);
           tmp = I286_SP;
           addr = tmp + SS_BASE;
           if ((tmp < 16) || (INHIBIT_WORDP(addr))) {
                   REGPUSH0(I286_AX)
                   REGPUSH0(I286_CX)
                   REGPUSH0(I286_DX)
                   REGPUSH0(I286_BX)
               REGPUSH0(tmp)
                   REGPUSH0(I286_BP)
                   REGPUSH0(I286_SI)
                   REGPUSH0(I286_DI)
           }
           else {
                   *(UINT16 *)(mem + addr - 2) = I286_AX;
                   *(UINT16 *)(mem + addr - 4) = I286_CX;
                   *(UINT16 *)(mem + addr - 6) = I286_DX;
                   *(UINT16 *)(mem + addr - 8) = I286_BX;
                   *(UINT16 *)(mem + addr - 10) = tmp;
                   *(UINT16 *)(mem + addr - 12) = I286_BP;
                   *(UINT16 *)(mem + addr - 14) = I286_SI;
                   *(UINT16 *)(mem + addr - 16) = I286_DI;
                   I286_SP -= 16;
           }
   }
   
   I286FN _popa(void) {                                            // 61:  popa
   
           UINT    tmp;
           UINT32  addr;
   
           I286_WORKCLOCK(19);
           tmp = I286_SP + 16;
           addr = tmp + SS_BASE;
           if ((tmp >= 0x10000) || (INHIBIT_WORDP(addr))) {
                   REGPOP0(I286_DI);
                   REGPOP0(I286_SI);
                   REGPOP0(I286_BP);
                   I286_SP += 2;
                   REGPOP0(I286_BX);
                   REGPOP0(I286_DX);
                   REGPOP0(I286_CX);
                   REGPOP0(I286_AX);
           }
           else {
                   I286_DI = *(UINT16 *)(mem + addr - 16);
                   I286_SI = *(UINT16 *)(mem + addr - 14);
                   I286_BP = *(UINT16 *)(mem + addr - 12);
                   I286_BX = *(UINT16 *)(mem + addr - 8);
                   I286_DX = *(UINT16 *)(mem + addr - 6);
                   I286_CX = *(UINT16 *)(mem + addr - 4);
                   I286_AX = *(UINT16 *)(mem + addr - 2);
                   I286_SP = tmp;
           }
   }
   
   #else
   
   I286FN _pusha(void) {                                           // 60:  pusha
   
           REG16   tmp;
   
         tmp = I286_SP;          tmp = I286_SP;
         REGPUSH0(I286_AX)          REGPUSH0(I286_AX)
Line 1114  I286FN _popa(void) {      // 61: popa Line 1188  I286FN _popa(void) {      // 61: popa
         I286_WORKCLOCK(19);          I286_WORKCLOCK(19);
 }  }
   
   #endif
   
 I286FN _bound(void) {                                           // 62:  bound  I286FN _bound(void) {                                           // 62:  bound
   
         UINT    vect = 0;          UINT    vect = 0;
Line 1147  I286FN _arpl(void) {      // 63: arpl Line 1223  I286FN _arpl(void) {      // 63: arpl
   
         GET_PCBYTE(op)          GET_PCBYTE(op)
         tmp = ((op < 0xc0)?1:0);          tmp = ((op < 0xc0)?1:0);
         I286_IP += (BYTE)tmp;          I286_IP += (UINT8)tmp;
         I286_WORKCLOCK(tmp + 10);          I286_WORKCLOCK(tmp + 10);
         INT_NUM(6, I286_IP);          INT_NUM(6, I286_IP);
 }  }
Line 1223  I286FN _outsb(void) {      // 6E: outsb Line 1299  I286FN _outsb(void) {      // 6E: outsb
         I286_WORKCLOCK(3);          I286_WORKCLOCK(3);
         dat = i286_memoryread(I286_SI + DS_FIX);          dat = i286_memoryread(I286_SI + DS_FIX);
         I286_SI += STRING_DIR;          I286_SI += STRING_DIR;
         iocore_out8(I286_DX, (BYTE)dat);          iocore_out8(I286_DX, (UINT8)dat);
 }  }
   
 I286FN _outsw(void) {                                           // 6F:  outsw  I286FN _outsw(void) {                                           // 6F:  outsw
Line 1323  I286FN _jnle_short(void) {     // 7F: jg Line 1399  I286FN _jnle_short(void) {     // 7F: jg
   
 I286FN _calc_ea8_i8(void) {                                     // 80:  op              EA8, DATA8  I286FN _calc_ea8_i8(void) {                                     // 80:  op              EA8, DATA8
                                                                                         // 82:  op              EA8, DATA8                                                                                          // 82:  op              EA8, DATA8
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT32  madr;          UINT32  madr;
   
Line 1398  I286FN _calc_ea16_i8(void) {    // 83: o Line 1474  I286FN _calc_ea16_i8(void) {    // 83: o
   
 I286FN _test_ea_r8(void) {                                      // 84:  test    EA, REG8  I286FN _test_ea_r8(void) {                                      // 84:  test    EA, REG8
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT    src;          UINT    src;
         UINT    tmp;          UINT    tmp;
Line 1452  I286FN _test_ea_r16(void) {     // 85: t Line 1528  I286FN _test_ea_r16(void) {     // 85: t
   
 I286FN _xchg_ea_r8(void) {                                      // 86:  xchg    EA, REG8  I286FN _xchg_ea_r8(void) {                                      // 86:  xchg    EA, REG8
   
         BYTE    *out;          UINT8   *out;
         BYTE    *src;          UINT8   *src;
         UINT    op;          UINT    op;
         UINT32  madr;          UINT32  madr;
   
Line 1466  I286FN _xchg_ea_r8(void) {     // 86: xc Line 1542  I286FN _xchg_ea_r8(void) {     // 86: xc
                 I286_WORKCLOCK(5);                  I286_WORKCLOCK(5);
                 madr = CALC_EA(op);                  madr = CALC_EA(op);
                 if (madr >= I286_MEMWRITEMAX) {                  if (madr >= I286_MEMWRITEMAX) {
                         BYTE tmp = i286_memoryread(madr);                          UINT8 tmp = i286_memoryread(madr);
                         i286_memorywrite(madr, *src);                          i286_memorywrite(madr, *src);
                         *src = tmp;                          *src = tmp;
                         return;                          return;
Line 1504  I286FN _xchg_ea_r16(void) {     // 87: x Line 1580  I286FN _xchg_ea_r16(void) {     // 87: x
   
 I286FN _mov_ea_r8(void) {                                       // 88:  mov             EA, REG8  I286FN _mov_ea_r8(void) {                                       // 88:  mov             EA, REG8
   
         BYTE    src;          UINT8   src;
         UINT    op;          UINT    op;
         UINT32  madr;          UINT32  madr;
   
Line 1538  I286FN _mov_ea_r16(void) {     // 89: mo Line 1614  I286FN _mov_ea_r16(void) {     // 89: mo
   
 I286FN _mov_r8_ea(void) {                                       // 8A:  mov             REG8, EA  I286FN _mov_r8_ea(void) {                                       // 8A:  mov             REG8, EA
   
         BYTE    *out;          UINT8   *out;
         BYTE    src;          UINT8   src;
         UINT    op;          UINT    op;
   
         PREPART_REG8_EA(op, src, out, 2, 5);          PREPART_REG8_EA(op, src, out, 2, 5);
Line 1591  I286FN _mov_seg_ea(void) {     // 8E: mo Line 1667  I286FN _mov_seg_ea(void) {     // 8E: mo
   
         UINT    op;          UINT    op;
         UINT    tmp;          UINT    tmp;
           UINT32  base;
         UINT16  ipbak;          UINT16  ipbak;
   
         ipbak = I286_IP;          ipbak = I286_IP;
Line 1603  I286FN _mov_seg_ea(void) {     // 8E: mo Line 1680  I286FN _mov_seg_ea(void) {     // 8E: mo
                 I286_WORKCLOCK(5);                  I286_WORKCLOCK(5);
                 tmp = i286_memoryread_w(CALC_EA(op));                  tmp = i286_memoryread_w(CALC_EA(op));
         }          }
           base = SEGSELECT(tmp);
         switch(op & 0x18) {          switch(op & 0x18) {
                 case 0x00:                      // es                  case 0x00:                      // es
                         I286_ES = (UINT16)tmp;                          I286_ES = (UINT16)tmp;
                         ES_BASE = tmp << 4;                          ES_BASE = base;
                         break;                          break;
   
                 case 0x10:                      // ss                  case 0x10:                      // ss
                         I286_SS = (UINT16)tmp;                          I286_SS = (UINT16)tmp;
                         SS_BASE = tmp << 4;                          SS_BASE = base;
                         SS_FIX = SS_BASE;                          SS_FIX = base;
                         NEXT_OPCODE                          NEXT_OPCODE
                         break;                          break;
   
                 case 0x18:                      // ds                  case 0x18:                      // ds
                         I286_DS = (UINT16)tmp;                          I286_DS = (UINT16)tmp;
                         DS_BASE = tmp << 4;                          DS_BASE = base;
                         DS_FIX = DS_BASE;                          DS_FIX = base;
                         break;                          break;
   
                 default:                        // cs                  default:                        // cs
Line 1726  I286FN _call_far(void) {     // 9A: call Line 1804  I286FN _call_far(void) {     // 9A: call
         REGPUSH0(I286_CS)          REGPUSH0(I286_CS)
         GET_PCWORD(newip)          GET_PCWORD(newip)
         GET_PCWORD(I286_CS)          GET_PCWORD(I286_CS)
         CS_BASE = I286_CS << 4;          CS_BASE = SEGSELECT(I286_CS);
         REGPUSH0(I286_IP)          REGPUSH0(I286_IP)
         I286_IP = newip;          I286_IP = newip;
 }  }
Line 1743  I286FN _pushf(void) {      // 9C: pushf Line 1821  I286FN _pushf(void) {      // 9C: pushf
   
 I286FN _popf(void) {                                            // 9D:  popf  I286FN _popf(void) {                                            // 9D:  popf
   
           UINT    flag;
   
           REGPOP0(flag)
           I286_OV = flag & O_FLAG;
           I286_FLAG = flag & (0xfff ^ O_FLAG);
           I286_TRAP = ((flag & 0x300) == 0x300);
         I286_WORKCLOCK(5);          I286_WORKCLOCK(5);
         REGPOP0(I286_FLAG)  #if defined(INTR_FAST)
         I286_OV = I286_FLAG & O_FLAG;          if ((I286_TRAP) || ((flag & I_FLAG) && (PICEXISTINTR))) {
         I286_FLAG &= (0xfff ^ O_FLAG);                  I286IRQCHECKTERM
         I286_TRAP = ((I286_FLAG & 0x300) == 0x300);          }
   #else
         I286IRQCHECKTERM          I286IRQCHECKTERM
   #endif
 }  }
   
 I286FN _sahf(void) {                                            // 9E:  sahf  I286FN _sahf(void) {                                            // 9E:  sahf
Line 1801  I286FN _mov_m16_ax(void) {     // A3: mo Line 1887  I286FN _mov_m16_ax(void) {     // A3: mo
   
 I286FN _movsb(void) {                                           // A4:  movsb  I286FN _movsb(void) {                                           // A4:  movsb
   
         BYTE    tmp;          UINT8   tmp;
   
         I286_WORKCLOCK(5);          I286_WORKCLOCK(5);
         tmp = i286_memoryread(I286_SI + DS_FIX);          tmp = i286_memoryread(I286_SI + DS_FIX);
Line 1944  I286FN _mov_di_imm(void) MOVIMM16(I286_D Line 2030  I286FN _mov_di_imm(void) MOVIMM16(I286_D
   
 I286FN _shift_ea8_data8(void) {                         // C0:  shift   EA8, DATA8  I286FN _shift_ea8_data8(void) {                         // C0:  shift   EA8, DATA8
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT32  madr;          UINT32  madr;
         BYTE    cl;          UINT8   cl;
   
         GET_PCBYTE(op)          GET_PCBYTE(op)
         if (op >= 0xc0) {          if (op >= 0xc0) {
Line 1975  I286FN _shift_ea16_data8(void) {   // C1 Line 2061  I286FN _shift_ea16_data8(void) {   // C1
         UINT16  *out;          UINT16  *out;
         UINT    op;          UINT    op;
         UINT32  madr;          UINT32  madr;
         BYTE    cl;          UINT8   cl;
   
         GET_PCBYTE(op)          GET_PCBYTE(op)
         if (op >= 0xc0) {          if (op >= 0xc0) {
Line 2026  I286FN _les_r16_ea(void) {     // C4: le Line 2112  I286FN _les_r16_ea(void) {     // C4: le
                 ad = GET_EA(op, &seg);                  ad = GET_EA(op, &seg);
                 *(REG16_B53(op)) = i286_memoryread_w(seg + ad);                  *(REG16_B53(op)) = i286_memoryread_w(seg + ad);
                 I286_ES = i286_memoryread_w(seg + LOW16(ad + 2));                  I286_ES = i286_memoryread_w(seg + LOW16(ad + 2));
                 ES_BASE = I286_ES << 4;                  ES_BASE = SEGSELECT(I286_ES);
         }          }
         else {          else {
                 INT_NUM(6, I286_IP - 2);                  INT_NUM(6, I286_IP - 2);
Line 2045  I286FN _lds_r16_ea(void) {     // C5: ld Line 2131  I286FN _lds_r16_ea(void) {     // C5: ld
                 ad = GET_EA(op, &seg);                  ad = GET_EA(op, &seg);
                 *(REG16_B53(op)) = i286_memoryread_w(seg + ad);                  *(REG16_B53(op)) = i286_memoryread_w(seg + ad);
                 I286_DS = i286_memoryread_w(seg + LOW16(ad + 2));                  I286_DS = i286_memoryread_w(seg + LOW16(ad + 2));
                 DS_BASE = I286_DS << 4;                  DS_BASE = SEGSELECT(I286_DS);
                 DS_FIX = DS_BASE;                  DS_FIX = DS_BASE;
         }          }
         else {          else {
Line 2064  I286FN _mov_ea8_data8(void) {    // C6:  Line 2150  I286FN _mov_ea8_data8(void) {    // C6: 
         }          }
         else {                          // 03/11/23          else {                          // 03/11/23
                 UINT32 ad;                  UINT32 ad;
                 BYTE val;                  UINT8 val;
                 I286_WORKCLOCK(3);                  I286_WORKCLOCK(3);
                 ad = CALC_EA(op);                  ad = CALC_EA(op);
                 GET_PCBYTE(val)                  GET_PCBYTE(val)
Line 2094  I286FN _mov_ea16_data16(void) {    // C7 Line 2180  I286FN _mov_ea16_data16(void) {    // C7
 I286FN _enter(void) {                                           // C8:  enter   DATA16, DATA8  I286FN _enter(void) {                                           // C8:  enter   DATA16, DATA8
   
         UINT16  dimsize;          UINT16  dimsize;
         BYTE    level;          UINT8   level;
   
         GET_PCWORD(dimsize)          GET_PCWORD(dimsize)
         GET_PCBYTE(level)          GET_PCBYTE(level)
Line 2156  I286FN _ret_far_data16(void) {    // CA: Line 2242  I286FN _ret_far_data16(void) {    // CA:
         REGPOP0(I286_IP)          REGPOP0(I286_IP)
         REGPOP0(I286_CS)          REGPOP0(I286_CS)
         I286_SP += ad;          I286_SP += ad;
         CS_BASE = I286_CS << 4;          CS_BASE = SEGSELECT(I286_CS);
 }  }
   
 I286FN _ret_far(void) {                                         // CB:  ret far  I286FN _ret_far(void) {                                         // CB:  ret far
Line 2164  I286FN _ret_far(void) {      // CB: ret  Line 2250  I286FN _ret_far(void) {      // CB: ret 
         I286_WORKCLOCK(15);          I286_WORKCLOCK(15);
         REGPOP0(I286_IP)          REGPOP0(I286_IP)
         REGPOP0(I286_CS)          REGPOP0(I286_CS)
         CS_BASE = I286_CS << 4;          CS_BASE = SEGSELECT(I286_CS);
 }  }
   
 I286FN _int_03(void) {                                          // CC:  int             3  I286FN _int_03(void) {                                          // CC:  int             3
   
         I286_WORKCLOCK(23);          I286_WORKCLOCK(3);
         INT_NUM(3, I286_IP);          INT_NUM(3, I286_IP);
 }  }
   
Line 2177  I286FN _int_data8(void) {     // CD: int Line 2263  I286FN _int_data8(void) {     // CD: int
   
         UINT    vect;          UINT    vect;
   
         I286_WORKCLOCK(23);          I286_WORKCLOCK(3);
         GET_PCBYTE(vect)          GET_PCBYTE(vect)
   #if 0
   //      if (vect == 0x2f) {
   //              TRACEOUT(("%.4x:%.4x INT-2F AX=%.4x", CPU_CS, CPU_IP, CPU_AX));
   //      }
           if (vect == 0x67) {
                   TRACEOUT(("%.4x:%.4x INT-67 AX=%.4x BX=%.4x DX=%.4x", CPU_CS, CPU_IP, CPU_AX, CPU_BX, CPU_DX));
           }
   #endif
   #if 0
           if ((vect == 0x42) && (CPU_AL != 6)) {
                   TRACEOUT(("%.4x:%.4x INT-42 AL=%.2x", CPU_CS, CPU_IP, CPU_AL));
           }
   #endif
   #if 0
           if (vect == 0x2f) {
                   TRACEOUT(("%.4x:%.4x INT-2f BX=%.4x/DX=%.4x", CPU_CS, CPU_IP, CPU_BX, CPU_DX));
           }
   #endif
   #if 0
           if (vect == 0xd2) {
                   TRACEOUT(("%.4x:%.4x INT-d2 AX=%.4x", CPU_CS, CPU_IP, CPU_AX));
           }
   #endif
   #if 0
           if (vect == 0x60) {
                   TRACEOUT(("%.4x:%.4x INT-60 AX=%.4x", CPU_CS, CPU_IP, CPU_AX));
           }
   #endif
   #if 0
           if (vect == 0xa0) {
                   TRACEOUT(("%.4x:%.4x INT-a0 AX=%.4x", CPU_CS, CPU_IP, CPU_AX));
           }
           if (vect == 0xa2) {
                   TRACEOUT(("%.4x:%.4x INT-a2", CPU_CS, CPU_IP));
           }
           if (vect == 0xa4) {
                   TRACEOUT(("%.4x:%.4x INT-a4", CPU_CS, CPU_IP));
           }
   #endif
   #if 0
           if (vect == 0x60) {
                   TRACEOUT(("%.4x:%.4x INT-60 AH=%.2x", CPU_CS, CPU_IP, CPU_AH));
                   if (CPU_AH == 1) {
                           TRACEOUT(("->%.4x:%.4x", CPU_ES, CPU_BX));
                   }
           }
   #endif
   #if 0
           if (vect == 0x40) {
                   TRACEOUT(("%.4x:%.4x INT-40 AH=%.2x", CPU_CS, CPU_IP, CPU_AH));
           }
           if (vect == 0x66) {
                   switch(CPU_AL) {
                           case 1:
                                   TRACEOUT(("%.4x:%.4x INT-66:01 play", CPU_CS, CPU_IP));
                                   break;
                           case 2:
                                   TRACEOUT(("%.4x:%.4x INT-66:02 stop", CPU_CS, CPU_IP));
                                   break;
                           case 9:
                                   TRACEOUT(("%.4x:%.4x INT-66:09 setdata AH=%.2x ES:BX=%.4x:%.4x DX=%.4x", CPU_CS, CPU_IP, CPU_AH, CPU_ES, CPU_BX, CPU_DX));
                                   break;
                           case 0x0d:
                                   TRACEOUT(("%.4x:%.4x INT-66:0d setdata ES:BX=%.4x:%.4x", CPU_CS, CPU_IP, CPU_ES, CPU_BX));
                                   break;
   
                           default:
                                   TRACEOUT(("%.4x:%.4x INT-66 AX=%.4x", CPU_CS, CPU_IP, CPU_AX));
                                   break;
                   }
           }
   #endif
   #if 0
           if (vect == 0x40) {
                   TRACEOUT(("%.4x:%.4x INT-40 AX=%.4x DS=%.4x DI=%.4x", CPU_CS, CPU_IP, CPU_AX, CPU_DS, CPU_DI));
           }
           if (vect == 0x41) {
                   TRACEOUT(("%.4x:%.4x INT-41 AX=%.4x DX=%.4x", CPU_CS, CPU_IP, CPU_AX, CPU_DX));
           }
   #endif
   #if 0
           if (vect == 0x41) {
                   TRACEOUT(("%.4x:%.4x INT-41 AX=%.4x %.4x:%.4x",
                                                           CPU_CS, CPU_IP, CPU_AX, CPU_DS, CPU_SI));
           }
           if (vect == 0x42) {
                   switch(CPU_AH) {
                           case 0xd3:
                           case 0xd0:
                                   break;
   
                           case 0xfd:
                           case 0xfc:
                           case 0xfa:
                           case 0xf8:
                           case 0xe3:
                                   TRACEOUT(("%.4x:%.4x INT-42 AX=%.4x %.4x:%.4x",
                                                           CPU_CS, CPU_IP, CPU_AX, CPU_BX, CPU_BP));
                                   break;
   
                           default:
                                   TRACEOUT(("%.4x:%.4x INT-42 AX=%.4x", CPU_CS, CPU_IP, CPU_AX));
                                   break;
                   }
           }
   #endif
   #if 0
           if (vect == 0x40) {
                   TRACEOUT(("%.4x:%.4x INT-40 SI=%.4x %.4x:%.4x:%.4x",
                                                                           CPU_CS, CPU_IP, CPU_SI,
                                                                           MEML_READ16(CPU_DS, CPU_SI + 0),
                                                                           MEML_READ16(CPU_DS, CPU_SI + 2),
                                                                           MEML_READ16(CPU_DS, CPU_SI + 4)));
           }
           if (vect == 0xd2) {
                   TRACEOUT(("%.4x:%.4x INT-D2 AX=%.4x", CPU_CS, CPU_IP, CPU_AX));
           }
   #endif
   #if 0
           if (vect == 0x40) {
                   TRACEOUT(("INT 40H - AL=%.2x", CPU_AL));
           }
   #endif
   #if defined(TRACE)
           if (vect == 0x21) {
                   char f[128];
                   UINT i;
                   char c;
                   switch(CPU_AH) {
                           case 0x3d:
                                   for (i=0; i<127; i++) {
                                           c = MEML_READ8(CPU_DS, CPU_DX + i);
                                           if (c == '\0') break;
                                           f[i] = c;
                                   }
                                   f[i] = 0;
                                   TRACEOUT(("DOS: %.4x:%.4x Open Handle AL=%.2x DS:DX=%.4x:%.4x[%s]", CPU_CS, CPU_IP, CPU_AL, CPU_DS, CPU_DX, f));
                                   break;
   
                           case 0x3f:
                                   TRACEOUT(("DOS: %.4x:%.4x Read Handle BX=%.4x DS:DX=%.4x:%.4x CX=%.4x", CPU_CS, CPU_IP, CPU_BX, CPU_DS, CPU_DX, CPU_CX));
                                   break;
   
                           case 0x42:
                                   TRACEOUT(("DOS: %.4x:%.4x Move File Pointer BX=%.4x CX:DX=%.4x:%.4x AL=%.2x", CPU_CS, CPU_IP, CPU_BX, CPU_CX, CPU_DX, CPU_AL));
                                   break;
                   }
           }
   #endif
   #if 0
           if (vect == 0xf5) {
                   TRACEOUT(("%.4x:%.4x INT-F5 AH=%.2x STACK=%.4x", CPU_CS, CPU_IP, 
                                                                   CPU_AH, MEML_READ16(CPU_SS, CPU_SP + 2)));
           }
   #endif
   #if 0
           if (vect == 0x69) {
                   TRACEOUT(("%.4x:%.4x INT-69 AX=%.4x", CPU_CS, CPU_IP, CPU_AX));
           }
   #endif
   #if 0
           if ((vect == 0x40) && (CPU_AX != 4)) {
                   TRACEOUT(("%.4x:%.4x INT-40 AX=%.4x", CPU_CS, CPU_IP, CPU_AX));
           }
   #endif
   #if 0
           if (vect == 0x7f) {
                   switch(CPU_AH) {
                           case 0:
                                   TRACEOUT(("INT-7F AH=00 Load data DS:DX = %.4x:%.4x", CPU_DS, CPU_DX));
                                   break;
   
                           case 1:
                                   TRACEOUT(("INT-7F AH=01 Play data AL=%.2x", CPU_AL));
                                   break;
   
                           case 2:
                                   TRACEOUT(("INT-7F AH=02 Stop Data"));
                                   break;
   
                           case 3:
                                   TRACEOUT(("INT-7F AH=03 Get Status"));
                                   break;
   
                           case 4:
                                   TRACEOUT(("INT-7F AH=04 Set Parameter AL=%.2x", CPU_AL));
                                   break;
                   }
           }
   #endif
   #if defined(TRACE)
           if (vect == 0x7f) {
                   UINT i, j;
                   switch(CPU_AH) {
                           case 0:
                                   TRACEOUT(("INT-7F AH=00 Load data DS:DX = %.4x:%.4x", CPU_DS, CPU_DX));
                                   for (i=0; i<16; i+=4) {
                                           char buf[256];
                                           for (j=0; j<4; j++) {
                                                   sprintf(buf + (j * 6), "0x%.2x, ",
                                                                                   MEML_READ8(CPU_DS, CPU_DX + i + j));
                                           }
                                           TRACEOUT(("%s", buf));
                                   }
                                   break;
   
                           case 1:
                                   TRACEOUT(("INT-7F AH=01 Play data AL=%.2x", CPU_AL));
                                   break;
   
                           case 2:
                                   TRACEOUT(("INT-7F AH=02 Stop Data"));
                                   break;
   
                           case 3:
   //                              TRACEOUT(("INT-7F AH=03 Get Status"));
                                   break;
   
                           case 4:
                                   TRACEOUT(("INT-7F AH=04 Set Parameter AL=%.2x", CPU_AL));
                                   break;
   
                           default:
                                   TRACEOUT(("INT-7F AH=%.2x", CPU_AH));
                                   break;
                   }
           }
   #endif
   #if 0 // defined(TRACE)
           if ((vect >= 0xa0) && (vect < 0xb0)) {
   extern void lio_look(UINT vect);
                   lio_look(vect);
           }
   #endif
         INT_NUM(vect, I286_IP);          INT_NUM(vect, I286_IP);
 }  }
   
Line 2186  I286FN _into(void) {      // CE: into Line 2506  I286FN _into(void) {      // CE: into
   
         I286_WORKCLOCK(4);          I286_WORKCLOCK(4);
         if (I286_OV) {          if (I286_OV) {
                 I286_WORKCLOCK(24 - 4);  
                 INT_NUM(4, I286_IP);                  INT_NUM(4, I286_IP);
         }          }
 }  }
   
 I286FN _iret(void) {                                            // CF:  iret  I286FN _iret(void) {                                            // CF:  iret
   
         extirq_pop();          UINT    flag;
         I286_WORKCLOCK(31);  
         REGPOP0(I286_IP)          REGPOP0(I286_IP)
         REGPOP0(I286_CS)          REGPOP0(I286_CS)
         REGPOP0(I286_FLAG)          REGPOP0(flag)
         I286_OV = I286_FLAG & O_FLAG;          I286_OV = flag & O_FLAG;
         I286_FLAG &= 0x7ff;          I286_FLAG = flag & (0xfff ^ O_FLAG);
         I286_TRAP = ((I286_FLAG & 0x300) == 0x300);          I286_TRAP = ((flag & 0x300) == 0x300);
         CS_BASE = I286_CS << 4;          CS_BASE = I286_CS << 4;
   //      CS_BASE = SEGSELECT(I286_CS);
           I286_WORKCLOCK(31);
   #if defined(INTR_FAST)
           if ((I286_TRAP) || ((flag & I_FLAG) && (PICEXISTINTR))) {
                   I286IRQCHECKTERM
           }
   #else
         I286IRQCHECKTERM          I286IRQCHECKTERM
   #endif
 }  }
   
 I286FN _shift_ea8_1(void) {                             // D0:  shift EA8, 1  I286FN _shift_ea8_1(void) {                             // D0:  shift EA8, 1
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT32  madr;          UINT32  madr;
   
Line 2253  I286FN _shift_ea16_1(void) {   // D1: sh Line 2580  I286FN _shift_ea16_1(void) {   // D1: sh
   
 I286FN _shift_ea8_cl(void) {                    // D2:  shift EA8, cl  I286FN _shift_ea8_cl(void) {                    // D2:  shift EA8, cl
   
         BYTE    *out;          UINT8   *out;
         UINT    op;          UINT    op;
         UINT32  madr;          UINT32  madr;
         BYTE    cl;          REG8    cl;
   
         GET_PCBYTE(op)          GET_PCBYTE(op)
         if (op >= 0xc0) {          if (op >= 0xc0) {
Line 2284  I286FN _shift_ea16_cl(void) {   // D3: s Line 2611  I286FN _shift_ea16_cl(void) {   // D3: s
         UINT16  *out;          UINT16  *out;
         UINT    op;          UINT    op;
         UINT32  madr;          UINT32  madr;
         BYTE    cl;          REG8    cl;
   
         GET_PCBYTE(op)          GET_PCBYTE(op)
         if (op >= 0xc0) {          if (op >= 0xc0) {
Line 2309  I286FN _shift_ea16_cl(void) {   // D3: s Line 2636  I286FN _shift_ea16_cl(void) {   // D3: s
   
 I286FN _aam(void) {                                                     // D4:  AAM  I286FN _aam(void) {                                                     // D4:  AAM
   
         BYTE    al;          UINT8   al;
         BYTE    div;          UINT8   div;
   
         I286_WORKCLOCK(16);          I286_WORKCLOCK(16);
         GET_PCBYTE(div);          GET_PCBYTE(div);
Line 2329  I286FN _aam(void) {       // D4: AAM Line 2656  I286FN _aam(void) {       // D4: AAM
   
 I286FN _aad(void) {                                                     // D5:  AAD  I286FN _aad(void) {                                                     // D5:  AAD
   
         BYTE    mul;          UINT8   mul;
   
         I286_WORKCLOCK(14);          I286_WORKCLOCK(14);
         GET_PCBYTE(mul);          GET_PCBYTE(mul);
         I286_AL += (BYTE)(I286_AH * mul);          I286_AL += (UINT8)(I286_AH * mul);
         I286_AH = 0;          I286_AH = 0;
         I286_FLAGL &= ~(S_FLAG | Z_FLAG | P_FLAG);          I286_FLAGL &= ~(S_FLAG | Z_FLAG | P_FLAG);
         I286_FLAGL |= BYTESZPF(I286_AL);          I286_FLAGL |= BYTESZPF(I286_AL);
Line 2390  I286FN _in_al_data8(void) {     // E4: i Line 2717  I286FN _in_al_data8(void) {     // E4: i
   
         I286_WORKCLOCK(5);          I286_WORKCLOCK(5);
         GET_PCBYTE(port)          GET_PCBYTE(port)
         i286reg.inport = CS_BASE + I286_IP;          I286_INPADRS = CS_BASE + I286_IP;
         I286_AL = iocore_inp8(port);          I286_AL = iocore_inp8(port);
         i286reg.inport = 0;          I286_INPADRS = 0;
 }  }
   
 I286FN _in_ax_data8(void) {                                     // E5:  in              ax, DATA8  I286FN _in_ax_data8(void) {                                     // E5:  in              ax, DATA8
Line 2448  I286FN _jmp_far(void) {      // EA: jmp  Line 2775  I286FN _jmp_far(void) {      // EA: jmp 
         I286_WORKCLOCK(11);          I286_WORKCLOCK(11);
         GET_PCWORD(ad);          GET_PCWORD(ad);
         GET_PCWORD(I286_CS);          GET_PCWORD(I286_CS);
         CS_BASE = I286_CS << 4;  
         I286_IP = ad;          I286_IP = ad;
           CS_BASE = SEGSELECT(I286_CS);
 }  }
   
 I286FN _jmp_short(void) {                                       // EB:  jmp short  I286FN _jmp_short(void) {                                       // EB:  jmp short
Line 2492  I286FN _lock(void) {      // F0: lock Line 2819  I286FN _lock(void) {      // F0: lock
   
 I286FN _repne(void) {                                           // F2:  repne  I286FN _repne(void) {                                           // F2:  repne
   
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op_repne[op]();                  i286op_repne[op]();
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 2506  I286FN _repne(void) {      // F2: repne Line 2833  I286FN _repne(void) {      // F2: repne
   
 I286FN _repe(void) {                                            // F3:  repe  I286FN _repe(void) {                                            // F3:  repe
   
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op_repe[op]();                  i286op_repe[op]();
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 2568  I286FN _cli(void) {       // FA: cli Line 2895  I286FN _cli(void) {       // FA: cli
 I286FN _sti(void) {                                                     // FB:  sti  I286FN _sti(void) {                                                     // FB:  sti
   
         I286_WORKCLOCK(2);          I286_WORKCLOCK(2);
   #if defined(INTR_FAST)
           if (I286_FLAG & I_FLAG) {
                   NEXT_OPCODE;
                   return;                                                                 // 更新の意味なし
           }
   #endif
         I286_FLAG |= I_FLAG;          I286_FLAG |= I_FLAG;
         I286_TRAP = (I286_FLAG & T_FLAG) >> 8;          // ToDo          I286_TRAP = (I286_FLAG & T_FLAG) >> 8;
   #if defined(INTR_FAST)
           if ((I286_TRAP) || (PICEXISTINTR)) {
                   REMAIN_ADJUST(1)
           }
           else {
                   NEXT_OPCODE;
           }
   #else
         REMAIN_ADJUST(1)          REMAIN_ADJUST(1)
   #endif
 }  }
   
 I286FN _cld(void) {                                                     // FC:  cld  I286FN _cld(void) {                                                     // FC:  cld
Line 2886  I286FN _repe_segprefix_es(void) { Line 3227  I286FN _repe_segprefix_es(void) {
   
         DS_FIX = ES_BASE;          DS_FIX = ES_BASE;
         SS_FIX = ES_BASE;          SS_FIX = ES_BASE;
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op_repe[op]();                  i286op_repe[op]();
                 REMOVE_PREFIX                  REMOVE_PREFIX
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 2903  I286FN _repe_segprefix_cs(void) { Line 3244  I286FN _repe_segprefix_cs(void) {
   
         DS_FIX = CS_BASE;          DS_FIX = CS_BASE;
         SS_FIX = CS_BASE;          SS_FIX = CS_BASE;
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op_repe[op]();                  i286op_repe[op]();
                 REMOVE_PREFIX                  REMOVE_PREFIX
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 2920  I286FN _repe_segprefix_ss(void) { Line 3261  I286FN _repe_segprefix_ss(void) {
   
         DS_FIX = SS_BASE;          DS_FIX = SS_BASE;
         SS_FIX = SS_BASE;          SS_FIX = SS_BASE;
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op_repe[op]();                  i286op_repe[op]();
                 REMOVE_PREFIX                  REMOVE_PREFIX
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 2937  I286FN _repe_segprefix_ds(void) { Line 3278  I286FN _repe_segprefix_ds(void) {
   
         DS_FIX = DS_BASE;          DS_FIX = DS_BASE;
         SS_FIX = DS_BASE;          SS_FIX = DS_BASE;
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op_repe[op]();                  i286op_repe[op]();
                 REMOVE_PREFIX                  REMOVE_PREFIX
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 3231  I286FN _repne_segprefix_es(void) { Line 3572  I286FN _repne_segprefix_es(void) {
   
         DS_FIX = ES_BASE;          DS_FIX = ES_BASE;
         SS_FIX = ES_BASE;          SS_FIX = ES_BASE;
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op_repne[op]();                  i286op_repne[op]();
                 REMOVE_PREFIX                  REMOVE_PREFIX
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 3248  I286FN _repne_segprefix_cs(void) { Line 3589  I286FN _repne_segprefix_cs(void) {
   
         DS_FIX = CS_BASE;          DS_FIX = CS_BASE;
         SS_FIX = CS_BASE;          SS_FIX = CS_BASE;
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op_repne[op]();                  i286op_repne[op]();
                 REMOVE_PREFIX                  REMOVE_PREFIX
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 3265  I286FN _repne_segprefix_ss(void) { Line 3606  I286FN _repne_segprefix_ss(void) {
   
         DS_FIX = SS_BASE;          DS_FIX = SS_BASE;
         SS_FIX = SS_BASE;          SS_FIX = SS_BASE;
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op_repne[op]();                  i286op_repne[op]();
                 REMOVE_PREFIX                  REMOVE_PREFIX
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);
Line 3282  I286FN _repne_segprefix_ds(void) { Line 3623  I286FN _repne_segprefix_ds(void) {
   
         DS_FIX = DS_BASE;          DS_FIX = DS_BASE;
         SS_FIX = DS_BASE;          SS_FIX = DS_BASE;
         i286reg.prefix++;          I286_PREFIX++;
         if (i286reg.prefix < MAX_PREFIX) {          if (I286_PREFIX < MAX_PREFIX) {
                 UINT op;                  UINT op;
                 GET_PCBYTE(op);                  GET_PCBYTE(op);
                 i286op_repne[op]();                  i286op_repne[op]();
                 REMOVE_PREFIX                  REMOVE_PREFIX
                 i286reg.prefix = 0;                  I286_PREFIX = 0;
         }          }
         else {          else {
                 INT_NUM(6, I286_IP);                  INT_NUM(6, I286_IP);

Removed from v.1.15  
changed lines
  Added in v.1.38


RetroPC.NET-CVS <cvs@retropc.net>