diff options
Diffstat (limited to 'opcodes.asm')
| -rw-r--r-- | opcodes.asm | 483 |
1 files changed, 242 insertions, 241 deletions
diff --git a/opcodes.asm b/opcodes.asm index e140cfc..14a0c8c 100644 --- a/opcodes.asm +++ b/opcodes.asm @@ -234,17 +234,18 @@ emu_op_05: LOHI ebc F_DEC_B ebc HILO ebc - DONE + DONE ;nok START emu_op_06: ; S10 T26 ;; LD B,immed.b ;; Read a byte and put it in B + ;; B <- immed.b ;; No flags LOHI ebc FETCHBI ebc HILO ebc - DONE + DONE ;nok START emu_op_07: ; S2 T4 @@ -253,7 +254,7 @@ emu_op_07: ; S2 T4 ;; Flags: H,N=0; C aff. ;; XXX flags rol.b #1,eaf - DONE + DONE ;nok START emu_op_08: ; S2 T4 @@ -261,7 +262,7 @@ emu_op_08: ; S2 T4 ;; No flags ;; XXX AF swap eaf - DONE + DONE ;nok START emu_op_09: @@ -285,7 +286,7 @@ emu_op_0b: ; S2 T4 ;; BC <- BC-1 ;; No flags F_DEC_W ebc - DONE + DONE ;nok START emu_op_0c: @@ -293,7 +294,7 @@ emu_op_0c: ;; C <- C+1 ;; Flags: S,Z,H aff.; P=overflow, N=0 F_INC_B ebc - DONE + DONE ;nok START emu_op_0d: @@ -301,14 +302,14 @@ emu_op_0d: ;; C <- C-1 ;; Flags: S,Z,H aff., P=overflow, N=1 F_DEC_B ebc - DONE + DONE ;nok START emu_op_0e: ; S6 T18 ;; LD C,immed.b ;; No flags FETCHBI ebc - DONE + DONE ;nok START emu_op_0f: @@ -317,7 +318,7 @@ emu_op_0f: ;; Flags: H,N=0; C aff. ;; XXX FLAGS ror.b #1,eaf - DONE + DONE ;nok START emu_op_10: ; S32 @@ -337,14 +338,14 @@ emu_op_10: ; S32 move.l a0,epc end_10: HILO ebc - DONE + DONE ;nok START emu_op_11: ; S ;; LD DE,immed.w ;; No flags FETCHWI ede - DONE + DONE ;nok START emu_op_12: @@ -353,14 +354,14 @@ emu_op_12: move.w ede,d0 rol.w #8,d0 FETCHB d0,eaf - DONE + DONE ;nok START emu_op_13: ;; INC DE ;; No flags F_INC_W ede - DONE + DONE ;nok START emu_op_14: @@ -369,7 +370,7 @@ emu_op_14: LOHI ede F_INC_B ede HILO ede - DONE + DONE ;nok START emu_op_15: @@ -378,7 +379,7 @@ emu_op_15: LOHI ede F_DEC_B ede HILO ede - DONE + DONE ;nok START emu_op_16: @@ -387,7 +388,7 @@ emu_op_16: LOHI ede FETCHBI ede HILO ede - DONE + DONE ;nok START emu_op_17: @@ -395,7 +396,7 @@ emu_op_17: ;; Flags: P,N=0; C aff. ;; XXX flags roxl.b #1,eaf - DONE + DONE ;nok START emu_op_18: @@ -410,7 +411,7 @@ emu_op_18: add.w d1,d0 ; ??? Can I avoid underef/deref cycle? bsr deref move.l a0,epc - DONE + DONE ;nok START emu_op_19: @@ -418,7 +419,7 @@ emu_op_19: ;; HL <- HL+DE ;; Flags: H,C aff,; N=0 F_ADD_W ede,ehl - DONE + DONE ;nok START emu_op_1a: @@ -426,35 +427,35 @@ emu_op_1a: ;; A <- (DE) ;; No flags FETCHB ede,eaf - DONE + DONE ;nok START emu_op_1b: ;; DEC DE ;; No flags subq.w #1,ede - DONE + DONE ;nok START emu_op_1c: ;; INC E ;; Flags: S,Z,H aff.; P=overflow; N=0 F_INC_B ede - DONE + DONE ;nok START emu_op_1d: ;; DEC E ;; Flags: S,Z,H aff.; P=overflow, N=1 F_DEC_B ede - DONE + DONE ;nok START emu_op_1e: ;; LD E,immed.b ;; No flags FETCHBI ede - DONE + DONE ;nok START emu_op_1f: @@ -462,7 +463,7 @@ emu_op_1f: ;; Flags: H,N=0; C aff. ;; XXX FLAGS roxr.b #1,eaf - DONE + DONE ;nok START emu_op_20: @@ -475,14 +476,14 @@ emu_op_20: FETCHBI d1 add.w d1,epc ; XXX deref? end_20: - DONE + DONE ;nok START emu_op_21: ;; LD HL,immed.w ;; No flags FETCHWI ehl - DONE + DONE ;nok START emu_op_22: @@ -491,14 +492,14 @@ emu_op_22: ;; No flags FETCHWI d1 PUTW ehl,d1 - DONE + DONE ;nok START emu_op_23: ;; INC HL ;; No flags addq.w #1,ehl - DONE + DONE ;nok START emu_op_24: @@ -507,7 +508,7 @@ emu_op_24: LOHI ehl F_INC_B ehl HILO ehl - DONE + DONE ;nok START emu_op_25: @@ -516,7 +517,7 @@ emu_op_25: LOHI ehl F_DEC_B ehl HILO ehl - DONE + DONE ;nok START emu_op_26: @@ -525,7 +526,7 @@ emu_op_26: LOHI ehl FETCHBI ehl HILO ehl - DONE + DONE ;nok START emu_op_27: @@ -536,7 +537,7 @@ emu_op_27: ;; XXX DO THIS F_PAR eaf - DONE + DONE ;nok START emu_op_28: @@ -547,14 +548,14 @@ emu_op_28: ;; No flags bsr f_norm_z bne emu_op_18 - DONE + DONE ;nok START emu_op_29: ;; ADD HL,HL ;; No flags F_ADD_W ehl,ehl - DONE + DONE ;nok START emu_op_2a: @@ -562,7 +563,7 @@ emu_op_2a: ;; address is absolute FETCHWI d1 FETCHW d1,ehl - DONE + DONE ;nok ;; XXX TOO LONG @@ -570,25 +571,25 @@ emu_op_2a: emu_op_2b: ;; DEC HL F_DEC_W ehl - DONE + DONE ;nok START emu_op_2c: ;; INC L F_INC_B ehl - DONE + DONE ;nok START emu_op_2d: ;; DEC L F_DEC_B ehl - DONE + DONE ;nok START emu_op_2e: ;; LD L,immed.b FETCHBI ehl - DONE + DONE ;nok START emu_op_2f: @@ -596,7 +597,7 @@ emu_op_2f: ;; A <- NOT A ;; XXX flags not.b eaf - DONE + DONE ;nok START emu_op_30: @@ -605,7 +606,7 @@ emu_op_30: ;; PC <- PC+immed.b bsr f_norm_c beq emu_op_18 ; branch taken: carry clear - DONE + DONE ;nok START emu_op_31: @@ -613,7 +614,7 @@ emu_op_31: FETCHWI d1 bsr deref movea.l a0,esp - DONE + DONE ;nok START emu_op_32: @@ -622,7 +623,7 @@ emu_op_32: FETCHWI d1 rol.w #8,d1 PUTB eaf,d1 - DONE + DONE ;nok START emu_op_33: @@ -632,7 +633,7 @@ emu_op_33: ;; FYI: Do not have to deref because this will never cross a ;; page boundary. So sayeth BrandonW. addq.w #1,esp - DONE + DONE ;nok START emu_op_34: @@ -642,7 +643,7 @@ emu_op_34: FETCHB ehl,d1 F_INC_B d1 PUTB d1,ehl - DONE + DONE ;nok START emu_op_35: @@ -652,14 +653,14 @@ emu_op_35: FETCHB ehl,d1 F_DEC_B d1 PUTB d1,ehl - DONE + DONE ;nok START emu_op_36: ;; LD (HL),immed.b FETCHBI d1 PUTB ehl,d1 - DONE + DONE ;nok START emu_op_37: @@ -670,7 +671,7 @@ emu_op_37: ori.b #%00000001,d1 andi.b #%00101001,d1 or.b d1,flag_byte-flag_storage(a3) - DONE + DONE ;nok START emu_op_38: @@ -679,7 +680,7 @@ emu_op_38: ;; PC <- PC+immed.b bsr f_norm_c bne emu_op_18 - DONE + DONE ;nok START emu_op_39: @@ -690,21 +691,21 @@ emu_op_39: F_ADD_W ehl,d0 ; ??? Can I avoid underef/deref cycle? bsr deref move.l a0,esp - DONE + DONE ;nok START emu_op_3a: ;; LD A,(immed.w) FETCHWI d1 FETCHB d1,eaf - DONE + DONE ;nok START emu_op_3b: ;; DEC SP ;; No flags subq.l #1,esp - DONE + DONE ;nok START emu_op_3c: @@ -716,13 +717,13 @@ emu_op_3c: emu_op_3d: ;; DEC A F_DEC_B eaf - DONE + DONE ;nok START emu_op_3e: ;; LD A,immed.b FETCHBI eaf - DONE + DONE ;nok START emu_op_3f: @@ -731,7 +732,7 @@ emu_op_3f: bsr flags_normalize ;; SZ5H3PNC eor.b #%00010001,flag_byte-flag_storage(a3) - DONE + DONE ;nok START emu_op_40: @@ -740,7 +741,7 @@ emu_op_40: LOHI ebc move.b ebc,ebc HILO ebc - DONE + DONE ;nok START emu_op_41: @@ -750,7 +751,7 @@ emu_op_41: LOHI ebc move.b d1,ebc HILO ebc - DONE + DONE ;nok START emu_op_42: @@ -762,7 +763,7 @@ emu_op_42: move.b ede,ebc HILO ebc HILO ede - DONE + DONE ;nok START emu_op_43: @@ -771,7 +772,7 @@ emu_op_43: LOHI ebc move.b ebc,ede ; 4 HILO ebc - DONE + DONE ;nok START emu_op_44: @@ -782,7 +783,7 @@ emu_op_44: move.b ehl,ebc HILO ebc HILO ehl - DONE + DONE ;nok START emu_op_45: @@ -791,7 +792,7 @@ emu_op_45: LOHI ebc move.b ehl,ebc HILO ebc - DONE + DONE ;nok START emu_op_46: @@ -800,7 +801,7 @@ emu_op_46: LOHI ebc FETCHB ehl,ebc HILO ebc - DONE + DONE ;nok START emu_op_47: @@ -809,7 +810,7 @@ emu_op_47: LOHI ebc move.b eaf,ebc HILO ebc - DONE + DONE ;nok START emu_op_48: @@ -819,12 +820,12 @@ emu_op_48: move.b (sp),ebc ;; XXX emfasten? addq.l #2,sp - DONE + DONE ;nok ;14 cycles START emu_op_49: ;; LD C,C - DONE + DONE ;nok START emu_op_4a: @@ -833,13 +834,13 @@ emu_op_4a: move.b (sp),ebc ;; XXX emfasten? addq.l #2,sp - DONE + DONE ;nok START emu_op_4b: ;; LD C,E move.b ebc,ede - DONE + DONE ;nok START emu_op_4c: @@ -847,26 +848,26 @@ emu_op_4c: LOHI ehl move.b ebc,ehl HILO ehl - DONE + DONE ;nok START emu_op_4d: ;; LD C,L move.b ebc,ehl - DONE + DONE ;nok START emu_op_4e: ;; LD C,(HL) ;; C <- (HL) FETCHB ehl,ebc - DONE + DONE ;nok START emu_op_4f: ;; LD C,A move.b eaf,ebc - DONE + DONE ;nok START emu_op_50: @@ -882,7 +883,7 @@ emu_op_50: move.b ebc,ede HILO ebc HILO ede - DONE + DONE ;nok START emu_op_51: @@ -890,12 +891,12 @@ emu_op_51: LOHI ede move.b ebc,ede HILO ede - DONE + DONE ;nok START emu_op_52: ;; LD D,D - DONE + DONE ;nok START emu_op_53: @@ -904,7 +905,7 @@ emu_op_53: move.b ede,d1 lsl #8,d1 or.w d1,ede - DONE + DONE ;nok START emu_op_54: @@ -914,7 +915,7 @@ emu_op_54: move.b ehl,ede ; 4 HILO ede ; 4 HILO ehl ; 4 - DONE + DONE ;nok ;20 cycles START @@ -923,7 +924,7 @@ emu_op_55: LOHI ede move.b ehl,ede HILO ede - DONE + DONE ;nok START emu_op_56: @@ -932,7 +933,7 @@ emu_op_56: LOHI ede FETCHB ehl,ede HILO ede - DONE + DONE ;nok START emu_op_57: @@ -940,7 +941,7 @@ emu_op_57: LOHI ede move.b eaf,ede HILO ede - DONE + DONE ;nok START emu_op_58: @@ -948,13 +949,13 @@ emu_op_58: LOHI ebc move.b ebc,ede HILO ebc - DONE + DONE ;nok START emu_op_59: ;; LD E,C move.b ebc,ede - DONE + DONE ;nok START emu_op_5a: @@ -963,13 +964,13 @@ emu_op_5a: move.b ede,d1 ; 4/2 lsr.w #8,d1 ;22/2 or.w d1,ede ; 4/2 - DONE + DONE ;nok ;38/2 START emu_op_5b: ;; LD E,E - DONE + DONE ;nok START emu_op_5c: @@ -977,25 +978,25 @@ emu_op_5c: LOHI ehl move.b ede,ehl HILO ehl - DONE + DONE ;nok START emu_op_5d: ;; LD E,L move.b ede,ehl - DONE + DONE ;nok START emu_op_5e: ;; LD E,(HL) FETCHB ehl,d1 - DONE + DONE ;nok START emu_op_5f: ;; LD E,A move.b ede,eaf - DONE + DONE ;nok START emu_op_60: @@ -1005,7 +1006,7 @@ emu_op_60: move.b ehl,ebc HILO ebc HILO ehl - DONE + DONE ;nok START emu_op_61: @@ -1013,7 +1014,7 @@ emu_op_61: LOHI ehl move.b ebc,ehl HILO ehl - DONE + DONE ;nok START emu_op_62: @@ -1023,7 +1024,7 @@ emu_op_62: move.b ede,ehl HILO ede HILO ehl - DONE + DONE ;nok START emu_op_63: @@ -1031,12 +1032,12 @@ emu_op_63: LOHI ehl move.b ede,ehl HILO ehl - DONE + DONE ;nok START emu_op_64: ;; LD H,H - DONE + DONE ;nok START emu_op_65: @@ -1046,7 +1047,7 @@ emu_op_65: LOHI ehl move.b d1,ehl HILO ehl - DONE + DONE ;nok START emu_op_66: @@ -1055,7 +1056,7 @@ emu_op_66: LOHI ehl move.b d1,ehl HILO ehl - DONE + DONE ;nok START emu_op_67: @@ -1063,7 +1064,7 @@ emu_op_67: LOHI ehl move.b eaf,ehl HILO ehl - DONE + DONE ;nok START emu_op_68: @@ -1071,13 +1072,13 @@ emu_op_68: LOHI ebc move.b ebc,ehl HILO ebc - DONE + DONE ;nok START emu_op_69: ;; LD L,C move.b ebc,ehl - DONE + DONE ;nok START emu_op_6a: @@ -1085,13 +1086,13 @@ emu_op_6a: LOHI ede move.b ede,ehl HILO ede - DONE + DONE ;nok START emu_op_6b: ;; LD L,E move.b ede,ehl - DONE + DONE ;nok START emu_op_6c: @@ -1100,25 +1101,25 @@ emu_op_6c: move.b ehl,d1 HILO ehl move.b d1,ehl - DONE + DONE ;nok START emu_op_6d: ;; LD L,L - DONE + DONE ;nok START emu_op_6e: ;; LD L,(HL) ;; L <- (HL) FETCHB ehl,ehl - DONE + DONE ;nok START emu_op_6f: ;; LD L,A move.b eaf,ehl - DONE + DONE ;nok START emu_op_70: @@ -1126,13 +1127,13 @@ emu_op_70: LOHI ebc PUTB ehl,ebc HILO ebc - DONE + DONE ;nok START emu_op_71: ;; LD (HL),C PUTB ehl,ebc - DONE + DONE ;nok START emu_op_72: @@ -1140,13 +1141,13 @@ emu_op_72: LOHI ede PUTB ehl,ede HILO ede - DONE + DONE ;nok START emu_op_73: ;; LD (HL),E PUTB ehl,ede - DONE + DONE ;nok START emu_op_74: @@ -1154,27 +1155,27 @@ emu_op_74: move.w ehl,d1 HILO d1 PUTB d1,ehl - DONE + DONE ;nok START emu_op_75: ;; LD (HL),L move.b ehl,d1 PUTB d1,ehl - DONE + DONE ;nok START emu_op_76: ;; HALT ;; XXX do this bra emu_op_76 - DONE + DONE ;nok START emu_op_77: ;; LD (HL),A PUTB eaf,ehl - DONE + DONE ;nok START emu_op_78: @@ -1182,13 +1183,13 @@ emu_op_78: move.w ebc,d1 LOHI d1 move.b d1,eaf - DONE + DONE ;nok START emu_op_79: ;; LD A,C move.b ebc,eaf - DONE + DONE ;nok START emu_op_7a: @@ -1196,13 +1197,13 @@ emu_op_7a: move.w ede,d1 LOHI d1 move.b d1,eaf - DONE + DONE ;nok START emu_op_7b: ;; LD A,E move.b ede,eaf - DONE + DONE ;nok START emu_op_7c: @@ -1210,25 +1211,25 @@ emu_op_7c: move.w ehl,d1 LOHI d1 move.b d1,eaf - DONE + DONE ;nok START emu_op_7d: ;; LD A,L move.b ehl,eaf - DONE + DONE ;nok START emu_op_7e: ;; LD A,(HL) ;; A <- (HL) FETCHB ehl,eaf - DONE + DONE ;nok START emu_op_7f: ;; LD A,A - DONE + DONE ;nok @@ -1246,13 +1247,13 @@ emu_op_80: LOHI ebc F_ADD_B ebc,eaf HILO ebc - DONE + DONE ;nok START emu_op_81: ;; ADD A,C F_ADD_B ebc,eaf - DONE + DONE ;nok START emu_op_82: @@ -1260,13 +1261,13 @@ emu_op_82: LOHI ede F_ADD_B ede,eaf HILO ede - DONE + DONE ;nok START emu_op_83: ;; ADD A,E F_ADD_B ede,eaf - DONE + DONE ;nok START emu_op_84: @@ -1274,13 +1275,13 @@ emu_op_84: LOHI ehl F_ADD_B ehl,eaf HILO ehl - DONE + DONE ;nok START emu_op_85: ;; ADD A,L F_ADD_B ehl,eaf - DONE + DONE ;nok START emu_op_86: @@ -1288,13 +1289,13 @@ emu_op_86: FETCHB ehl,d1 F_ADD_B d1,eaf PUTB d1,ehl - DONE + DONE ;nok START emu_op_87: ;; ADD A,A F_ADD_B eaf,eaf - DONE + DONE ;nok @@ -1313,14 +1314,14 @@ emu_op_88: LOHI ebc F_ADC_B ebc,eaf HILO ebc - DONE + DONE ;nok START emu_op_89: ;; ADC A,C ;; A <- A + C + (carry) F_ADC_B ebc,eaf - DONE + DONE ;nok START emu_op_8a: @@ -1328,14 +1329,14 @@ emu_op_8a: LOHI ede F_ADC_B ede,eaf HILO ede - DONE + DONE ;nok START emu_op_8b: ;; ADC A,E ;; A <- A + E + carry F_ADC_B ede,eaf - DONE + DONE ;nok START emu_op_8c: @@ -1343,13 +1344,13 @@ emu_op_8c: LOHI eaf F_ADC_B ehl,eaf HILO eaf - DONE + DONE ;nok START emu_op_8d: ;; ADC A,L F_ADC_B ehl,eaf - DONE + DONE ;nok START emu_op_8e: @@ -1357,13 +1358,13 @@ emu_op_8e: FETCHB ehl,d1 F_ADC_B d1,eaf PUTB d1,ehl - DONE + DONE ;nok START emu_op_8f: ;; ADC A,A F_ADC_B eaf,eaf - DONE + DONE ;nok @@ -1383,13 +1384,13 @@ emu_op_90: LOHI ebc F_SUB_B ebc,eaf HILO ebc - DONE + DONE ;nok START emu_op_91: ;; SUB A,C F_SUB_B ebc,eaf - DONE + DONE ;nok START emu_op_92: @@ -1397,13 +1398,13 @@ emu_op_92: LOHI ede F_SUB_B ede,eaf HILO ede - DONE + DONE ;nok START emu_op_93: ;; SUB A,E F_SUB_B ede,eaf - DONE + DONE ;nok START emu_op_94: @@ -1411,7 +1412,7 @@ emu_op_94: LOHI ehl F_SUB_B ehl,eaf HILO ehl - DONE + DONE ;nok START emu_op_95: @@ -1424,13 +1425,13 @@ emu_op_96: FETCHB ehl,d1 F_SUB_B d1,eaf PUTB d1,ehl - DONE + DONE ;nok START emu_op_97: ;; SUB A,A F_SUB_B eaf,eaf - DONE + DONE ;nok @@ -1449,13 +1450,13 @@ emu_op_98: LOHI ebc F_SBC_B ebc,eaf HILO ebc - DONE + DONE ;nok START emu_op_99: ;; SBC A,C F_SBC_B ebc,eaf - DONE + DONE ;nok START emu_op_9a: @@ -1463,13 +1464,13 @@ emu_op_9a: LOHI ede F_SBC_B ede,eaf HILO ede - DONE + DONE ;nok START emu_op_9b: ;; SBC A,E F_SBC_B ede,eaf - DONE + DONE ;nok START emu_op_9c: @@ -1477,13 +1478,13 @@ emu_op_9c: LOHI ehl F_SBC_B ehl,eaf HILO ehl - DONE + DONE ;nok START emu_op_9d: ;; SBC A,L F_SBC_B ehl,eaf - DONE + DONE ;nok START emu_op_9e: @@ -1491,13 +1492,13 @@ emu_op_9e: FETCHB ehl,d1 F_SBC_B d1,eaf PUTB d1,ehl - DONE + DONE ;nok START emu_op_9f: ;; SBC A,A F_SBC_B eaf,eaf - DONE + DONE ;nok @@ -1516,7 +1517,7 @@ emu_op_a0: LOHI ebc F_AND_B ebc,eaf HILO ebc - DONE + DONE ;nok START emu_op_a1: @@ -1529,13 +1530,13 @@ emu_op_a2: LOHI ede F_AND_B ede,eaf HILO ede - DONE + DONE ;nok START emu_op_a3: ;; AND E F_AND_B ede,eaf - DONE + DONE ;nok START emu_op_a4: @@ -1543,13 +1544,13 @@ emu_op_a4: LOHI ehl F_AND_B ehl,eaf HILO ehl - DONE + DONE ;nok START emu_op_a5: ;; AND L F_AND_B ehl,eaf - DONE + DONE ;nok START emu_op_a6: @@ -1557,14 +1558,14 @@ emu_op_a6: FETCHB ehl,d1 F_AND_B d1,eaf PUTB d1,ehl - DONE + DONE ;nok START emu_op_a7: ;; AND A ;; SPEED ... It's probably not necessary to run this faster. F_AND_B eaf,eaf - DONE + DONE ;nok @@ -1583,13 +1584,13 @@ emu_op_a8: LOHI ebc F_XOR_B ebc,eaf HILO ebc - DONE + DONE ;nok START emu_op_a9: ;; XOR C F_XOR_B ebc,eaf - DONE + DONE ;nok START emu_op_aa: @@ -1597,13 +1598,13 @@ emu_op_aa: LOHI ede F_XOR_B ede,eaf HILO ede - DONE + DONE ;nok START emu_op_ab: ;; XOR E F_XOR_B ede,eaf - DONE + DONE ;nok START emu_op_ac: @@ -1611,13 +1612,13 @@ emu_op_ac: LOHI ehl F_XOR_B ehl,eaf HILO ehl - DONE + DONE ;nok START emu_op_ad: ;; XOR L F_XOR_B ehl,eaf - DONE + DONE ;nok START emu_op_ae: @@ -1625,14 +1626,14 @@ emu_op_ae: FETCHB ehl,d1 F_XOR_B d1,eaf PUTB d1,ehl - DONE + DONE ;nok START emu_op_af: ;; XOR A F_XOR_B eaf,eaf ;; XXX - DONE + DONE ;nok @@ -1651,13 +1652,13 @@ emu_op_b0: LOHI ebc F_OR_B ebc,eaf HILO ebc - DONE + DONE ;nok START emu_op_b1: ;; OR C F_OR_B ebc,eaf - DONE + DONE ;nok START emu_op_b2: @@ -1665,13 +1666,13 @@ emu_op_b2: LOHI ede F_OR_B ede,eaf HILO ede - DONE + DONE ;nok START emu_op_b3: ;; OR E F_OR_B ede,eaf - DONE + DONE ;nok START emu_op_b4: @@ -1679,13 +1680,13 @@ emu_op_b4: LOHI ehl F_OR_B ehl,eaf HILO ehl - DONE + DONE ;nok START emu_op_b5: ;; OR L F_OR_B ehl,eaf - DONE + DONE ;nok START emu_op_b6: @@ -1693,13 +1694,13 @@ emu_op_b6: FETCHB ehl,d1 F_OR_B d1,eaf PUTB d1,ehl - DONE + DONE ;nok START emu_op_b7: ;; OR A F_OR_B eaf,eaf - DONE + DONE ;nok @@ -1720,13 +1721,13 @@ emu_op_b8: move.b ebc,d1 LOHI d1 F_CP_B d1,eaf - DONE + DONE ;nok START emu_op_b9: ;; CP C F_CP_B ebc,eaf - DONE + DONE ;nok START emu_op_ba: @@ -1734,13 +1735,13 @@ emu_op_ba: move.b ede,d1 LOHI d1 F_CP_B d1,eaf - DONE + DONE ;nok START emu_op_bb: ;; CP E F_CP_B ede,eaf - DONE + DONE ;nok START emu_op_bc: @@ -1748,13 +1749,13 @@ emu_op_bc: move.b ehl,d1 LOHI d1 F_CP_B d1,eaf - DONE + DONE ;nok START emu_op_bd: ;; CP L F_CP_B ehl,eaf - DONE + DONE ;nok START emu_op_be: @@ -1762,13 +1763,13 @@ emu_op_be: FETCHB ehl,d1 F_CP_B d1,eaf ; if F_CP_B uses d1, watch out for this ;; no result to store - DONE + DONE ;nok START emu_op_bf: ;; CP A F_CP_B eaf,eaf - DONE + DONE ;nok START emu_op_c0: @@ -1780,14 +1781,14 @@ emu_op_c0: bsr f_norm_z ;; SPEED inline RET beq emu_op_c9 ; RET - DONE + DONE ;nok START emu_op_c1: ; S10 T ;; POP BC ;; Pops a word into BC POPW ebc - DONE + DONE ;nok START emu_op_c2: @@ -1796,7 +1797,7 @@ emu_op_c2: ;; PC <- immed.w bsr f_norm_z bne.s emu_op_c3 - DONE + DONE ;nok START emu_op_c3: ; S12 T36 @@ -1805,7 +1806,7 @@ emu_op_c3: ; S12 T36 FETCHWI d1 bsr deref movea.l a0,epc - DONE + DONE ;nok START emu_op_c4: @@ -1813,20 +1814,20 @@ emu_op_c4: ;; If ~Z, CALL immed.w bsr f_norm_z bne emu_op_cd - DONE + DONE ;nok START emu_op_c5: ;; PUSH BC PUSHW ebc - DONE + DONE ;nok START emu_op_c6: ;; ADD A,immed.b FETCHBI d1 F_ADD_B d1,eaf - DONE + DONE ;nok START emu_op_c7: @@ -1839,14 +1840,14 @@ emu_op_c7: move.w #$00,d0 bsr deref move.l a0,epc - DONE + DONE ;nok START emu_op_c8: ;; RET Z bsr f_norm_z beq.s emu_op_c9 - DONE + DONE ;nok START emu_op_c9: @@ -1857,7 +1858,7 @@ emu_op_c9: POPW d1 bsr deref movea.l a0,epc - DONE + DONE ;nok START emu_op_ca: @@ -1865,7 +1866,7 @@ emu_op_ca: ;; If Z, jump bsr f_norm_z beq emu_op_c3 - DONE + DONE ;nok START emu_op_cb: ; prefix @@ -1876,7 +1877,7 @@ emu_op_cc: ;; CALL Z,immed.w bsr f_norm_z beq.s emu_op_cd - DONE + DONE ;nok START emu_op_cd: @@ -1896,7 +1897,7 @@ emu_op_ce: ;; ADC A,immed.b FETCHWI d1 F_ADC_B d1,eaf - DONE + DONE ;nok START emu_op_cf: @@ -1908,27 +1909,27 @@ emu_op_cf: move.w #$08,d0 bsr deref move.l a0,epc - DONE + DONE ;nok START emu_op_d0: ;; RET NC bsr f_norm_c beq emu_op_c9 - DONE + DONE ;nok START emu_op_d1: ;; POP DE POPW ede - DONE + DONE ;nok START emu_op_d2: ;; JP NC,immed.w bsr f_norm_c beq emu_op_c3 - DONE + DONE ;nok START emu_op_d3: @@ -1936,27 +1937,27 @@ emu_op_d3: move.b eaf,d1 FETCHBI d0 bsr port_out - DONE + DONE ;nok START emu_op_d4: ;; CALL NC,immed.w bsr f_norm_c beq emu_op_cd - DONE + DONE ;nok START emu_op_d5: ;; PUSH DE PUSHW ede - DONE + DONE ;nok START emu_op_d6: ;; SUB A,immed.b FETCHBI d1 F_SUB_B eaf,d1 - DONE + DONE ;nok START emu_op_d7: @@ -1968,14 +1969,14 @@ emu_op_d7: move.w #$10,d0 bsr deref move.l a0,epc - DONE + DONE ;nok START emu_op_d8: ;; RET C bsr f_norm_c bne emu_op_c9 - DONE + DONE ;nok START emu_op_d9: @@ -1983,14 +1984,14 @@ emu_op_d9: swap ebc swap ede swap ehl - DONE + DONE ;nok START emu_op_da: ;; JP C,immed.w bsr f_norm_c bne emu_op_c3 - DONE + DONE ;nok START emu_op_db: @@ -1998,14 +1999,14 @@ emu_op_db: move.b eaf,d1 FETCHBI d0 bsr port_in - DONE + DONE ;nok START emu_op_dc: ;; CALL C,immed.w bsr f_norm_c bne emu_op_cd - DONE + DONE ;nok START emu_op_dd: ; prefix @@ -2016,7 +2017,7 @@ emu_op_de: ;; SBC A,immed.b FETCHWI d1 F_SBC_B d1,eaf - DONE + DONE ;nok START emu_op_df: @@ -2028,7 +2029,7 @@ emu_op_df: move.w #$18,d0 bsr deref move.l a0,epc - DONE + DONE ;nok START emu_op_e0: @@ -2036,20 +2037,20 @@ emu_op_e0: ;; If parity odd (P zero), return bsr f_norm_pv beq emu_op_c9 - DONE + DONE ;nok START emu_op_e1: ;; POP HL POPW ehl - DONE + DONE ;nok START emu_op_e2: ;; JP PO,immed.w bsr f_norm_pv beq emu_op_c3 - DONE + DONE ;nok START emu_op_e3: @@ -2058,7 +2059,7 @@ emu_op_e3: POPW d1 PUSHW ehl move.w d1,ehl - DONE + DONE ;nok START emu_op_e4: @@ -2066,20 +2067,20 @@ emu_op_e4: ;; if parity odd (P=0), call bsr f_norm_pv beq emu_op_cd - DONE + DONE ;nok START emu_op_e5: ;; PUSH HL PUSHW ehl - DONE + DONE ;nok START emu_op_e6: ;; AND immed.b FETCHBI d1 F_AND_B d1,eaf - DONE + DONE ;nok START emu_op_e7: @@ -2091,7 +2092,7 @@ emu_op_e7: move.w #$20,d0 bsr deref move.l a0,epc - DONE + DONE ;nok START emu_op_e8: @@ -2099,7 +2100,7 @@ emu_op_e8: ;; If parity odd (P zero), return bsr f_norm_pv bne emu_op_c9 - DONE + DONE ;nok START emu_op_e9: @@ -2107,20 +2108,20 @@ emu_op_e9: FETCHB ehl,d1 bsr deref movea.l a0,epc - DONE + DONE ;nok START emu_op_ea: ;; JP PE,immed.w bsr f_norm_pv bne emu_op_c3 - DONE + DONE ;nok START emu_op_eb: ;; EX DE,HL exg.w ede,ehl - DONE + DONE ;nok START emu_op_ec: @@ -2128,19 +2129,19 @@ emu_op_ec: ;; If parity even (P=1), call bsr f_norm_c bne emu_op_cd - DONE + DONE ;nok START emu_op_ed: ; prefix movea.w emu_op_undo_ed(pc),a2 - DONE + DONE ;nok START emu_op_ee: ;; XOR immed.b FETCHBI d1 F_XOR_B d1,eaf - DONE + DONE ;nok START emu_op_ef: @@ -2152,7 +2153,7 @@ emu_op_ef: move.w #$28,d0 bsr deref move.l a0,epc - DONE + DONE ;nok START emu_op_f0: @@ -2160,7 +2161,7 @@ emu_op_f0: ;; Return if Positive bsr f_norm_sign beq emu_op_c9 ; RET - DONE + DONE ;nok START emu_op_f1: @@ -2170,14 +2171,14 @@ emu_op_f1: POPW eaf move.w eaf,(flag_byte-flag_storage)(a3) move.b #$ff,(flag_valid-flag_storage)(a3) - DONE + DONE ;nok START emu_op_f2: ;; JP P,immed.w bsr f_norm_sign beq emu_op_c3 ; JP - DONE + DONE ;nok START emu_op_f3: @@ -2190,7 +2191,7 @@ emu_op_f4: ;; Call if positive (S=0) bsr f_norm_sign beq emu_op_cd - DONE + DONE ;nok START emu_op_f5: @@ -2201,14 +2202,14 @@ emu_op_f5: ;; XXX wrong HILO eaf PUSHW eaf - DONE + DONE ;nok START emu_op_f6: ;; OR immed.b FETCHBI d1 F_OR_B d1,eaf - DONE + DONE ;nok START emu_op_f7: @@ -2220,7 +2221,7 @@ emu_op_f7: move.w #$08,d0 bsr deref move.l a0,epc - DONE + DONE ;nok START emu_op_f8: @@ -2228,7 +2229,7 @@ emu_op_f8: ;; Return if Sign == 1, minus bsr f_norm_sign bne emu_op_c9 ; RET - DONE + DONE ;nok START emu_op_f9: @@ -2237,20 +2238,20 @@ emu_op_f9: move.w ehl,d1 bsr deref movea.l a0,esp - DONE + DONE ;nok START emu_op_fa: ;; JP M,immed.w bsr f_norm_sign bne emu_op_c3 ; JP - DONE + DONE ;nok START emu_op_fb: ;; EI bsr ints_start - DONE + DONE ;nok START emu_op_fc: @@ -2258,7 +2259,7 @@ emu_op_fc: ;; Call if minus (S=1) bsr f_norm_sign bne emu_op_cd - DONE + DONE ;nok START emu_op_fd: ; prefix @@ -2270,7 +2271,7 @@ emu_op_fe: ;; CP immed.b FETCHBI d1 F_CP_B d1,eaf - DONE + DONE ;nok START emu_op_ff: @@ -2282,4 +2283,4 @@ emu_op_ff: move.w #$08,d0 bsr deref move.l a0,epc - DONE + DONE ;nok |