auto LR35902::interrupt(uint16 vector) -> void { idle(); idle(); idle(); r.ime = 0; push(PC); PC = vector; } #define op(id, name, ...) case id: return instruction##name(__VA_ARGS__); auto LR35902::instruction() -> void { auto opcode = operand(); switch(opcode) { op(0x00, NOP) op(0x01, LD_Direct_Data, BC) op(0x02, LD_Indirect_Direct, BC, A) op(0x03, INC_Direct, BC) op(0x04, INC_Direct, B) op(0x05, DEC_Direct, B) op(0x06, LD_Direct_Data, B) op(0x07, RLCA) op(0x08, LD_Address_Direct, SP) op(0x09, ADD_Direct_Direct, HL, BC) op(0x0a, LD_Direct_Indirect, A, BC) op(0x0b, DEC_Direct, BC) op(0x0c, INC_Direct, C) op(0x0d, DEC_Direct, C) op(0x0e, LD_Direct_Data, C) op(0x0f, RRCA) op(0x10, STOP) op(0x11, LD_Direct_Data, DE) op(0x12, LD_Indirect_Direct, DE, A) op(0x13, INC_Direct, DE) op(0x14, INC_Direct, D) op(0x15, DEC_Direct, D) op(0x16, LD_Direct_Data, D) op(0x17, RLA) op(0x18, JR_Condition_Relative, 1) op(0x19, ADD_Direct_Direct, HL, DE) op(0x1a, LD_Direct_Indirect, A, DE) op(0x1b, DEC_Direct, DE) op(0x1c, INC_Direct, E) op(0x1d, DEC_Direct, E) op(0x1e, LD_Direct_Data, E) op(0x1f, RRA) op(0x20, JR_Condition_Relative, ZF == 0) op(0x21, LD_Direct_Data, HL) op(0x22, LD_IndirectIncrement_Direct, HL, A) op(0x23, INC_Direct, HL) op(0x24, INC_Direct, H) op(0x25, DEC_Direct, H) op(0x26, LD_Direct_Data, H) op(0x27, DAA) op(0x28, JR_Condition_Relative, ZF == 1) op(0x29, ADD_Direct_Direct, HL, HL) op(0x2a, LD_Direct_IndirectIncrement, A, HL) op(0x2b, DEC_Direct, HL) op(0x2c, INC_Direct, L) op(0x2d, DEC_Direct, L) op(0x2e, LD_Direct_Data, L) op(0x2f, CPL) op(0x30, JR_Condition_Relative, CF == 0) op(0x31, LD_Direct_Data, SP) op(0x32, LD_IndirectDecrement_Direct, HL, A) op(0x33, INC_Direct, SP) op(0x34, INC_Indirect, HL) op(0x35, DEC_Indirect, HL) op(0x36, LD_Indirect_Data, HL) op(0x37, SCF) op(0x38, JR_Condition_Relative, CF == 1) op(0x39, ADD_Direct_Direct, HL, SP) op(0x3a, LD_Direct_IndirectDecrement, A, HL) op(0x3b, DEC_Direct, SP) op(0x3c, INC_Direct, A) op(0x3d, DEC_Direct, A) op(0x3e, LD_Direct_Data, A) op(0x3f, CCF) op(0x40, LD_Direct_Direct, B, B) op(0x41, LD_Direct_Direct, B, C) op(0x42, LD_Direct_Direct, B, D) op(0x43, LD_Direct_Direct, B, E) op(0x44, LD_Direct_Direct, B, H) op(0x45, LD_Direct_Direct, B, L) op(0x46, LD_Direct_Indirect, B, HL) op(0x47, LD_Direct_Direct, B, A) op(0x48, LD_Direct_Direct, C, B) op(0x49, LD_Direct_Direct, C, C) op(0x4a, LD_Direct_Direct, C, D) op(0x4b, LD_Direct_Direct, C, E) op(0x4c, LD_Direct_Direct, C, H) op(0x4d, LD_Direct_Direct, C, L) op(0x4e, LD_Direct_Indirect, C, HL) op(0x4f, LD_Direct_Direct, C, A) op(0x50, LD_Direct_Direct, D, B) op(0x51, LD_Direct_Direct, D, C) op(0x52, LD_Direct_Direct, D, D) op(0x53, LD_Direct_Direct, D, E) op(0x54, LD_Direct_Direct, D, H) op(0x55, LD_Direct_Direct, D, L) op(0x56, LD_Direct_Indirect, D, HL) op(0x57, LD_Direct_Direct, D, A) op(0x58, LD_Direct_Direct, E, B) op(0x59, LD_Direct_Direct, E, C) op(0x5a, LD_Direct_Direct, E, D) op(0x5b, LD_Direct_Direct, E, E) op(0x5c, LD_Direct_Direct, E, H) op(0x5d, LD_Direct_Direct, E, L) op(0x5e, LD_Direct_Indirect, E, HL) op(0x5f, LD_Direct_Direct, E, A) op(0x60, LD_Direct_Direct, H, B) op(0x61, LD_Direct_Direct, H, C) op(0x62, LD_Direct_Direct, H, D) op(0x63, LD_Direct_Direct, H, E) op(0x64, LD_Direct_Direct, H, H) op(0x65, LD_Direct_Direct, H, L) op(0x66, LD_Direct_Indirect, H, HL) op(0x67, LD_Direct_Direct, H, A) op(0x68, LD_Direct_Direct, L, B) op(0x69, LD_Direct_Direct, L, C) op(0x6a, LD_Direct_Direct, L, D) op(0x6b, LD_Direct_Direct, L, E) op(0x6c, LD_Direct_Direct, L, H) op(0x6d, LD_Direct_Direct, L, L) op(0x6e, LD_Direct_Indirect, L, HL) op(0x6f, LD_Direct_Direct, L, A) op(0x70, LD_Indirect_Direct, HL, B) op(0x71, LD_Indirect_Direct, HL, C) op(0x72, LD_Indirect_Direct, HL, D) op(0x73, LD_Indirect_Direct, HL, E) op(0x74, LD_Indirect_Direct, HL, H) op(0x75, LD_Indirect_Direct, HL, L) op(0x76, HALT) op(0x77, LD_Indirect_Direct, HL, A) op(0x78, LD_Direct_Direct, A, B) op(0x79, LD_Direct_Direct, A, C) op(0x7a, LD_Direct_Direct, A, D) op(0x7b, LD_Direct_Direct, A, E) op(0x7c, LD_Direct_Direct, A, H) op(0x7d, LD_Direct_Direct, A, L) op(0x7e, LD_Direct_Indirect, A, HL) op(0x7f, LD_Direct_Direct, A, A) op(0x80, ADD_Direct_Direct, A, B) op(0x81, ADD_Direct_Direct, A, C) op(0x82, ADD_Direct_Direct, A, D) op(0x83, ADD_Direct_Direct, A, E) op(0x84, ADD_Direct_Direct, A, H) op(0x85, ADD_Direct_Direct, A, L) op(0x86, ADD_Direct_Indirect, A, HL) op(0x87, ADD_Direct_Direct, A, A) op(0x88, ADC_Direct_Direct, A, B) op(0x89, ADC_Direct_Direct, A, C) op(0x8a, ADC_Direct_Direct, A, D) op(0x8b, ADC_Direct_Direct, A, E) op(0x8c, ADC_Direct_Direct, A, H) op(0x8d, ADC_Direct_Direct, A, L) op(0x8e, ADC_Direct_Indirect, A, HL) op(0x8f, ADC_Direct_Direct, A, A) op(0x90, SUB_Direct_Direct, A, B) op(0x91, SUB_Direct_Direct, A, C) op(0x92, SUB_Direct_Direct, A, D) op(0x93, SUB_Direct_Direct, A, E) op(0x94, SUB_Direct_Direct, A, H) op(0x95, SUB_Direct_Direct, A, L) op(0x96, SUB_Direct_Indirect, A, HL) op(0x97, SUB_Direct_Direct, A, A) op(0x98, SBC_Direct_Direct, A, B) op(0x99, SBC_Direct_Direct, A, C) op(0x9a, SBC_Direct_Direct, A, D) op(0x9b, SBC_Direct_Direct, A, E) op(0x9c, SBC_Direct_Direct, A, H) op(0x9d, SBC_Direct_Direct, A, L) op(0x9e, SBC_Direct_Indirect, A, HL) op(0x9f, SBC_Direct_Direct, A, A) op(0xa0, AND_Direct_Direct, A, B) op(0xa1, AND_Direct_Direct, A, C) op(0xa2, AND_Direct_Direct, A, D) op(0xa3, AND_Direct_Direct, A, E) op(0xa4, AND_Direct_Direct, A, H) op(0xa5, AND_Direct_Direct, A, L) op(0xa6, AND_Direct_Indirect, A, HL) op(0xa7, AND_Direct_Direct, A, A) op(0xa8, XOR_Direct_Direct, A, B) op(0xa9, XOR_Direct_Direct, A, C) op(0xaa, XOR_Direct_Direct, A, D) op(0xab, XOR_Direct_Direct, A, E) op(0xac, XOR_Direct_Direct, A, H) op(0xad, XOR_Direct_Direct, A, L) op(0xae, XOR_Direct_Indirect, A, HL) op(0xaf, XOR_Direct_Direct, A, A) op(0xb0, OR_Direct_Direct, A, B) op(0xb1, OR_Direct_Direct, A, C) op(0xb2, OR_Direct_Direct, A, D) op(0xb3, OR_Direct_Direct, A, E) op(0xb4, OR_Direct_Direct, A, H) op(0xb5, OR_Direct_Direct, A, L) op(0xb6, OR_Direct_Indirect, A, HL) op(0xb7, OR_Direct_Direct, A, A) op(0xb8, CP_Direct_Direct, A, B) op(0xb9, CP_Direct_Direct, A, C) op(0xba, CP_Direct_Direct, A, D) op(0xbb, CP_Direct_Direct, A, E) op(0xbc, CP_Direct_Direct, A, H) op(0xbd, CP_Direct_Direct, A, L) op(0xbe, CP_Direct_Indirect, A, HL) op(0xbf, CP_Direct_Direct, A, A) op(0xc0, RET_Condition, ZF == 0) op(0xc1, POP_Direct, BC) op(0xc2, JP_Condition_Address, ZF == 0) op(0xc3, JP_Condition_Address, 1) op(0xc4, CALL_Condition_Address, ZF == 0) op(0xc5, PUSH_Direct, BC) op(0xc6, ADD_Direct_Data, A) op(0xc7, RST_Implied, 0x00) op(0xc8, RET_Condition, ZF == 1) op(0xc9, RET) op(0xca, JP_Condition_Address, ZF == 1) op(0xcb, CB) op(0xcc, CALL_Condition_Address, ZF == 1) op(0xcd, CALL_Condition_Address, 1) op(0xce, ADC_Direct_Data, A) op(0xcf, RST_Implied, 0x08) op(0xd0, RET_Condition, CF == 0) op(0xd1, POP_Direct, DE) op(0xd2, JP_Condition_Address, CF == 0) op(0xd4, CALL_Condition_Address, CF == 0) op(0xd5, PUSH_Direct, DE) op(0xd6, SUB_Direct_Data, A) op(0xd7, RST_Implied, 0x10) op(0xd8, RET_Condition, CF == 1) op(0xd9, RETI) op(0xda, JP_Condition_Address, CF == 1) op(0xdc, CALL_Condition_Address, CF == 1) op(0xde, SBC_Direct_Data, A) op(0xdf, RST_Implied, 0x18) op(0xe0, LDH_Address_Direct, A) op(0xe1, POP_Direct, HL) op(0xe2, LDH_Indirect_Direct, C, A) op(0xe5, PUSH_Direct, HL) op(0xe6, AND_Direct_Data, A) op(0xe7, RST_Implied, 0x20) op(0xe8, ADD_Direct_Relative, SP) op(0xe9, JP_Direct, HL) op(0xea, LD_Address_Direct, A) op(0xee, XOR_Direct_Data, A) op(0xef, RST_Implied, 0x28) op(0xf0, LDH_Direct_Address, A) op(0xf1, POP_Direct, AF) op(0xf2, LDH_Direct_Indirect, A, C) op(0xf3, DI) op(0xf5, PUSH_Direct, AF) op(0xf6, OR_Direct_Data, A) op(0xf7, RST_Implied, 0x30) op(0xf8, LD_Direct_DirectRelative, HL, SP) op(0xf9, LD_Direct_Direct, SP, HL) op(0xfa, LD_Direct_Address, A) op(0xfb, EI) op(0xfe, CP_Direct_Data, A) op(0xff, RST_Implied, 0x38) } } auto LR35902::instructionCB() -> void { auto opcode = operand(); switch(opcode) { op(0x00, RLC_Direct, B) op(0x01, RLC_Direct, C) op(0x02, RLC_Direct, D) op(0x03, RLC_Direct, E) op(0x04, RLC_Direct, H) op(0x05, RLC_Direct, L) op(0x06, RLC_Indirect, HL) op(0x07, RLC_Direct, A) op(0x08, RRC_Direct, B) op(0x09, RRC_Direct, C) op(0x0a, RRC_Direct, D) op(0x0b, RRC_Direct, E) op(0x0c, RRC_Direct, H) op(0x0d, RRC_Direct, L) op(0x0e, RRC_Indirect, HL) op(0x0f, RRC_Direct, A) op(0x10, RL_Direct, B) op(0x11, RL_Direct, C) op(0x12, RL_Direct, D) op(0x13, RL_Direct, E) op(0x14, RL_Direct, H) op(0x15, RL_Direct, L) op(0x16, RL_Indirect, HL) op(0x17, RL_Direct, A) op(0x18, RR_Direct, B) op(0x19, RR_Direct, C) op(0x1a, RR_Direct, D) op(0x1b, RR_Direct, E) op(0x1c, RR_Direct, H) op(0x1d, RR_Direct, L) op(0x1e, RR_Indirect, HL) op(0x1f, RR_Direct, A) op(0x20, SLA_Direct, B) op(0x21, SLA_Direct, C) op(0x22, SLA_Direct, D) op(0x23, SLA_Direct, E) op(0x24, SLA_Direct, H) op(0x25, SLA_Direct, L) op(0x26, SLA_Indirect, HL) op(0x27, SLA_Direct, A) op(0x28, SRA_Direct, B) op(0x29, SRA_Direct, C) op(0x2a, SRA_Direct, D) op(0x2b, SRA_Direct, E) op(0x2c, SRA_Direct, H) op(0x2d, SRA_Direct, L) op(0x2e, SRA_Indirect, HL) op(0x2f, SRA_Direct, A) op(0x30, SWAP_Direct, B) op(0x31, SWAP_Direct, C) op(0x32, SWAP_Direct, D) op(0x33, SWAP_Direct, E) op(0x34, SWAP_Direct, H) op(0x35, SWAP_Direct, L) op(0x36, SWAP_Indirect, HL) op(0x37, SWAP_Direct, A) op(0x38, SRL_Direct, B) op(0x39, SRL_Direct, C) op(0x3a, SRL_Direct, D) op(0x3b, SRL_Direct, E) op(0x3c, SRL_Direct, H) op(0x3d, SRL_Direct, L) op(0x3e, SRL_Indirect, HL) op(0x3f, SRL_Direct, A) } //opcodes 0x40-0xff [op(0x00 - 0x07) declared above] uint3 bit = opcode.bits(3,5); switch(opcode.bits(6,7) << 3 | opcode.bits(0,2)) { op(0x08, BIT_Index_Direct, bit, B) op(0x09, BIT_Index_Direct, bit, C) op(0x0a, BIT_Index_Direct, bit, D) op(0x0b, BIT_Index_Direct, bit, E) op(0x0c, BIT_Index_Direct, bit, H) op(0x0d, BIT_Index_Direct, bit, L) op(0x0e, BIT_Index_Indirect, bit, HL) op(0x0f, BIT_Index_Direct, bit, A) op(0x10, RES_Index_Direct, bit, B) op(0x11, RES_Index_Direct, bit, C) op(0x12, RES_Index_Direct, bit, D) op(0x13, RES_Index_Direct, bit, E) op(0x14, RES_Index_Direct, bit, H) op(0x15, RES_Index_Direct, bit, L) op(0x16, RES_Index_Indirect, bit, HL) op(0x17, RES_Index_Direct, bit, A) op(0x18, SET_Index_Direct, bit, B) op(0x19, SET_Index_Direct, bit, C) op(0x1a, SET_Index_Direct, bit, D) op(0x1b, SET_Index_Direct, bit, E) op(0x1c, SET_Index_Direct, bit, H) op(0x1d, SET_Index_Direct, bit, L) op(0x1e, SET_Index_Indirect, bit, HL) op(0x1f, SET_Index_Direct, bit, A) } } #undef op