|
|
| version 1.12, 2003/11/24 09:14:01 | version 1.37, 2005/02/07 14:46:10 |
|---|---|
| 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 51 I286FN _add_ea_r8(void) { // 00: ad | Line 50 I286FN _add_ea_r8(void) { // 00: ad |
| if (madr >= I286_MEMWRITEMAX) { | if (madr >= I286_MEMWRITEMAX) { |
| dst = i286_memoryread(madr); | dst = i286_memoryread(madr); |
| ADDBYTE(res, dst, src); | ADDBYTE(res, dst, src); |
| i286_memorywrite(madr, (BYTE)res); | i286_memorywrite(madr, (REG8)res); |
| return; | return; |
| } | } |
| out = mem + madr; | out = mem + madr; |
| } | } |
| 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 81 I286FN _add_ea_r16(void) { // 01: a | Line 80 I286FN _add_ea_r16(void) { // 01: a |
| if (INHIBIT_WORDP(madr)) { | if (INHIBIT_WORDP(madr)) { |
| dst = i286_memoryread_w(madr); | dst = i286_memoryread_w(madr); |
| ADDWORD(res, dst, src); | ADDWORD(res, dst, src); |
| i286_memorywrite_w(madr, (UINT16)res); | i286_memorywrite_w(madr, (REG16)res); |
| return; | return; |
| } | } |
| out = (UINT16 *)(mem + madr); | out = (UINT16 *)(mem + madr); |
| 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 171 I286FN _or_ea_r8(void) { // 08: or | Line 173 I286FN _or_ea_r8(void) { // 08: or |
| if (madr >= I286_MEMWRITEMAX) { | if (madr >= I286_MEMWRITEMAX) { |
| dst = i286_memoryread(madr); | dst = i286_memoryread(madr); |
| ORBYTE(dst, src); | ORBYTE(dst, src); |
| i286_memorywrite(madr, (BYTE)dst); | i286_memorywrite(madr, (REG8)dst); |
| return; | return; |
| } | } |
| out = mem + madr; | out = mem + madr; |
| } | } |
| ORBYTE(*out, src); | dst = *out; |
| ORBYTE(dst, src); | |
| *out = (UINT8)dst; | |
| } | } |
| I286FN _or_ea_r16(void) { // 09: or EA, REG16 | I286FN _or_ea_r16(void) { // 09: or EA, REG16 |
| Line 198 I286FN _or_ea_r16(void) { // 09: o | Line 202 I286FN _or_ea_r16(void) { // 09: o |
| if (INHIBIT_WORDP(madr)) { | if (INHIBIT_WORDP(madr)) { |
| dst = i286_memoryread_w(madr); | dst = i286_memoryread_w(madr); |
| ORWORD(dst, src); | ORWORD(dst, src); |
| i286_memorywrite_w(madr, (UINT16)dst); | i286_memorywrite_w(madr, (REG16)dst); |
| return; | return; |
| } | } |
| out = (UINT16 *)(mem + madr); | out = (UINT16 *)(mem + madr); |
| } | } |
| ORWORD(*out, src); | dst = *out; |
| ORWORD(dst, src); | |
| *out = (UINT16)dst; | |
| } | } |
| 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; | |
| PREPART_REG8_EA(op, src, out, 2, 7); | PREPART_REG8_EA(op, src, out, 2, 7); |
| ORBYTE(*out, src); | dst = *out; |
| ORBYTE(dst, src); | |
| *out = (UINT8)dst; | |
| } | } |
| I286FN _or_r16_ea(void) { // 0b: or REG16, EA | I286FN _or_r16_ea(void) { // 0b: or REG16, EA |
| Line 221 I286FN _or_r16_ea(void) { // 0b: or | Line 230 I286FN _or_r16_ea(void) { // 0b: or |
| UINT16 *out; | UINT16 *out; |
| UINT op; | UINT op; |
| UINT32 src; | UINT32 src; |
| UINT32 dst; | |
| PREPART_REG16_EA(op, src, out, 2, 7); | PREPART_REG16_EA(op, src, out, 2, 7); |
| ORWORD(*out, src); | dst = *out; |
| ORWORD(dst, src); | |
| *out = (UINT16)dst; | |
| } | } |
| I286FN _or_al_data8(void) { // 0c: or al, DATA8 | I286FN _or_al_data8(void) { // 0c: or al, DATA8 |
| UINT src; | UINT src; |
| UINT dst; | |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| GET_PCBYTE(src); | GET_PCBYTE(src); |
| ORBYTE(I286_AL, src); | dst = I286_AL; |
| ORBYTE(dst, src); | |
| I286_AL = (UINT8)dst; | |
| } | } |
| I286FN _or_ax_data16(void) { // 0d: or ax, DATA16 | I286FN _or_ax_data16(void) { // 0d: or ax, DATA16 |
| UINT32 src; | UINT32 src; |
| UINT32 dst; | |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| GET_PCWORD(src); | GET_PCWORD(src); |
| ORWORD(I286_AX, src); | dst = I286_AX; |
| ORWORD(dst, src); | |
| I286_AX = (UINT16)dst; | |
| } | } |
| I286FN _push_cs(void) { // 0e: push cs | I286FN _push_cs(void) { // 0e: push cs |
| Line 251 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 269 I286FN _adc_ea_r8(void) { // 10: ad | Line 287 I286FN _adc_ea_r8(void) { // 10: ad |
| if (madr >= I286_MEMWRITEMAX) { | if (madr >= I286_MEMWRITEMAX) { |
| dst = i286_memoryread(madr); | dst = i286_memoryread(madr); |
| ADCBYTE(res, dst, src); | ADCBYTE(res, dst, src); |
| i286_memorywrite(madr, (BYTE)res); | i286_memorywrite(madr, (REG8)res); |
| return; | return; |
| } | } |
| out = mem + madr; | out = mem + madr; |
| } | } |
| 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 299 I286FN _adc_ea_r16(void) { // 11: a | Line 317 I286FN _adc_ea_r16(void) { // 11: a |
| if (INHIBIT_WORDP(madr)) { | if (INHIBIT_WORDP(madr)) { |
| dst = i286_memoryread_w(madr); | dst = i286_memoryread_w(madr); |
| ADCWORD(res, dst, src); | ADCWORD(res, dst, src); |
| i286_memorywrite_w(madr, (UINT16)res); | i286_memorywrite_w(madr, (REG16)res); |
| return; | return; |
| } | } |
| out = (UINT16 *)(mem + madr); | out = (UINT16 *)(mem + madr); |
| Line 311 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 320 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 345 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 366 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 392 I286FN _sbb_ea_r8(void) { // 18: sb | Line 413 I286FN _sbb_ea_r8(void) { // 18: sb |
| if (madr >= I286_MEMWRITEMAX) { | if (madr >= I286_MEMWRITEMAX) { |
| dst = i286_memoryread(madr); | dst = i286_memoryread(madr); |
| SBBBYTE(res, dst, src); | SBBBYTE(res, dst, src); |
| i286_memorywrite(madr, (BYTE)res); | i286_memorywrite(madr, (REG8)res); |
| return; | return; |
| } | } |
| out = mem + madr; | out = mem + madr; |
| } | } |
| 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 422 I286FN _sbb_ea_r16(void) { // 19: s | Line 443 I286FN _sbb_ea_r16(void) { // 19: s |
| if (INHIBIT_WORDP(madr)) { | if (INHIBIT_WORDP(madr)) { |
| dst = i286_memoryread_w(madr); | dst = i286_memoryread_w(madr); |
| SBBWORD(res, dst, src); | SBBWORD(res, dst, src); |
| i286_memorywrite_w(madr, (UINT16)res); | i286_memorywrite_w(madr, (REG16)res); |
| return; | return; |
| } | } |
| out = (UINT16 *)(mem + madr); | out = (UINT16 *)(mem + madr); |
| Line 434 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 443 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 468 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 489 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 513 I286FN _and_ea_r8(void) { // 20: an | Line 537 I286FN _and_ea_r8(void) { // 20: an |
| if (madr >= I286_MEMWRITEMAX) { | if (madr >= I286_MEMWRITEMAX) { |
| dst = i286_memoryread(madr); | dst = i286_memoryread(madr); |
| ANDBYTE(dst, src); | ANDBYTE(dst, src); |
| i286_memorywrite(madr, (BYTE)dst); | i286_memorywrite(madr, (REG8)dst); |
| return; | return; |
| } | } |
| out = mem + madr; | out = mem + madr; |
| } | } |
| ANDBYTE(*out, src); | dst = *out; |
| ANDBYTE(dst, src); | |
| *out = (UINT8)dst; | |
| } | } |
| I286FN _and_ea_r16(void) { // 21: and EA, REG16 | I286FN _and_ea_r16(void) { // 21: and EA, REG16 |
| Line 540 I286FN _and_ea_r16(void) { // 21: a | Line 566 I286FN _and_ea_r16(void) { // 21: a |
| if (INHIBIT_WORDP(madr)) { | if (INHIBIT_WORDP(madr)) { |
| dst = i286_memoryread_w(madr); | dst = i286_memoryread_w(madr); |
| ANDWORD(dst, src); | ANDWORD(dst, src); |
| i286_memorywrite_w(madr, (UINT16)dst); | i286_memorywrite_w(madr, (REG16)dst); |
| return; | return; |
| } | } |
| out = (UINT16 *)(mem + madr); | out = (UINT16 *)(mem + madr); |
| } | } |
| ANDWORD(*out, src); | dst = *out; |
| ANDWORD(dst, src); | |
| *out = (UINT16)dst; | |
| } | } |
| 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; | |
| PREPART_REG8_EA(op, src, out, 2, 7); | PREPART_REG8_EA(op, src, out, 2, 7); |
| ANDBYTE(*out, src); | dst = *out; |
| ANDBYTE(dst, src); | |
| *out = (UINT8)dst; | |
| } | } |
| I286FN _and_r16_ea(void) { // 23: and REG16, EA | I286FN _and_r16_ea(void) { // 23: and REG16, EA |
| Line 563 I286FN _and_r16_ea(void) { // 23: a | Line 594 I286FN _and_r16_ea(void) { // 23: a |
| UINT16 *out; | UINT16 *out; |
| UINT op; | UINT op; |
| UINT32 src; | UINT32 src; |
| UINT32 dst; | |
| PREPART_REG16_EA(op, src, out, 2, 7); | PREPART_REG16_EA(op, src, out, 2, 7); |
| ANDWORD(*out, src); | dst = *out; |
| ANDWORD(dst, src); | |
| *out = (UINT16)dst; | |
| } | } |
| I286FN _and_al_data8(void) { // 24: and al, DATA8 | I286FN _and_al_data8(void) { // 24: and al, DATA8 |
| UINT src; | UINT src; |
| UINT dst; | |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| GET_PCBYTE(src); | GET_PCBYTE(src); |
| ANDBYTE(I286_AL, src); | dst = I286_AL; |
| ANDBYTE(dst, src); | |
| I286_AL = (UINT8)dst; | |
| } | } |
| I286FN _and_ax_data16(void) { // 25: and ax, DATA16 | I286FN _and_ax_data16(void) { // 25: and ax, DATA16 |
| UINT32 src; | UINT32 src; |
| UINT32 dst; | |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| GET_PCWORD(src); | GET_PCWORD(src); |
| ANDWORD(I286_AX, src); | dst = I286_AX; |
| ANDWORD(dst, src); | |
| I286_AX = (UINT16)dst; | |
| } | } |
| I286FN _segprefix_es(void) { // 26: es: | I286FN _segprefix_es(void) { // 26: es: |
| 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 611 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 619 I286FN _daa(void) { // 27: daa | Line 659 I286FN _daa(void) { // 27: daa |
| I286_AL += 0x60; | I286_AL += 0x60; |
| } | } |
| I286_FLAGL &= A_FLAG | C_FLAG; | I286_FLAGL &= A_FLAG | C_FLAG; |
| I286_FLAGL |= szpcflag[I286_AL]; | I286_FLAGL |= BYTESZPF(I286_AL); |
| } | } |
| 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 641 I286FN _sub_ea_r8(void) { // 28: su | Line 681 I286FN _sub_ea_r8(void) { // 28: su |
| madr = CALC_EA(op); | madr = CALC_EA(op); |
| if (madr >= I286_MEMWRITEMAX) { | if (madr >= I286_MEMWRITEMAX) { |
| dst = i286_memoryread(madr); | dst = i286_memoryread(madr); |
| BYTE_SUB(res, dst, src); | SUBBYTE(res, dst, src); |
| i286_memorywrite(madr, (BYTE)res); | i286_memorywrite(madr, (REG8)res); |
| return; | return; |
| } | } |
| out = mem + madr; | out = mem + madr; |
| } | } |
| dst = *out; | dst = *out; |
| BYTE_SUB(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 671 I286FN _sub_ea_r16(void) { // 29: s | Line 711 I286FN _sub_ea_r16(void) { // 29: s |
| madr = CALC_EA(op); | madr = CALC_EA(op); |
| if (INHIBIT_WORDP(madr)) { | if (INHIBIT_WORDP(madr)) { |
| dst = i286_memoryread_w(madr); | dst = i286_memoryread_w(madr); |
| WORD_SUB(res, dst, src); | SUBWORD(res, dst, src); |
| i286_memorywrite_w(madr, (UINT16)res); | i286_memorywrite_w(madr, (REG16)res); |
| return; | return; |
| } | } |
| out = (UINT16 *)(mem + madr); | out = (UINT16 *)(mem + madr); |
| } | } |
| dst = *out; | dst = *out; |
| WORD_SUB(res, dst, src); | SUBWORD(res, dst, src); |
| *out = (UINT16)res; | *out = (UINT16)res; |
| } | } |
| 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 692 I286FN _sub_r8_ea(void) { // 2a: su | Line 732 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; |
| BYTE_SUB(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 706 I286FN _sub_r16_ea(void) { // 2b: s | Line 746 I286FN _sub_r16_ea(void) { // 2b: s |
| PREPART_REG16_EA(op, src, out, 2, 7); | PREPART_REG16_EA(op, src, out, 2, 7); |
| dst = *out; | dst = *out; |
| WORD_SUB(res, dst, src); | SUBWORD(res, dst, src); |
| *out = (UINT16)res; | *out = (UINT16)res; |
| } | } |
| Line 717 I286FN _sub_al_data8(void) { // 2c: | Line 757 I286FN _sub_al_data8(void) { // 2c: |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| GET_PCBYTE(src); | GET_PCBYTE(src); |
| BYTE_SUB(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 728 I286FN _sub_ax_data16(void) { // 2d: | Line 768 I286FN _sub_ax_data16(void) { // 2d: |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| GET_PCWORD(src); | GET_PCWORD(src); |
| WORD_SUB(res, I286_AX, src); | SUBWORD(res, I286_AX, src); |
| I286_AX = (UINT16)res; | I286_AX = (UINT16)res; |
| } | } |
| Line 736 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 762 I286FN _das(void) { // 2f: das | Line 802 I286FN _das(void) { // 2f: das |
| I286_AL -= 6; | I286_AL -= 6; |
| } | } |
| I286_FLAGL &= A_FLAG | C_FLAG; | I286_FLAGL &= A_FLAG | C_FLAG; |
| I286_FLAGL |= szpcflag[I286_AL]; | I286_FLAGL |= BYTESZPF(I286_AL); |
| } | } |
| 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 783 I286FN _xor_ea_r8(void) { // 30: xo | Line 823 I286FN _xor_ea_r8(void) { // 30: xo |
| madr = CALC_EA(op); | madr = CALC_EA(op); |
| if (madr >= I286_MEMWRITEMAX) { | if (madr >= I286_MEMWRITEMAX) { |
| dst = i286_memoryread(madr); | dst = i286_memoryread(madr); |
| BYTE_XOR(dst, src); | XORBYTE(dst, src); |
| i286_memorywrite(madr, (BYTE)dst); | i286_memorywrite(madr, (REG8)dst); |
| return; | return; |
| } | } |
| out = mem + madr; | out = mem + madr; |
| } | } |
| BYTE_XOR(*out, src); | dst = *out; |
| XORBYTE(dst, src); | |
| *out = (UINT8)dst; | |
| } | } |
| I286FN _xor_ea_r16(void) { // 31: xor EA, REG16 | I286FN _xor_ea_r16(void) { // 31: xor EA, REG16 |
| Line 810 I286FN _xor_ea_r16(void) { // 31: x | Line 852 I286FN _xor_ea_r16(void) { // 31: x |
| madr = CALC_EA(op); | madr = CALC_EA(op); |
| if (INHIBIT_WORDP(madr)) { | if (INHIBIT_WORDP(madr)) { |
| dst = i286_memoryread_w(madr); | dst = i286_memoryread_w(madr); |
| WORD_XOR(dst, src); | XORWORD(dst, src); |
| i286_memorywrite_w(madr, (UINT16)dst); | i286_memorywrite_w(madr, (REG16)dst); |
| return; | return; |
| } | } |
| out = (UINT16 *)(mem + madr); | out = (UINT16 *)(mem + madr); |
| } | } |
| WORD_XOR(*out, src); | dst = *out; |
| XORWORD(dst, src); | |
| *out = (UINT16)dst; | |
| } | } |
| 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; | |
| PREPART_REG8_EA(op, src, out, 2, 7); | PREPART_REG8_EA(op, src, out, 2, 7); |
| BYTE_XOR(*out, src); | dst = *out; |
| XORBYTE(dst, src); | |
| *out = (UINT8)dst; | |
| } | } |
| I286FN _xor_r16_ea(void) { // 33: or REG16, EA | I286FN _xor_r16_ea(void) { // 33: or REG16, EA |
| Line 834 I286FN _xor_r16_ea(void) { // 33: o | Line 881 I286FN _xor_r16_ea(void) { // 33: o |
| UINT16 *out; | UINT16 *out; |
| UINT op; | UINT op; |
| UINT32 src; | UINT32 src; |
| UINT32 dst; | |
| PREPART_REG16_EA(op, src, out, 2, 7); | PREPART_REG16_EA(op, src, out, 2, 7); |
| WORD_XOR(*out, src); | dst = *out; |
| XORWORD(dst, src); | |
| *out = (UINT16)dst; | |
| } | } |
| I286FN _xor_al_data8(void) { // 34: or al, DATA8 | I286FN _xor_al_data8(void) { // 34: or al, DATA8 |
| UINT src; | UINT src; |
| UINT dst; | |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| GET_PCBYTE(src); | GET_PCBYTE(src); |
| BYTE_XOR(I286_AL, src); | dst = I286_AL; |
| XORBYTE(dst, src); | |
| I286_AL = (UINT8)dst; | |
| } | } |
| I286FN _xor_ax_data16(void) { // 35: or ax, DATA16 | I286FN _xor_ax_data16(void) { // 35: or ax, DATA16 |
| UINT32 src; | UINT32 src; |
| UINT32 dst; | |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| GET_PCWORD(src); | GET_PCWORD(src); |
| WORD_XOR(I286_AX, src); | dst = I286_AX; |
| XORWORD(dst, src); | |
| I286_AX = (UINT16)dst; | |
| } | } |
| I286FN _segprefix_ss(void) { // 36: ss: | I286FN _segprefix_ss(void) { // 36: ss: |
| 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 885 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 898 I286FN _cmp_ea_r8(void) { // 38: cm | Line 955 I286FN _cmp_ea_r8(void) { // 38: cm |
| if (op >= 0xc0) { | if (op >= 0xc0) { |
| I286_WORKCLOCK(2); | I286_WORKCLOCK(2); |
| dst = *(REG8_B20(op)); | dst = *(REG8_B20(op)); |
| BYTE_SUB(res, dst, src); | SUBBYTE(res, dst, src); |
| } | } |
| else { | else { |
| I286_WORKCLOCK(7); | I286_WORKCLOCK(7); |
| dst = i286_memoryread(CALC_EA(op)); | dst = i286_memoryread(CALC_EA(op)); |
| BYTE_SUB(res, dst, src); | SUBBYTE(res, dst, src); |
| } | } |
| } | } |
| Line 918 I286FN _cmp_ea_r16(void) { // 39: c | Line 975 I286FN _cmp_ea_r16(void) { // 39: c |
| if (op >= 0xc0) { | if (op >= 0xc0) { |
| I286_WORKCLOCK(2); | I286_WORKCLOCK(2); |
| dst = *(REG16_B20(op)); | dst = *(REG16_B20(op)); |
| WORD_SUB(res, dst, src); | SUBWORD(res, dst, src); |
| } | } |
| else { | else { |
| I286_WORKCLOCK(7); | I286_WORKCLOCK(7); |
| dst = i286_memoryread_w(CALC_EA(op)); | dst = i286_memoryread_w(CALC_EA(op)); |
| WORD_SUB(res, dst, src); | SUBWORD(res, dst, src); |
| } | } |
| } | } |
| 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 937 I286FN _cmp_r8_ea(void) { // 3a: cm | Line 994 I286FN _cmp_r8_ea(void) { // 3a: cm |
| PREPART_REG8_EA(op, src, out, 2, 6); | PREPART_REG8_EA(op, src, out, 2, 6); |
| dst = *out; | dst = *out; |
| BYTE_SUB(res, dst, src); | SUBBYTE(res, dst, src); |
| } | } |
| I286FN _cmp_r16_ea(void) { // 3b: cmp REG16, EA | I286FN _cmp_r16_ea(void) { // 3b: cmp REG16, EA |
| Line 950 I286FN _cmp_r16_ea(void) { // 3b: c | Line 1007 I286FN _cmp_r16_ea(void) { // 3b: c |
| PREPART_REG16_EA(op, src, out, 2, 6); | PREPART_REG16_EA(op, src, out, 2, 6); |
| dst = *out; | dst = *out; |
| WORD_SUB(res, dst, src); | SUBWORD(res, dst, src); |
| } | } |
| I286FN _cmp_al_data8(void) { // 3c: cmp al, DATA8 | I286FN _cmp_al_data8(void) { // 3c: cmp al, DATA8 |
| Line 960 I286FN _cmp_al_data8(void) { // 3c: | Line 1017 I286FN _cmp_al_data8(void) { // 3c: |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| GET_PCBYTE(src); | GET_PCBYTE(src); |
| BYTE_SUB(res, I286_AL, src); | SUBBYTE(res, I286_AL, src); |
| } | } |
| I286FN _cmp_ax_data16(void) { // 3d: cmp ax, DATA16 | I286FN _cmp_ax_data16(void) { // 3d: cmp ax, DATA16 |
| Line 970 I286FN _cmp_ax_data16(void) { // 3d: | Line 1027 I286FN _cmp_ax_data16(void) { // 3d: |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| GET_PCWORD(src); | GET_PCWORD(src); |
| WORD_SUB(res, I286_AX, src); | SUBWORD(res, I286_AX, src); |
| } | } |
| I286FN _segprefix_ds(void) { // 3e: ds: | I286FN _segprefix_ds(void) { // 3e: ds: |
| 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 1003 I286FN _aas(void) { // 3f: aas | Line 1060 I286FN _aas(void) { // 3f: aas |
| } | } |
| } | } |
| I286FN _inc_ax(void) INCWORD(I286_AX, 2) // 40: inc ax | I286FN _inc_ax(void) INCWORD2(I286_AX, 2) // 40: inc ax |
| I286FN _inc_cx(void) INCWORD(I286_CX, 2) // 41: inc cx | I286FN _inc_cx(void) INCWORD2(I286_CX, 2) // 41: inc cx |
| I286FN _inc_dx(void) INCWORD(I286_DX, 2) // 42: inc dx | I286FN _inc_dx(void) INCWORD2(I286_DX, 2) // 42: inc dx |
| I286FN _inc_bx(void) INCWORD(I286_BX, 2) // 43: inc bx | I286FN _inc_bx(void) INCWORD2(I286_BX, 2) // 43: inc bx |
| I286FN _inc_sp(void) INCWORD(I286_SP, 2) // 44: inc sp | I286FN _inc_sp(void) INCWORD2(I286_SP, 2) // 44: inc sp |
| I286FN _inc_bp(void) INCWORD(I286_BP, 2) // 45: inc bp | I286FN _inc_bp(void) INCWORD2(I286_BP, 2) // 45: inc bp |
| I286FN _inc_si(void) INCWORD(I286_SI, 2) // 46: inc si | I286FN _inc_si(void) INCWORD2(I286_SI, 2) // 46: inc si |
| I286FN _inc_di(void) INCWORD(I286_DI, 2) // 47: inc di | I286FN _inc_di(void) INCWORD2(I286_DI, 2) // 47: inc di |
| I286FN _dec_ax(void) DECWORD(I286_AX, 2) // 48: dec ax | I286FN _dec_ax(void) DECWORD2(I286_AX, 2) // 48: dec ax |
| I286FN _dec_cx(void) DECWORD(I286_CX, 2) // 49: dec cx | I286FN _dec_cx(void) DECWORD2(I286_CX, 2) // 49: dec cx |
| I286FN _dec_dx(void) DECWORD(I286_DX, 2) // 4a: dec dx | I286FN _dec_dx(void) DECWORD2(I286_DX, 2) // 4a: dec dx |
| I286FN _dec_bx(void) DECWORD(I286_BX, 2) // 4b: dec bx | I286FN _dec_bx(void) DECWORD2(I286_BX, 2) // 4b: dec bx |
| I286FN _dec_sp(void) DECWORD(I286_SP, 2) // 4c: dec sp | I286FN _dec_sp(void) DECWORD2(I286_SP, 2) // 4c: dec sp |
| I286FN _dec_bp(void) DECWORD(I286_BP, 2) // 4d: dec bp | I286FN _dec_bp(void) DECWORD2(I286_BP, 2) // 4d: dec bp |
| I286FN _dec_si(void) DECWORD(I286_SI, 2) // 4e: dec si | I286FN _dec_si(void) DECWORD2(I286_SI, 2) // 4e: dec si |
| I286FN _dec_di(void) DECWORD(I286_DI, 2) // 4f: dec di | I286FN _dec_di(void) DECWORD2(I286_DI, 2) // 4f: dec di |
| I286FN _push_ax(void) REGPUSH(I286_AX, 3) // 50: push ax | I286FN _push_ax(void) REGPUSH(I286_AX, 3) // 50: push ax |
| I286FN _push_cx(void) REGPUSH(I286_CX, 3) // 51: push cx | I286FN _push_cx(void) REGPUSH(I286_CX, 3) // 51: push cx |
| Line 1037 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 1066 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; |
| UINT op; | UINT op; |
| UINT32 madr; | UINT32 madr; |
| UINT16 reg; | REG16 reg; |
| I286_WORKCLOCK(13); // ToDo | I286_WORKCLOCK(13); // ToDo |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| Line 1079 I286FN _bound(void) { // 62: bound | Line 1203 I286FN _bound(void) { // 62: bound |
| reg = *(REG16_B53(op)); | reg = *(REG16_B53(op)); |
| madr = CALC_EA(op); | madr = CALC_EA(op); |
| if (reg >= i286_memoryread_w(madr)) { | if (reg >= i286_memoryread_w(madr)) { |
| madr += 2; // ToDo | madr += 2; // ToDo |
| if (reg <= i286_memoryread_w(madr)) { | if (reg <= i286_memoryread_w(madr)) { |
| return; | return; |
| } | } |
| Line 1099 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 1150 I286FN _imul_reg_ea_data8(void) { // 6B | Line 1274 I286FN _imul_reg_ea_data8(void) { // 6B |
| I286FN _insb(void) { // 6C: insb | I286FN _insb(void) { // 6C: insb |
| BYTE dat; | REG8 dat; |
| I286_WORKCLOCK(5); | I286_WORKCLOCK(5); |
| dat = iocore_inp8(I286_DX); | dat = iocore_inp8(I286_DX); |
| Line 1160 I286FN _insb(void) { // 6C: insb | Line 1284 I286FN _insb(void) { // 6C: insb |
| I286FN _insw(void) { // 6D: insw | I286FN _insw(void) { // 6D: insw |
| UINT16 dat; | REG16 dat; |
| I286_WORKCLOCK(5); | I286_WORKCLOCK(5); |
| dat = iocore_inp16(I286_DX); | dat = iocore_inp16(I286_DX); |
| Line 1170 I286FN _insw(void) { // 6D: insw | Line 1294 I286FN _insw(void) { // 6D: insw |
| I286FN _outsb(void) { // 6E: outsb | I286FN _outsb(void) { // 6E: outsb |
| BYTE dat; | REG8 dat; |
| 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, dat); | iocore_out8(I286_DX, (UINT8)dat); |
| } | } |
| I286FN _outsw(void) { // 6F: outsw | I286FN _outsw(void) { // 6F: outsw |
| UINT16 dat; | REG16 dat; |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| dat = i286_memoryread_w(I286_SI + DS_FIX); | dat = i286_memoryread_w(I286_SI + DS_FIX); |
| I286_SI += STRING_DIRx2; | I286_SI += STRING_DIRx2; |
| iocore_out16(I286_DX, dat); | iocore_out16(I286_DX, (UINT16)dat); |
| } | } |
| I286FN _jo_short(void) { // 70: jo short | I286FN _jo_short(void) { // 70: jo short |
| Line 1275 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 1350 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 1404 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 1418 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 1456 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 1490 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 1543 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 1555 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 1602 I286FN _nop(void) { // 90: nop / b | Line 1728 I286FN _nop(void) { // 90: nop / b |
| #if 1 // call BIOS | #if 1 // call BIOS |
| UINT32 adrs; | UINT32 adrs; |
| adrs = ((I286_IP - 1) & 0xffff) + CS_BASE; | adrs = LOW16(I286_IP - 1) + CS_BASE; |
| if ((adrs >= 0xf8000) && (adrs < 0x100000)) { | if ((adrs >= 0xf8000) && (adrs < 0x100000)) { |
| biosfunc(adrs); | biosfunc(adrs); |
| ES_BASE = I286_ES << 4; | ES_BASE = I286_ES << 4; |
| Line 1678 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 1695 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 1753 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 1782 I286FN _cmpsb(void) { // A6: cmpsb | Line 1916 I286FN _cmpsb(void) { // A6: cmpsb |
| I286_WORKCLOCK(8); | I286_WORKCLOCK(8); |
| dst = i286_memoryread(I286_SI + DS_FIX); | dst = i286_memoryread(I286_SI + DS_FIX); |
| src = i286_memoryread(I286_DI + ES_BASE); | src = i286_memoryread(I286_DI + ES_BASE); |
| BYTE_SUB(res, dst, src) | SUBBYTE(res, dst, src) |
| I286_SI += STRING_DIR; | I286_SI += STRING_DIR; |
| I286_DI += STRING_DIR; | I286_DI += STRING_DIR; |
| } | } |
| Line 1796 I286FN _cmpsw(void) { // A7: cmpsw | Line 1930 I286FN _cmpsw(void) { // A7: cmpsw |
| I286_WORKCLOCK(8); | I286_WORKCLOCK(8); |
| dst = i286_memoryread_w(I286_SI + DS_FIX); | dst = i286_memoryread_w(I286_SI + DS_FIX); |
| src = i286_memoryread_w(I286_DI + ES_BASE); | src = i286_memoryread_w(I286_DI + ES_BASE); |
| WORD_SUB(res, dst, src) | SUBWORD(res, dst, src) |
| I286_SI += STRING_DIRx2; | I286_SI += STRING_DIRx2; |
| I286_DI += STRING_DIRx2; | I286_DI += STRING_DIRx2; |
| } | } |
| Line 1860 I286FN _scasb(void) { // AE: scasb | Line 1994 I286FN _scasb(void) { // AE: scasb |
| I286_WORKCLOCK(7); | I286_WORKCLOCK(7); |
| src = i286_memoryread(I286_DI + ES_BASE); | src = i286_memoryread(I286_DI + ES_BASE); |
| dst = I286_AL; | dst = I286_AL; |
| BYTE_SUB(res, dst, src) | SUBBYTE(res, dst, src) |
| I286_DI += STRING_DIR; | I286_DI += STRING_DIR; |
| } | } |
| Line 1873 I286FN _scasw(void) { // AF: scasw | Line 2007 I286FN _scasw(void) { // AF: scasw |
| I286_WORKCLOCK(7); | I286_WORKCLOCK(7); |
| src = i286_memoryread_w(I286_DI + ES_BASE); | src = i286_memoryread_w(I286_DI + ES_BASE); |
| dst = I286_AX; | dst = I286_AX; |
| WORD_SUB(res, dst, src) | SUBWORD(res, dst, src) |
| I286_DI += STRING_DIRx2; | I286_DI += STRING_DIRx2; |
| } | } |
| Line 1896 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 1927 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 1970 I286FN _les_r16_ea(void) { // C4: le | Line 2104 I286FN _les_r16_ea(void) { // C4: le |
| UINT op; | UINT op; |
| UINT32 seg; | UINT32 seg; |
| UINT16 ad; | UINT ad; |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| GET_PCBYTE(op) | GET_PCBYTE(op) |
| if (op < 0xc0) { | if (op < 0xc0) { |
| 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); |
| ad += 2; | I286_ES = i286_memoryread_w(seg + LOW16(ad + 2)); |
| I286_ES = i286_memoryread_w(seg + ad); | ES_BASE = SEGSELECT(I286_ES); |
| ES_BASE = I286_ES << 4; | |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP - 2); | INT_NUM(6, I286_IP - 2); |
| Line 1990 I286FN _lds_r16_ea(void) { // C5: ld | Line 2123 I286FN _lds_r16_ea(void) { // C5: ld |
| UINT op; | UINT op; |
| UINT32 seg; | UINT32 seg; |
| UINT16 ad; | UINT ad; |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| GET_PCBYTE(op) | GET_PCBYTE(op) |
| if (op < 0xc0) { | if (op < 0xc0) { |
| 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); |
| ad += 2; | I286_DS = i286_memoryread_w(seg + LOW16(ad + 2)); |
| I286_DS = i286_memoryread_w(seg + ad); | DS_BASE = SEGSELECT(I286_DS); |
| DS_BASE = I286_DS << 4; | |
| DS_FIX = DS_BASE; | DS_FIX = DS_BASE; |
| } | } |
| else { | else { |
| Line 2016 I286FN _mov_ea8_data8(void) { // C6: | Line 2148 I286FN _mov_ea8_data8(void) { // C6: |
| I286_WORKCLOCK(2); | I286_WORKCLOCK(2); |
| GET_PCBYTE(*(REG8_B53(op))) | GET_PCBYTE(*(REG8_B53(op))) |
| } | } |
| else { | else { // 03/11/23 |
| #if 1 // 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) |
| i286_memorywrite(ad, val); | i286_memorywrite(ad, val); |
| #else | |
| UINT ad; | |
| BYTE val; | |
| I286_WORKCLOCK(3); | |
| ad = c_get_ea[op](); | |
| GET_PCBYTE(val) | |
| i286_memorywrite(ad + EA_FIX, val); | |
| #endif | |
| } | } |
| } | } |
| Line 2044 I286FN _mov_ea16_data16(void) { // C7 | Line 2167 I286FN _mov_ea16_data16(void) { // C7 |
| I286_WORKCLOCK(2); | I286_WORKCLOCK(2); |
| GET_PCWORD(*(REG16_B53(op))) | GET_PCWORD(*(REG16_B53(op))) |
| } | } |
| else { | else { // 03/11/23 |
| #if 1 // 03/11/23 | |
| UINT32 ad; | UINT32 ad; |
| UINT16 val; | UINT16 val; |
| I286_WORKCLOCK(3); | I286_WORKCLOCK(3); |
| ad = CALC_EA(op); | ad = CALC_EA(op); |
| GET_PCWORD(val) | GET_PCWORD(val) |
| i286_memorywrite_w(ad, val); | i286_memorywrite_w(ad, val); |
| #else | |
| UINT ad; | |
| UINT16 val; | |
| I286_WORKCLOCK(3); | |
| ad = c_get_ea[op](); | |
| GET_PCWORD(val) | |
| i286_memorywrite_w(ad + EA_FIX, val); | |
| #endif | |
| } | } |
| } | } |
| 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 2094 I286FN _enter(void) { // C8: enter | Line 2208 I286FN _enter(void) { // C8: enter |
| I286_BP = I286_SP; | I286_BP = I286_SP; |
| while(level--) { | while(level--) { |
| #if 1 // なにやってんだヲレ | #if 1 // なにやってんだヲレ |
| UINT16 val; | REG16 val; |
| bp -= 2; | bp -= 2; |
| I286_SP -= 2; | I286_SP -= 2; |
| val = i286_memoryread_w(bp + SS_BASE); | val = i286_memoryread_w(bp + SS_BASE); |
| Line 2128 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 2136 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 2149 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 == 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 1 | |
| 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 2158 I286FN _into(void) { // CE: into | Line 2498 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 2225 I286FN _shift_ea16_1(void) { // D1: sh | Line 2572 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 2256 I286FN _shift_ea16_cl(void) { // D3: s | Line 2603 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 2281 I286FN _shift_ea16_cl(void) { // D3: s | Line 2628 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 2301 I286FN _aam(void) { // D4: AAM | Line 2648 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 |= szpcflag[I286_AL]; | I286_FLAGL |= BYTESZPF(I286_AL); |
| } | } |
| I286FN _setalc(void) { // D6: setalc (80286) | I286FN _setalc(void) { // D6: setalc (80286) |
| Line 2319 I286FN _setalc(void) { // D6: setal | Line 2666 I286FN _setalc(void) { // D6: setal |
| I286FN _xlat(void) { // D7: xlat | I286FN _xlat(void) { // D7: xlat |
| I286_WORKCLOCK(5); | I286_WORKCLOCK(5); |
| I286_AL = i286_memoryread(((I286_AL + I286_BX) & 0xffff) + DS_FIX); | I286_AL = i286_memoryread(LOW16(I286_AL + I286_BX) + DS_FIX); |
| } | } |
| I286FN _esc(void) { // D8: esc | I286FN _esc(void) { // D8: esc |
| Line 2362 I286FN _in_al_data8(void) { // E4: i | Line 2709 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 2420 I286FN _jmp_far(void) { // EA: jmp | Line 2767 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 2464 I286FN _lock(void) { // F0: lock | Line 2811 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 2478 I286FN _repne(void) { // F2: repne | Line 2825 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 2540 I286FN _cli(void) { // FA: cli | Line 2887 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 2858 I286FN _repe_segprefix_es(void) { | Line 3219 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 2875 I286FN _repe_segprefix_cs(void) { | Line 3236 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 2892 I286FN _repe_segprefix_ss(void) { | Line 3253 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 2909 I286FN _repe_segprefix_ds(void) { | Line 3270 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 3203 I286FN _repne_segprefix_es(void) { | Line 3564 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 3220 I286FN _repne_segprefix_cs(void) { | Line 3581 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 3237 I286FN _repne_segprefix_ss(void) { | Line 3598 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 3254 I286FN _repne_segprefix_ds(void) { | Line 3615 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); |