summaryrefslogtreecommitdiffstatshomepage
diff options
context:
space:
mode:
-rw-r--r--scripts/src/cpu.lua12
-rw-r--r--src/devices/cpu/z80/z80.cpp2930
-rw-r--r--src/devices/cpu/z80/z80.h158
-rw-r--r--src/devices/cpu/z80/z80.lst6645
-rw-r--r--src/devices/cpu/z80/z80make.py241
5 files changed, 7053 insertions, 2933 deletions
diff --git a/scripts/src/cpu.lua b/scripts/src/cpu.lua
index ac433ad42dd..cba876deae2 100644
--- a/scripts/src/cpu.lua
+++ b/scripts/src/cpu.lua
@@ -2975,6 +2975,18 @@ if (CPUS["Z80"]~=null or CPUS["KC80"]~=null) then
MAME_DIR .. "src/devices/cpu/z80/z84c015.cpp",
MAME_DIR .. "src/devices/cpu/z80/z84c015.h",
}
+
+ dependency {
+ { MAME_DIR .. "src/devices/cpu/z80/z80.cpp", GEN_DIR .. "emu/cpu/z80/z80.hxx" },
+ { MAME_DIR .. "src/devices/cpu/z80/z80.cpp", GEN_DIR .. "emu/cpu/z80/z80_rop.hxx" },
+ { MAME_DIR .. "src/devices/cpu/z80/z80.cpp", GEN_DIR .. "emu/cpu/z80/z80_ncs800rop.hxx" },
+ }
+
+ custombuildtask {
+ { MAME_DIR .. "src/devices/cpu/z80/z80.lst", GEN_DIR .. "emu/cpu/z80/z80.hxx", { MAME_DIR .. "src/devices/cpu/z80/z80make.py" }, { "@echo Generating Z80 source file...", PYTHON .. " $(1) $(<) $(@)" } },
+ { MAME_DIR .. "src/devices/cpu/z80/z80.lst", GEN_DIR .. "emu/cpu/z80/z80_rop.hxx", { MAME_DIR .. "src/devices/cpu/z80/z80make.py" }, { "@echo Generating Z80 \\(rop\\) source file...", PYTHON .. " $(1) rop $(<) $(@)" } },
+ { MAME_DIR .. "src/devices/cpu/z80/z80.lst", GEN_DIR .. "emu/cpu/z80/z80_ncs800rop.hxx", { MAME_DIR .. "src/devices/cpu/z80/z80make.py" }, { "@echo Generating NSC800 \\(rop\\) source file...", PYTHON .. " $(1) ncs800rop $(<) $(@)" } },
+ }
end
if CPUS["KC80"] then
diff --git a/src/devices/cpu/z80/z80.cpp b/src/devices/cpu/z80/z80.cpp
index 84baa3e3904..3d3774a26e7 100644
--- a/src/devices/cpu/z80/z80.cpp
+++ b/src/devices/cpu/z80/z80.cpp
@@ -161,6 +161,10 @@
#define A m_af.b.h
#define F m_af.b.l
#define Q m_q
+#define QT m_qtemp
+#define I m_i
+#define R m_r
+#define R2 m_r2
#define BCD m_bc.d
#define BC m_bc.w.l
@@ -192,6 +196,15 @@
#define WZ_L m_wz.b.l
+#define TADR m_shared_addr.w // Typically represents values from A0..15 pins. 16bit input in steps.
+#define TADR_H m_shared_addr.b.h
+#define TADR_L m_shared_addr.b.l
+#define TDAT m_shared_data.w // 16bit input(if use as second parameter) or output in steps.
+#define TDAT2 m_shared_data2.w
+#define TDAT_H m_shared_data.b.h
+#define TDAT_L m_shared_data.b.l
+#define TDAT8 m_shared_data.b.l // Typically represents values from D0..8 pins. 8bit input or output in steps.
+
static bool tables_initialised = false;
static u8 SZ[256]; // zero and sign flags
static u8 SZ_BIT[256]; // zero, sign and parity/overflow (=zero) flags for BIT opcode
@@ -204,90 +217,9 @@ static u8 SZHVC_sub[2*256*256];
/***************************************************************
- * define an opcode function
- ***************************************************************/
-#define OP(prefix,opcode) inline void z80_device::prefix##_##opcode()
-
-/***************************************************************
- * adjust cycle count by n T-states
- ***************************************************************/
-#define T(icount) execute_cycles(icount)
-
-#define EXEC(prefix,opcode) do { \
- unsigned op = opcode; \
- switch(op) \
- { \
- case 0x00:prefix##_##00();break; case 0x01:prefix##_##01();break; case 0x02:prefix##_##02();break; case 0x03:prefix##_##03();break; \
- case 0x04:prefix##_##04();break; case 0x05:prefix##_##05();break; case 0x06:prefix##_##06();break; case 0x07:prefix##_##07();break; \
- case 0x08:prefix##_##08();break; case 0x09:prefix##_##09();break; case 0x0a:prefix##_##0a();break; case 0x0b:prefix##_##0b();break; \
- case 0x0c:prefix##_##0c();break; case 0x0d:prefix##_##0d();break; case 0x0e:prefix##_##0e();break; case 0x0f:prefix##_##0f();break; \
- case 0x10:prefix##_##10();break; case 0x11:prefix##_##11();break; case 0x12:prefix##_##12();break; case 0x13:prefix##_##13();break; \
- case 0x14:prefix##_##14();break; case 0x15:prefix##_##15();break; case 0x16:prefix##_##16();break; case 0x17:prefix##_##17();break; \
- case 0x18:prefix##_##18();break; case 0x19:prefix##_##19();break; case 0x1a:prefix##_##1a();break; case 0x1b:prefix##_##1b();break; \
- case 0x1c:prefix##_##1c();break; case 0x1d:prefix##_##1d();break; case 0x1e:prefix##_##1e();break; case 0x1f:prefix##_##1f();break; \
- case 0x20:prefix##_##20();break; case 0x21:prefix##_##21();break; case 0x22:prefix##_##22();break; case 0x23:prefix##_##23();break; \
- case 0x24:prefix##_##24();break; case 0x25:prefix##_##25();break; case 0x26:prefix##_##26();break; case 0x27:prefix##_##27();break; \
- case 0x28:prefix##_##28();break; case 0x29:prefix##_##29();break; case 0x2a:prefix##_##2a();break; case 0x2b:prefix##_##2b();break; \
- case 0x2c:prefix##_##2c();break; case 0x2d:prefix##_##2d();break; case 0x2e:prefix##_##2e();break; case 0x2f:prefix##_##2f();break; \
- case 0x30:prefix##_##30();break; case 0x31:prefix##_##31();break; case 0x32:prefix##_##32();break; case 0x33:prefix##_##33();break; \
- case 0x34:prefix##_##34();break; case 0x35:prefix##_##35();break; case 0x36:prefix##_##36();break; case 0x37:prefix##_##37();break; \
- case 0x38:prefix##_##38();break; case 0x39:prefix##_##39();break; case 0x3a:prefix##_##3a();break; case 0x3b:prefix##_##3b();break; \
- case 0x3c:prefix##_##3c();break; case 0x3d:prefix##_##3d();break; case 0x3e:prefix##_##3e();break; case 0x3f:prefix##_##3f();break; \
- case 0x40:prefix##_##40();break; case 0x41:prefix##_##41();break; case 0x42:prefix##_##42();break; case 0x43:prefix##_##43();break; \
- case 0x44:prefix##_##44();break; case 0x45:prefix##_##45();break; case 0x46:prefix##_##46();break; case 0x47:prefix##_##47();break; \
- case 0x48:prefix##_##48();break; case 0x49:prefix##_##49();break; case 0x4a:prefix##_##4a();break; case 0x4b:prefix##_##4b();break; \
- case 0x4c:prefix##_##4c();break; case 0x4d:prefix##_##4d();break; case 0x4e:prefix##_##4e();break; case 0x4f:prefix##_##4f();break; \
- case 0x50:prefix##_##50();break; case 0x51:prefix##_##51();break; case 0x52:prefix##_##52();break; case 0x53:prefix##_##53();break; \
- case 0x54:prefix##_##54();break; case 0x55:prefix##_##55();break; case 0x56:prefix##_##56();break; case 0x57:prefix##_##57();break; \
- case 0x58:prefix##_##58();break; case 0x59:prefix##_##59();break; case 0x5a:prefix##_##5a();break; case 0x5b:prefix##_##5b();break; \
- case 0x5c:prefix##_##5c();break; case 0x5d:prefix##_##5d();break; case 0x5e:prefix##_##5e();break; case 0x5f:prefix##_##5f();break; \
- case 0x60:prefix##_##60();break; case 0x61:prefix##_##61();break; case 0x62:prefix##_##62();break; case 0x63:prefix##_##63();break; \
- case 0x64:prefix##_##64();break; case 0x65:prefix##_##65();break; case 0x66:prefix##_##66();break; case 0x67:prefix##_##67();break; \
- case 0x68:prefix##_##68();break; case 0x69:prefix##_##69();break; case 0x6a:prefix##_##6a();break; case 0x6b:prefix##_##6b();break; \
- case 0x6c:prefix##_##6c();break; case 0x6d:prefix##_##6d();break; case 0x6e:prefix##_##6e();break; case 0x6f:prefix##_##6f();break; \
- case 0x70:prefix##_##70();break; case 0x71:prefix##_##71();break; case 0x72:prefix##_##72();break; case 0x73:prefix##_##73();break; \
- case 0x74:prefix##_##74();break; case 0x75:prefix##_##75();break; case 0x76:prefix##_##76();break; case 0x77:prefix##_##77();break; \
- case 0x78:prefix##_##78();break; case 0x79:prefix##_##79();break; case 0x7a:prefix##_##7a();break; case 0x7b:prefix##_##7b();break; \
- case 0x7c:prefix##_##7c();break; case 0x7d:prefix##_##7d();break; case 0x7e:prefix##_##7e();break; case 0x7f:prefix##_##7f();break; \
- case 0x80:prefix##_##80();break; case 0x81:prefix##_##81();break; case 0x82:prefix##_##82();break; case 0x83:prefix##_##83();break; \
- case 0x84:prefix##_##84();break; case 0x85:prefix##_##85();break; case 0x86:prefix##_##86();break; case 0x87:prefix##_##87();break; \
- case 0x88:prefix##_##88();break; case 0x89:prefix##_##89();break; case 0x8a:prefix##_##8a();break; case 0x8b:prefix##_##8b();break; \
- case 0x8c:prefix##_##8c();break; case 0x8d:prefix##_##8d();break; case 0x8e:prefix##_##8e();break; case 0x8f:prefix##_##8f();break; \
- case 0x90:prefix##_##90();break; case 0x91:prefix##_##91();break; case 0x92:prefix##_##92();break; case 0x93:prefix##_##93();break; \
- case 0x94:prefix##_##94();break; case 0x95:prefix##_##95();break; case 0x96:prefix##_##96();break; case 0x97:prefix##_##97();break; \
- case 0x98:prefix##_##98();break; case 0x99:prefix##_##99();break; case 0x9a:prefix##_##9a();break; case 0x9b:prefix##_##9b();break; \
- case 0x9c:prefix##_##9c();break; case 0x9d:prefix##_##9d();break; case 0x9e:prefix##_##9e();break; case 0x9f:prefix##_##9f();break; \
- case 0xa0:prefix##_##a0();break; case 0xa1:prefix##_##a1();break; case 0xa2:prefix##_##a2();break; case 0xa3:prefix##_##a3();break; \
- case 0xa4:prefix##_##a4();break; case 0xa5:prefix##_##a5();break; case 0xa6:prefix##_##a6();break; case 0xa7:prefix##_##a7();break; \
- case 0xa8:prefix##_##a8();break; case 0xa9:prefix##_##a9();break; case 0xaa:prefix##_##aa();break; case 0xab:prefix##_##ab();break; \
- case 0xac:prefix##_##ac();break; case 0xad:prefix##_##ad();break; case 0xae:prefix##_##ae();break; case 0xaf:prefix##_##af();break; \
- case 0xb0:prefix##_##b0();break; case 0xb1:prefix##_##b1();break; case 0xb2:prefix##_##b2();break; case 0xb3:prefix##_##b3();break; \
- case 0xb4:prefix##_##b4();break; case 0xb5:prefix##_##b5();break; case 0xb6:prefix##_##b6();break; case 0xb7:prefix##_##b7();break; \
- case 0xb8:prefix##_##b8();break; case 0xb9:prefix##_##b9();break; case 0xba:prefix##_##ba();break; case 0xbb:prefix##_##bb();break; \
- case 0xbc:prefix##_##bc();break; case 0xbd:prefix##_##bd();break; case 0xbe:prefix##_##be();break; case 0xbf:prefix##_##bf();break; \
- case 0xc0:prefix##_##c0();break; case 0xc1:prefix##_##c1();break; case 0xc2:prefix##_##c2();break; case 0xc3:prefix##_##c3();break; \
- case 0xc4:prefix##_##c4();break; case 0xc5:prefix##_##c5();break; case 0xc6:prefix##_##c6();break; case 0xc7:prefix##_##c7();break; \
- case 0xc8:prefix##_##c8();break; case 0xc9:prefix##_##c9();break; case 0xca:prefix##_##ca();break; case 0xcb:prefix##_##cb();break; \
- case 0xcc:prefix##_##cc();break; case 0xcd:prefix##_##cd();break; case 0xce:prefix##_##ce();break; case 0xcf:prefix##_##cf();break; \
- case 0xd0:prefix##_##d0();break; case 0xd1:prefix##_##d1();break; case 0xd2:prefix##_##d2();break; case 0xd3:prefix##_##d3();break; \
- case 0xd4:prefix##_##d4();break; case 0xd5:prefix##_##d5();break; case 0xd6:prefix##_##d6();break; case 0xd7:prefix##_##d7();break; \
- case 0xd8:prefix##_##d8();break; case 0xd9:prefix##_##d9();break; case 0xda:prefix##_##da();break; case 0xdb:prefix##_##db();break; \
- case 0xdc:prefix##_##dc();break; case 0xdd:prefix##_##dd();break; case 0xde:prefix##_##de();break; case 0xdf:prefix##_##df();break; \
- case 0xe0:prefix##_##e0();break; case 0xe1:prefix##_##e1();break; case 0xe2:prefix##_##e2();break; case 0xe3:prefix##_##e3();break; \
- case 0xe4:prefix##_##e4();break; case 0xe5:prefix##_##e5();break; case 0xe6:prefix##_##e6();break; case 0xe7:prefix##_##e7();break; \
- case 0xe8:prefix##_##e8();break; case 0xe9:prefix##_##e9();break; case 0xea:prefix##_##ea();break; case 0xeb:prefix##_##eb();break; \
- case 0xec:prefix##_##ec();break; case 0xed:prefix##_##ed();break; case 0xee:prefix##_##ee();break; case 0xef:prefix##_##ef();break; \
- case 0xf0:prefix##_##f0();break; case 0xf1:prefix##_##f1();break; case 0xf2:prefix##_##f2();break; case 0xf3:prefix##_##f3();break; \
- case 0xf4:prefix##_##f4();break; case 0xf5:prefix##_##f5();break; case 0xf6:prefix##_##f6();break; case 0xf7:prefix##_##f7();break; \
- case 0xf8:prefix##_##f8();break; case 0xf9:prefix##_##f9();break; case 0xfa:prefix##_##fa();break; case 0xfb:prefix##_##fb();break; \
- case 0xfc:prefix##_##fc();break; case 0xfd:prefix##_##fd();break; case 0xfe:prefix##_##fe();break; case 0xff:prefix##_##ff();break; \
- } \
-} while (0)
-
-/***************************************************************
* Enter halt state; write 1 to callback on first execution
***************************************************************/
-inline void z80_device::halt()
+void z80_device::halt()
{
if (!m_halt)
{
@@ -299,7 +231,7 @@ inline void z80_device::halt()
/***************************************************************
* Leave halt state; write 0 to callback
***************************************************************/
-inline void z80_device::leave_halt()
+void z80_device::leave_halt()
{
if (m_halt)
{
@@ -309,90 +241,19 @@ inline void z80_device::leave_halt()
}
/***************************************************************
- * Input a byte from given I/O port
- ***************************************************************/
-inline u8 z80_device::in(u16 port)
-{
- u8 res = m_io.read_byte(port);
- T(m_iorq_cycles);
- return res;
-}
-
-/***************************************************************
- * Output a byte to given I/O port
- ***************************************************************/
-inline void z80_device::out(u16 port, u8 value)
-{
- m_io.write_byte(port, value);
- T(m_iorq_cycles);
-}
-
-/***************************************************************
* Read a byte from given memory location
***************************************************************/
-inline u8 z80_device::data_read(u16 addr)
-{
- return m_data.read_byte(translate_memory_address(addr));
-}
-
-u8 z80_device::rm(u16 addr)
+u8 z80_device::data_read(u16 addr)
{
- u8 res = data_read(addr);
- T(m_memrq_cycles);
- return res;
-}
-
-u8 z80_device::rm_reg(u16 addr)
-{
- u8 res = rm(addr);
- nomreq_addr(addr, 1);
- return res;
-}
-
-/***************************************************************
- * Read a word from given memory location
- ***************************************************************/
-inline void z80_device::rm16(u16 addr, PAIR &r)
-{
- r.b.l = data_read(addr);
- T(m_memrq_cycles);
- r.b.h = data_read(addr + 1);
- T(m_memrq_cycles);
+ return m_data.read_interruptible(translate_memory_address(addr));
}
/***************************************************************
* Write a byte to given memory location
***************************************************************/
-inline void z80_device::data_write(u16 addr, u8 value)
-{
- m_data.write_byte(translate_memory_address((u32)addr), value);
-}
-
-inline void z80_device::wm(u16 addr, u8 value)
-{
- data_write(addr, value);
- T(m_memrq_cycles);
-}
-
-/***************************************************************
- * Write a word to given memory location
- ***************************************************************/
-inline void z80_device::wm16(u16 addr, PAIR &r)
-{
- wm(addr, r.b.l);
- wm(addr + 1, r.b.h);
-}
-
-/***************************************************************
- * Write a word to (SP)
- * in: TDAT
- ***************************************************************/
-inline void z80_device::wm16_sp(PAIR &r)
+void z80_device::data_write(u16 addr, u8 value)
{
- SP--;
- wm(SPD, r.b.h);
- SP--;
- wm(SPD, r.b.l);
+ m_data.write_interruptible(translate_memory_address((u32)addr), value);
}
/***************************************************************
@@ -400,25 +261,11 @@ inline void z80_device::wm16_sp(PAIR &r)
* reading opcodes. In case of system with memory mapped I/O,
* this function can be used to greatly speed up emulation
***************************************************************/
-inline u8 z80_device::opcode_read()
+u8 z80_device::opcode_read()
{
return m_opcodes.read_byte(translate_memory_address(PCD));
}
-u8 z80_device::rop()
-{
- u8 res = opcode_read();
- T(m_m1_cycles - 2);
- m_refresh_cb((m_i << 8) | (m_r2 & 0x80) | (m_r & 0x7f), 0x00, 0xff);
- T(2);
- PC++;
- m_r++;
- Q = m_qtemp;
- m_qtemp = YF | XF;
-
- return res;
-}
-
/****************************************************************
* arg() is identical to rop() except it is used
* for reading opcode arguments. This difference can be used to
@@ -426,251 +273,33 @@ u8 z80_device::rop()
* opcodes and opcode arguments
* out: TDAT8
***************************************************************/
-inline u8 z80_device::arg_read()
+u8 z80_device::arg_read()
{
return m_args.read_byte(translate_memory_address(PCD));
}
-u8 z80_device::arg()
-{
- u8 res = arg_read();
- T(m_memrq_cycles);
- PC++;
-
- return res;
-}
-
-u16 z80_device::arg16()
-{
- u8 const res = arg();
-
- return (u16(arg()) << 8) | res;
-}
-
-/***************************************************************
- * Calculate the effective address EA of an opcode using
- * IX+offset resp. IY+offset addressing.
- ***************************************************************/
-inline void z80_device::eax()
-{
- m_ea = (u32)(u16)(IX + (s8)arg());
- WZ = m_ea;
-}
-
-inline void z80_device::eay()
-{
- m_ea = (u32)(u16)(IY + (s8)arg());
- WZ = m_ea;
-}
-
-/***************************************************************
- * POP
- ***************************************************************/
-inline void z80_device::pop(PAIR &r)
-{
- rm16(SPD, r);
- SP += 2;
-}
-
-/***************************************************************
- * PUSH
- ***************************************************************/
-inline void z80_device::push(PAIR &r)
-{
- nomreq_ir(1);
- wm16_sp(r);
-}
-
-/***************************************************************
- * JP
- ***************************************************************/
-inline void z80_device::jp(void)
-{
- PCD = arg16();
- WZ = PCD;
-}
-
-/***************************************************************
- * JP_COND
- ***************************************************************/
-inline void z80_device::jp_cond(bool cond)
-{
- if (cond)
- {
- PCD = arg16();
- WZ = PCD;
- }
- else
- WZ = arg16(); // implicit do PC += 2
-}
-
-/***************************************************************
- * JR
- ***************************************************************/
-inline void z80_device::jr()
-{
- s8 a = (s8)arg(); // arg() also increments PC
- nomreq_addr(PCD - 1, 5);
- PC += a; // so don't do PC += arg()
- WZ = PC;
-}
-
-/***************************************************************
- * JR_COND
- ***************************************************************/
-inline void z80_device::jr_cond(bool cond, u8 opcode)
-{
- if (cond)
- {
- jr();
- }
- else
- {
- arg();
- // nomreq_addr(PCD, 3);
- // PC++;
- }
-}
-
-/***************************************************************
- * CALL
- ***************************************************************/
-inline void z80_device::call()
-{
- m_ea = arg16();
- nomreq_addr(PCD - 1, 1);
- WZ = m_ea;
- wm16_sp(m_pc);
- PCD = m_ea;
-}
-
-/***************************************************************
- * CALL_COND
- ***************************************************************/
-inline void z80_device::call_cond(bool cond, u8 opcode)
-{
- if (cond)
- {
- m_ea = arg16();
- nomreq_addr(PCD - 1, 1);
- WZ = m_ea;
- wm16_sp(m_pc);
- PCD = m_ea;
- }
- else
- WZ = arg16(); // implicit call PC+=2;
-}
-
-/***************************************************************
- * RET_COND
- ***************************************************************/
-inline void z80_device::ret_cond(bool cond, u8 opcode)
-{
- nomreq_ir(1);
- if (cond)
- {
- pop(m_pc);
- WZ = PC;
- }
-}
-
-/***************************************************************
- * RETN
- ***************************************************************/
-inline void z80_device::retn()
-{
- LOGINT("RETN m_iff1:%d m_iff2:%d\n", m_iff1, m_iff2);
- pop(m_pc);
- WZ = PC;
- m_iff1 = m_iff2;
-}
-
-/***************************************************************
- * RETI
- ***************************************************************/
-inline void z80_device::reti()
-{
- pop(m_pc);
- WZ = PC;
- m_iff1 = m_iff2;
- daisy_call_reti_device();
-}
-
-/***************************************************************
- * LD R,A
- ***************************************************************/
-inline void z80_device::ld_r_a()
-{
- nomreq_ir(1);
- m_r = A;
- m_r2 = A & 0x80; // keep bit 7 of r
-}
-
-/***************************************************************
- * LD A,R
- ***************************************************************/
-inline void z80_device::ld_a_r()
-{
- nomreq_ir(1);
- A = (m_r & 0x7f) | m_r2;
- set_f((F & CF) | SZ[A] | (m_iff2 << 2));
- m_after_ldair = true;
-}
-
-/***************************************************************
- * LD I,A
- ***************************************************************/
-inline void z80_device::ld_i_a()
-{
- nomreq_ir(1);
- m_i = A;
-}
-
-/***************************************************************
- * LD A,I
- ***************************************************************/
-inline void z80_device::ld_a_i()
-{
- nomreq_ir(1);
- A = m_i;
- set_f((F & CF) | SZ[A] | (m_iff2 << 2));
- m_after_ldair = true;
-}
-
-/***************************************************************
- * RST
- ***************************************************************/
-inline void z80_device::rst(u16 addr)
-{
- push(m_pc);
- PCD = addr;
- WZ = PC;
-}
-
/***************************************************************
* INC r8
***************************************************************/
-inline u8 z80_device::inc(u8 value)
+void z80_device::inc(u8 &r)
{
- u8 res = value + 1;
- set_f((F & CF) | SZHV_inc[res]);
- return (u8)res;
+ ++r;
+ set_f((F & CF) | SZHV_inc[r]);
}
/***************************************************************
* DEC r8
***************************************************************/
-inline u8 z80_device::dec(u8 value)
+void z80_device::dec(u8 &r)
{
- u8 res = value - 1;
- set_f((F & CF) | SZHV_dec[res]);
- return res;
+ --r;
+ set_f((F & CF) | SZHV_dec[r]);
}
/***************************************************************
* RLCA
***************************************************************/
-inline void z80_device::rlca()
+void z80_device::rlca()
{
A = (A << 1) | (A >> 7);
set_f((F & (SF | ZF | PF)) | (A & (YF | XF | CF)));
@@ -679,7 +308,7 @@ inline void z80_device::rlca()
/***************************************************************
* RRCA
***************************************************************/
-inline void z80_device::rrca()
+void z80_device::rrca()
{
set_f((F & (SF | ZF | PF)) | (A & CF));
A = (A >> 1) | (A << 7);
@@ -689,7 +318,7 @@ inline void z80_device::rrca()
/***************************************************************
* RLA
***************************************************************/
-inline void z80_device::rla()
+void z80_device::rla()
{
u8 res = (A << 1) | (F & CF);
u8 c = (A & 0x80) ? CF : 0;
@@ -700,7 +329,7 @@ inline void z80_device::rla()
/***************************************************************
* RRA
***************************************************************/
-inline void z80_device::rra()
+void z80_device::rra()
{
u8 res = (A >> 1) | (F << 7);
u8 c = (A & 0x01) ? CF : 0;
@@ -709,35 +338,9 @@ inline void z80_device::rra()
}
/***************************************************************
- * RRD
- ***************************************************************/
-inline void z80_device::rrd()
-{
- u8 n = rm(HL);
- WZ = HL + 1;
- nomreq_addr(HL, 4);
- wm(HL, (n >> 4) | (A << 4));
- A = (A & 0xf0) | (n & 0x0f);
- set_f((F & CF) | SZP[A]);
-}
-
-/***************************************************************
- * RLD
- ***************************************************************/
-inline void z80_device::rld()
-{
- u8 n = rm(HL);
- WZ = HL + 1;
- nomreq_addr(HL, 4);
- wm(HL, (n << 4) | (A & 0x0f));
- A = (A & 0xf0) | (n >> 4);
- set_f((F & CF) | SZP[A]);
-}
-
-/***************************************************************
* ADD A,n
***************************************************************/
-inline void z80_device::add_a(u8 value)
+void z80_device::add_a(u8 value)
{
u32 ah = AFD & 0xff00;
u32 res = (u8)((ah >> 8) + value);
@@ -748,7 +351,7 @@ inline void z80_device::add_a(u8 value)
/***************************************************************
* ADC A,n
***************************************************************/
-inline void z80_device::adc_a(u8 value)
+void z80_device::adc_a(u8 value)
{
u32 ah = AFD & 0xff00, c = AFD & 1;
u32 res = (u8)((ah >> 8) + value + c);
@@ -759,7 +362,7 @@ inline void z80_device::adc_a(u8 value)
/***************************************************************
* SUB n
***************************************************************/
-inline void z80_device::sub(u8 value)
+void z80_device::sub(u8 value)
{
u32 ah = AFD & 0xff00;
u32 res = (u8)((ah >> 8) - value);
@@ -770,7 +373,7 @@ inline void z80_device::sub(u8 value)
/***************************************************************
* SBC A,n
***************************************************************/
-inline void z80_device::sbc_a(u8 value)
+void z80_device::sbc_a(u8 value)
{
u32 ah = AFD & 0xff00, c = AFD & 1;
u32 res = (u8)((ah >> 8) - value - c);
@@ -781,7 +384,7 @@ inline void z80_device::sbc_a(u8 value)
/***************************************************************
* NEG
***************************************************************/
-inline void z80_device::neg()
+void z80_device::neg()
{
u8 value = A;
A = 0;
@@ -791,32 +394,28 @@ inline void z80_device::neg()
/***************************************************************
* DAA
***************************************************************/
-inline void z80_device::daa()
+void z80_device::daa()
{
u8 a = A;
if (F & NF)
{
- if ((F & HF) | ((A & 0xf) > 9))
- a -= 6;
- if ((F & CF) | (A > 0x99))
- a -= 0x60;
+ if ((F&HF) | ((A&0xf)>9)) a-=6;
+ if ((F&CF) | (A>0x99)) a-=0x60;
}
else
{
- if ((F & HF) | ((A & 0xf) > 9))
- a += 6;
- if ((F & CF) | (A > 0x99))
- a += 0x60;
+ if ((F&HF) | ((A&0xf)>9)) a+=6;
+ if ((F&CF) | (A>0x99)) a+=0x60;
}
- set_f((F & (CF | NF)) | (A > 0x99) | ((A ^ a) & HF) | SZP[a]);
+ set_f((F&(CF|NF)) | (A>0x99) | ((A^a)&HF) | SZP[a]);
A = a;
}
/***************************************************************
* AND n
***************************************************************/
-inline void z80_device::and_a(u8 value)
+void z80_device::and_a(u8 value)
{
A &= value;
set_f(SZP[A] | HF);
@@ -825,7 +424,7 @@ inline void z80_device::and_a(u8 value)
/***************************************************************
* OR n
***************************************************************/
-inline void z80_device::or_a(u8 value)
+void z80_device::or_a(u8 value)
{
A |= value;
set_f(SZP[A]);
@@ -834,7 +433,7 @@ inline void z80_device::or_a(u8 value)
/***************************************************************
* XOR n
***************************************************************/
-inline void z80_device::xor_a(u8 value)
+void z80_device::xor_a(u8 value)
{
A ^= value;
set_f(SZP[A]);
@@ -843,7 +442,7 @@ inline void z80_device::xor_a(u8 value)
/***************************************************************
* CP n
***************************************************************/
-inline void z80_device::cp(u8 value)
+void z80_device::cp(u8 value)
{
unsigned val = value;
u32 ah = AFD & 0xff00;
@@ -854,7 +453,7 @@ inline void z80_device::cp(u8 value)
/***************************************************************
* EXX
***************************************************************/
-inline void z80_device::exx()
+void z80_device::exx()
{
using std::swap;
swap(m_bc, m_bc2);
@@ -863,70 +462,9 @@ inline void z80_device::exx()
}
/***************************************************************
- * EX (SP),r16
- * in: TDAT
- ***************************************************************/
-inline void z80_device::ex_sp(PAIR &r)
-{
- PAIR tmp = {{0, 0, 0, 0}};
- pop(tmp);
- nomreq_addr(SPD - 1, 1);
- wm16_sp(r);
- nomreq_addr(SPD, 2);
- r = tmp;
- WZ = r.d;
-}
-
-/***************************************************************
- * ADD16
- ***************************************************************/
-inline void z80_device::add16(PAIR &dr, PAIR &sr)
-{
- nomreq_ir(7);
- u32 res = dr.d + sr.d;
- WZ = dr.d + 1;
- set_f((F & (SF | ZF | VF)) |
- (((dr.d ^ res ^ sr.d) >> 8) & HF) |
- ((res >> 16) & CF) | ((res >> 8) & (YF | XF)));
- dr.w.l = (u16)res;
-}
-
-/***************************************************************
- * ADC HL,r16
- ***************************************************************/
-inline void z80_device::adc_hl(PAIR &r)
-{
- nomreq_ir(7);
- u32 res = HLD + r.d + (F & CF);
- WZ = HL + 1;
- set_f((((HLD ^ res ^ r.d) >> 8) & HF) |
- ((res >> 16) & CF) |
- ((res >> 8) & (SF | YF | XF)) |
- ((res & 0xffff) ? 0 : ZF) |
- (((r.d ^ HLD ^ 0x8000) & (r.d ^ res) & 0x8000) >> 13));
- HL = (u16)res;
-}
-
-/***************************************************************
- * SBC HL,r16
- ***************************************************************/
-inline void z80_device::sbc_hl(PAIR &r)
-{
- nomreq_ir(7);
- u32 res = HLD - r.d - (F & CF);
- WZ = HL + 1;
- set_f((((HLD ^ res ^ r.d) >> 8) & HF) | NF |
- ((res >> 16) & CF) |
- ((res >> 8) & (SF | YF | XF)) |
- ((res & 0xffff) ? 0 : ZF) |
- (((r.d ^ HLD) & (HLD ^ res) & 0x8000) >> 13));
- HL = (u16)res;
-}
-
-/***************************************************************
* RLC r8
***************************************************************/
-inline u8 z80_device::rlc(u8 value)
+u8 z80_device::rlc(u8 value)
{
unsigned res = value;
unsigned c = (res & 0x80) ? CF : 0;
@@ -938,7 +476,7 @@ inline u8 z80_device::rlc(u8 value)
/***************************************************************
* RRC r8
***************************************************************/
-inline u8 z80_device::rrc(u8 value)
+u8 z80_device::rrc(u8 value)
{
unsigned res = value;
unsigned c = (res & 0x01) ? CF : 0;
@@ -950,7 +488,7 @@ inline u8 z80_device::rrc(u8 value)
/***************************************************************
* RL r8
***************************************************************/
-inline u8 z80_device::rl(u8 value)
+u8 z80_device::rl(u8 value)
{
unsigned res = value;
unsigned c = (res & 0x80) ? CF : 0;
@@ -962,7 +500,7 @@ inline u8 z80_device::rl(u8 value)
/***************************************************************
* RR r8
***************************************************************/
-inline u8 z80_device::rr(u8 value)
+u8 z80_device::rr(u8 value)
{
unsigned res = value;
unsigned c = (res & 0x01) ? CF : 0;
@@ -974,7 +512,7 @@ inline u8 z80_device::rr(u8 value)
/***************************************************************
* SLA r8
***************************************************************/
-inline u8 z80_device::sla(u8 value)
+u8 z80_device::sla(u8 value)
{
unsigned res = value;
unsigned c = (res & 0x80) ? CF : 0;
@@ -986,7 +524,7 @@ inline u8 z80_device::sla(u8 value)
/***************************************************************
* SRA r8
***************************************************************/
-inline u8 z80_device::sra(u8 value)
+u8 z80_device::sra(u8 value)
{
unsigned res = value;
unsigned c = (res & 0x01) ? CF : 0;
@@ -998,7 +536,7 @@ inline u8 z80_device::sra(u8 value)
/***************************************************************
* SLL r8
***************************************************************/
-inline u8 z80_device::sll(u8 value)
+u8 z80_device::sll(u8 value)
{
unsigned res = value;
unsigned c = (res & 0x80) ? CF : 0;
@@ -1010,7 +548,7 @@ inline u8 z80_device::sll(u8 value)
/***************************************************************
* SRL r8
***************************************************************/
-inline u8 z80_device::srl(u8 value)
+u8 z80_device::srl(u8 value)
{
unsigned res = value;
unsigned c = (res & 0x01) ? CF : 0;
@@ -1022,7 +560,7 @@ inline u8 z80_device::srl(u8 value)
/***************************************************************
* BIT bit,r8
***************************************************************/
-inline void z80_device::bit(int bit, u8 value)
+void z80_device::bit(int bit, u8 value)
{
set_f((F & CF) | HF | (SZ_BIT[value & (1 << bit)] & ~(YF | XF)) | (value & (YF | XF)));
}
@@ -1030,7 +568,7 @@ inline void z80_device::bit(int bit, u8 value)
/***************************************************************
* BIT bit,(HL)
***************************************************************/
-inline void z80_device::bit_hl(int bit, u8 value)
+void z80_device::bit_hl(int bit, u8 value)
{
set_f((F & CF) | HF | (SZ_BIT[value & (1 << bit)] & ~(YF | XF)) | (WZ_H & (YF | XF)));
}
@@ -1038,7 +576,7 @@ inline void z80_device::bit_hl(int bit, u8 value)
/***************************************************************
* BIT bit,(IX/Y+o)
***************************************************************/
-inline void z80_device::bit_xy(int bit, u8 value)
+void z80_device::bit_xy(int bit, u8 value)
{
set_f((F & CF) | HF | (SZ_BIT[value & (1 << bit)] & ~(YF | XF)) | ((m_ea >> 8) & (YF | XF)));
}
@@ -1046,7 +584,7 @@ inline void z80_device::bit_xy(int bit, u8 value)
/***************************************************************
* RES bit,r8
***************************************************************/
-inline u8 z80_device::res(int bit, u8 value)
+u8 z80_device::res(int bit, u8 value)
{
return value & ~(1 << bit);
}
@@ -1054,2279 +592,62 @@ inline u8 z80_device::res(int bit, u8 value)
/***************************************************************
* SET bit,r8
***************************************************************/
-inline u8 z80_device::set(int bit, u8 value)
+u8 z80_device::set(int bit, u8 value)
{
return value | (1 << bit);
}
-/***************************************************************
- * LDI
- ***************************************************************/
-inline void z80_device::ldi()
-{
- u8 io = rm(HL);
- wm(DE, io);
- nomreq_addr(DE, 2);
- set_f(F & (SF | ZF | CF));
- if ((A + io) & 0x02)
- F |= YF; // bit 1 -> flag 5
- if ((A + io) & 0x08)
- F |= XF; // bit 3 -> flag 3
- HL++;
- DE++;
- BC--;
- if (BC)
- F |= VF;
-}
-
-/***************************************************************
- * CPI
- ***************************************************************/
-inline void z80_device::cpi()
-{
- u8 val = rm(HL);
- nomreq_addr(HL, 5);
- u8 res = A - val;
- WZ++;
- HL++;
- BC--;
- set_f((F & CF) | (SZ[res] & ~(YF | XF)) | ((A ^ val ^ res) & HF) | NF);
- if (F & HF)
- res -= 1;
- if (res & 0x02)
- F |= YF; // bit 1 -> flag 5
- if (res & 0x08)
- F |= XF; // bit 3 -> flag 3
- if (BC)
- F |= VF;
-}
-
-/***************************************************************
- * INI
- ***************************************************************/
-inline u8 z80_device::ini()
-{
- nomreq_ir(1);
- const u8 io = in(BC);
- WZ = BC + 1;
- B--;
- wm(HL, io);
- HL++;
- set_f(SZ[B]);
- unsigned t = (unsigned)((C + 1) & 0xff) + (unsigned)io;
- if (io & SF)
- F |= NF;
- if (t & 0x100)
- F |= HF | CF;
- F |= SZP[(u8)(t & 0x07) ^ B] & PF;
-
- return io;
-}
-
-/***************************************************************
- * OUTI
- ***************************************************************/
-inline u8 z80_device::outi()
-{
- nomreq_ir(1);
- const u8 io = rm(HL);
- B--;
- WZ = BC + 1;
- out(BC, io);
- HL++;
- set_f(SZ[B]);
- unsigned t = (unsigned)L + (unsigned)io;
- if (io & SF)
- F |= NF;
- if (t & 0x100)
- F |= HF | CF;
- F |= SZP[(u8)(t & 0x07) ^ B] & PF;
-
- return io;
-}
-
-/***************************************************************
- * LDD
- ***************************************************************/
-inline void z80_device::ldd()
-{
- const u8 io = rm(HL);
- wm(DE, io);
- nomreq_addr(DE, 2);
- set_f(F & (SF | ZF | CF));
- if ((A + io) & 0x02)
- F |= YF; // bit 1 -> flag 5
- if ((A + io) & 0x08)
- F |= XF; // bit 3 -> flag 3
- HL--;
- DE--;
- BC--;
- if (BC)
- F |= VF;
-}
-
-/***************************************************************
- * CPD
- ***************************************************************/
-inline void z80_device::cpd()
-{
- u8 val = rm(HL);
- nomreq_addr(HL, 5);
- u8 res = A - val;
- WZ--;
- HL--;
- BC--;
- set_f((F & CF) | (SZ[res] & ~(YF | XF)) | ((A ^ val ^ res) & HF) | NF);
- if (F & HF)
- res -= 1;
- if (res & 0x02)
- F |= YF; // bit 1 -> flag 5
- if (res & 0x08)
- F |= XF; // bit 3 -> flag 3
- if (BC)
- F |= VF;
-}
-
-/***************************************************************
- * IND
- ***************************************************************/
-inline u8 z80_device::ind()
-{
- nomreq_ir(1);
- const u8 io = in(BC);
- WZ = BC - 1;
- B--;
- wm(HL, io);
- HL--;
- set_f(SZ[B]);
- unsigned t = ((unsigned)(C - 1) & 0xff) + (unsigned)io;
- if (io & SF)
- F |= NF;
- if (t & 0x100)
- F |= HF | CF;
- F |= SZP[(u8)(t & 0x07) ^ B] & PF;
-
- return io;
-}
-
-/***************************************************************
- * OUTD
- ***************************************************************/
-inline u8 z80_device::outd()
-{
- nomreq_ir(1);
- const u8 io = rm(HL);
- B--;
- WZ = BC - 1;
- out(BC, io);
- HL--;
- set_f(SZ[B]);
- unsigned t = (unsigned)L + (unsigned)io;
- if (io & SF)
- F |= NF;
- if (t & 0x100)
- F |= HF | CF;
- F |= SZP[(u8)(t & 0x07) ^ B] & PF;
-
- return io;
-}
-
-/***************************************************************
- * LDIR
- ***************************************************************/
-inline void z80_device::ldir()
-{
- ldi();
- if (BC != 0)
- {
- nomreq_addr(DE, 5);
- PC -= 2;
- WZ = PC + 1;
- F &= ~(YF | XF);
- F |= (PC >> 8) & (YF | XF);
- }
-}
-
-/***************************************************************
- * CPIR
- ***************************************************************/
-inline void z80_device::cpir()
-{
- cpi();
- if (BC != 0 && !(F & ZF))
- {
- nomreq_addr(HL, 5);
- PC -= 2;
- WZ = PC + 1;
- F &= ~(YF | XF);
- F |= (PC >> 8) & (YF | XF);
- }
-}
-
-inline void z80_device::block_io_interrupted_flags(u8 data)
+void z80_device::block_io_interrupted_flags()
{
F &= ~(YF | XF);
F |= (PC >> 8) & (YF | XF);
if (F & CF)
{
F &= ~HF;
- if (data & 0x80)
+ if (TDAT8 & 0x80)
{
F ^= (SZP[(B - 1) & 0x07] ^ PF) & PF;
- if ((B & 0x0f) == 0x00)
- F |= HF;
+ if ((B & 0x0f) == 0x00) F |= HF;
}
else
{
F ^= (SZP[(B + 1) & 0x07] ^ PF) & PF;
- if ((B & 0x0f) == 0x0f)
- F |= HF;
+ if ((B & 0x0f) == 0x0f) F |= HF;
}
}
else
{
- F ^= (SZP[B & 0x07] ^ PF) & PF;
- }
-}
-
-/***************************************************************
- * INIR
- ***************************************************************/
-inline void z80_device::inir()
-{
- const u8 data = ini();
- if (B != 0)
- {
- nomreq_addr(HL, 5);
- PC -= 2;
- WZ = PC + 1;
- block_io_interrupted_flags(data);
- }
-}
-
-/***************************************************************
- * OTIR
- ***************************************************************/
-inline void z80_device::otir()
-{
- const u8 data = outi();
- if (B != 0)
- {
- nomreq_addr(BC, 5);
- PC -= 2;
- WZ = PC + 1;
- block_io_interrupted_flags(data);
- }
-}
-
-/***************************************************************
- * LDDR
- ***************************************************************/
-inline void z80_device::lddr()
-{
- ldd();
- if (BC != 0)
- {
- nomreq_addr(DE, 5);
- PC -= 2;
- WZ = PC + 1;
- F &= ~(YF | XF);
- F |= (PC >> 8) & (YF | XF);
- }
-}
-
-/***************************************************************
- * CPDR
- ***************************************************************/
-inline void z80_device::cpdr()
-{
- cpd();
- if (BC != 0 && !(F & ZF))
- {
- nomreq_addr(HL, 5);
- PC -= 2;
- WZ = PC + 1;
- F &= ~(YF | XF);
- F |= (PC >> 8) & (YF | XF);
- }
-}
-
-/***************************************************************
- * INDR
- ***************************************************************/
-inline void z80_device::indr()
-{
- const u8 data = ind();
- if (B != 0)
- {
- nomreq_addr(HL, 5);
- PC -= 2;
- WZ = PC + 1;
- block_io_interrupted_flags(data);
- }
-}
-
-/***************************************************************
- * OTDR
- ***************************************************************/
-inline void z80_device::otdr()
-{
- const u8 data = outd();
- if (B != 0)
- {
- nomreq_addr(BC, 5);
- PC -= 2;
- WZ = PC + 1;
- block_io_interrupted_flags(data);
+ F ^=(SZP[B & 0x07] ^ PF) & PF;
}
}
/***************************************************************
* EI
***************************************************************/
-inline void z80_device::ei()
+void z80_device::ei()
{
m_iff1 = m_iff2 = 1;
m_after_ei = true;
}
-inline void z80_device::set_f(u8 f)
+void z80_device::set_f(u8 f)
{
- m_qtemp = 0;
+ QT = 0;
F = f;
}
-inline void z80_device::illegal_1()
+void z80_device::illegal_1()
{
LOGUNDOC("ill. opcode $%02x $%02x ($%04x)\n",
m_opcodes.read_byte(translate_memory_address((PCD - 1) & 0xffff)), m_opcodes.read_byte(translate_memory_address(PCD)), PCD - 1);
}
-inline void z80_device::illegal_2()
+void z80_device::illegal_2()
{
LOGUNDOC("ill. opcode $ed $%02x\n",
m_opcodes.read_byte(translate_memory_address((PCD - 1) & 0xffff)));
}
-/**********************************************************
- * opcodes with CB prefix
- * rotate, shift and bit operations
- **********************************************************/
-OP(cb,00) { B = rlc(B); } /* RLC B */
-OP(cb,01) { C = rlc(C); } /* RLC C */
-OP(cb,02) { D = rlc(D); } /* RLC D */
-OP(cb,03) { E = rlc(E); } /* RLC E */
-OP(cb,04) { H = rlc(H); } /* RLC H */
-OP(cb,05) { L = rlc(L); } /* RLC L */
-OP(cb,06) { wm(HL, rlc(rm_reg(HL)));} /* RLC (HL) */
-OP(cb,07) { A = rlc(A); } /* RLC A */
-
-OP(cb,08) { B = rrc(B); } /* RRC B */
-OP(cb,09) { C = rrc(C); } /* RRC C */
-OP(cb,0a) { D = rrc(D); } /* RRC D */
-OP(cb,0b) { E = rrc(E); } /* RRC E */
-OP(cb,0c) { H = rrc(H); } /* RRC H */
-OP(cb,0d) { L = rrc(L); } /* RRC L */
-OP(cb,0e) { wm(HL, rrc(rm_reg(HL)));} /* RRC (HL) */
-OP(cb,0f) { A = rrc(A); } /* RRC A */
-
-OP(cb,10) { B = rl(B); } /* RL B */
-OP(cb,11) { C = rl(C); } /* RL C */
-OP(cb,12) { D = rl(D); } /* RL D */
-OP(cb,13) { E = rl(E); } /* RL E */
-OP(cb,14) { H = rl(H); } /* RL H */
-OP(cb,15) { L = rl(L); } /* RL L */
-OP(cb,16) { wm(HL, rl(rm_reg(HL))); } /* RL (HL) */
-OP(cb,17) { A = rl(A); } /* RL A */
-
-OP(cb,18) { B = rr(B); } /* RR B */
-OP(cb,19) { C = rr(C); } /* RR C */
-OP(cb,1a) { D = rr(D); } /* RR D */
-OP(cb,1b) { E = rr(E); } /* RR E */
-OP(cb,1c) { H = rr(H); } /* RR H */
-OP(cb,1d) { L = rr(L); } /* RR L */
-OP(cb,1e) { wm(HL, rr(rm_reg(HL))); } /* RR (HL) */
-OP(cb,1f) { A = rr(A); } /* RR A */
-
-OP(cb,20) { B = sla(B); } /* SLA B */
-OP(cb,21) { C = sla(C); } /* SLA C */
-OP(cb,22) { D = sla(D); } /* SLA D */
-OP(cb,23) { E = sla(E); } /* SLA E */
-OP(cb,24) { H = sla(H); } /* SLA H */
-OP(cb,25) { L = sla(L); } /* SLA L */
-OP(cb,26) { wm(HL, sla(rm_reg(HL)));} /* SLA (HL) */
-OP(cb,27) { A = sla(A); } /* SLA A */
-
-OP(cb,28) { B = sra(B); } /* SRA B */
-OP(cb,29) { C = sra(C); } /* SRA C */
-OP(cb,2a) { D = sra(D); } /* SRA D */
-OP(cb,2b) { E = sra(E); } /* SRA E */
-OP(cb,2c) { H = sra(H); } /* SRA H */
-OP(cb,2d) { L = sra(L); } /* SRA L */
-OP(cb,2e) { wm(HL, sra(rm_reg(HL)));} /* SRA (HL) */
-OP(cb,2f) { A = sra(A); } /* SRA A */
-
-OP(cb,30) { B = sll(B); } /* SLL B */
-OP(cb,31) { C = sll(C); } /* SLL C */
-OP(cb,32) { D = sll(D); } /* SLL D */
-OP(cb,33) { E = sll(E); } /* SLL E */
-OP(cb,34) { H = sll(H); } /* SLL H */
-OP(cb,35) { L = sll(L); } /* SLL L */
-OP(cb,36) { wm(HL, sll(rm_reg(HL)));} /* SLL (HL) */
-OP(cb,37) { A = sll(A); } /* SLL A */
-
-OP(cb,38) { B = srl(B); } /* SRL B */
-OP(cb,39) { C = srl(C); } /* SRL C */
-OP(cb,3a) { D = srl(D); } /* SRL D */
-OP(cb,3b) { E = srl(E); } /* SRL E */
-OP(cb,3c) { H = srl(H); } /* SRL H */
-OP(cb,3d) { L = srl(L); } /* SRL L */
-OP(cb,3e) { wm(HL, srl(rm_reg(HL)));} /* SRL (HL) */
-OP(cb,3f) { A = srl(A); } /* SRL A */
-
-OP(cb,40) { bit(0, B); } /* BIT 0,B */
-OP(cb,41) { bit(0, C); } /* BIT 0,C */
-OP(cb,42) { bit(0, D); } /* BIT 0,D */
-OP(cb,43) { bit(0, E); } /* BIT 0,E */
-OP(cb,44) { bit(0, H); } /* BIT 0,H */
-OP(cb,45) { bit(0, L); } /* BIT 0,L */
-OP(cb,46) { bit_hl(0, rm_reg(HL)); } /* BIT 0,(HL) */
-OP(cb,47) { bit(0, A); } /* BIT 0,A */
-
-OP(cb,48) { bit(1, B); } /* BIT 1,B */
-OP(cb,49) { bit(1, C); } /* BIT 1,C */
-OP(cb,4a) { bit(1, D); } /* BIT 1,D */
-OP(cb,4b) { bit(1, E); } /* BIT 1,E */
-OP(cb,4c) { bit(1, H); } /* BIT 1,H */
-OP(cb,4d) { bit(1, L); } /* BIT 1,L */
-OP(cb,4e) { bit_hl(1, rm_reg(HL)); } /* BIT 1,(HL) */
-OP(cb,4f) { bit(1, A); } /* BIT 1,A */
-
-OP(cb,50) { bit(2, B); } /* BIT 2,B */
-OP(cb,51) { bit(2, C); } /* BIT 2,C */
-OP(cb,52) { bit(2, D); } /* BIT 2,D */
-OP(cb,53) { bit(2, E); } /* BIT 2,E */
-OP(cb,54) { bit(2, H); } /* BIT 2,H */
-OP(cb,55) { bit(2, L); } /* BIT 2,L */
-OP(cb,56) { bit_hl(2, rm_reg(HL)); } /* BIT 2,(HL) */
-OP(cb,57) { bit(2, A); } /* BIT 2,A */
-
-OP(cb,58) { bit(3, B); } /* BIT 3,B */
-OP(cb,59) { bit(3, C); } /* BIT 3,C */
-OP(cb,5a) { bit(3, D); } /* BIT 3,D */
-OP(cb,5b) { bit(3, E); } /* BIT 3,E */
-OP(cb,5c) { bit(3, H); } /* BIT 3,H */
-OP(cb,5d) { bit(3, L); } /* BIT 3,L */
-OP(cb,5e) { bit_hl(3, rm_reg(HL)); } /* BIT 3,(HL) */
-OP(cb,5f) { bit(3, A); } /* BIT 3,A */
-
-OP(cb,60) { bit(4, B); } /* BIT 4,B */
-OP(cb,61) { bit(4, C); } /* BIT 4,C */
-OP(cb,62) { bit(4, D); } /* BIT 4,D */
-OP(cb,63) { bit(4, E); } /* BIT 4,E */
-OP(cb,64) { bit(4, H); } /* BIT 4,H */
-OP(cb,65) { bit(4, L); } /* BIT 4,L */
-OP(cb,66) { bit_hl(4, rm_reg(HL)); } /* BIT 4,(HL) */
-OP(cb,67) { bit(4, A); } /* BIT 4,A */
-
-OP(cb,68) { bit(5, B); } /* BIT 5,B */
-OP(cb,69) { bit(5, C); } /* BIT 5,C */
-OP(cb,6a) { bit(5, D); } /* BIT 5,D */
-OP(cb,6b) { bit(5, E); } /* BIT 5,E */
-OP(cb,6c) { bit(5, H); } /* BIT 5,H */
-OP(cb,6d) { bit(5, L); } /* BIT 5,L */
-OP(cb,6e) { bit_hl(5, rm_reg(HL)); } /* BIT 5,(HL) */
-OP(cb,6f) { bit(5, A); } /* BIT 5,A */
-
-OP(cb,70) { bit(6, B); } /* BIT 6,B */
-OP(cb,71) { bit(6, C); } /* BIT 6,C */
-OP(cb,72) { bit(6, D); } /* BIT 6,D */
-OP(cb,73) { bit(6, E); } /* BIT 6,E */
-OP(cb,74) { bit(6, H); } /* BIT 6,H */
-OP(cb,75) { bit(6, L); } /* BIT 6,L */
-OP(cb,76) { bit_hl(6, rm_reg(HL)); } /* BIT 6,(HL) */
-OP(cb,77) { bit(6, A); } /* BIT 6,A */
-
-OP(cb,78) { bit(7, B); } /* BIT 7,B */
-OP(cb,79) { bit(7, C); } /* BIT 7,C */
-OP(cb,7a) { bit(7, D); } /* BIT 7,D */
-OP(cb,7b) { bit(7, E); } /* BIT 7,E */
-OP(cb,7c) { bit(7, H); } /* BIT 7,H */
-OP(cb,7d) { bit(7, L); } /* BIT 7,L */
-OP(cb,7e) { bit_hl(7, rm_reg(HL)); } /* BIT 7,(HL) */
-OP(cb,7f) { bit(7, A); } /* BIT 7,A */
-
-OP(cb,80) { B = res(0, B); } /* RES 0,B */
-OP(cb,81) { C = res(0, C); } /* RES 0,C */
-OP(cb,82) { D = res(0, D); } /* RES 0,D */
-OP(cb,83) { E = res(0, E); } /* RES 0,E */
-OP(cb,84) { H = res(0, H); } /* RES 0,H */
-OP(cb,85) { L = res(0, L); } /* RES 0,L */
-OP(cb,86) { wm(HL, res(0, rm_reg(HL))); } /* RES 0,(HL) */
-OP(cb,87) { A = res(0, A); } /* RES 0,A */
-
-OP(cb,88) { B = res(1, B); } /* RES 1,B */
-OP(cb,89) { C = res(1, C); } /* RES 1,C */
-OP(cb,8a) { D = res(1, D); } /* RES 1,D */
-OP(cb,8b) { E = res(1, E); } /* RES 1,E */
-OP(cb,8c) { H = res(1, H); } /* RES 1,H */
-OP(cb,8d) { L = res(1, L); } /* RES 1,L */
-OP(cb,8e) { wm(HL, res(1, rm_reg(HL))); } /* RES 1,(HL) */
-OP(cb,8f) { A = res(1, A); } /* RES 1,A */
-
-OP(cb,90) { B = res(2, B); } /* RES 2,B */
-OP(cb,91) { C = res(2, C); } /* RES 2,C */
-OP(cb,92) { D = res(2, D); } /* RES 2,D */
-OP(cb,93) { E = res(2, E); } /* RES 2,E */
-OP(cb,94) { H = res(2, H); } /* RES 2,H */
-OP(cb,95) { L = res(2, L); } /* RES 2,L */
-OP(cb,96) { wm(HL, res(2, rm_reg(HL))); } /* RES 2,(HL) */
-OP(cb,97) { A = res(2, A); } /* RES 2,A */
-
-OP(cb,98) { B = res(3, B); } /* RES 3,B */
-OP(cb,99) { C = res(3, C); } /* RES 3,C */
-OP(cb,9a) { D = res(3, D); } /* RES 3,D */
-OP(cb,9b) { E = res(3, E); } /* RES 3,E */
-OP(cb,9c) { H = res(3, H); } /* RES 3,H */
-OP(cb,9d) { L = res(3, L); } /* RES 3,L */
-OP(cb,9e) { wm(HL, res(3, rm_reg(HL))); } /* RES 3,(HL) */
-OP(cb,9f) { A = res(3, A); } /* RES 3,A */
-
-OP(cb,a0) { B = res(4, B); } /* RES 4,B */
-OP(cb,a1) { C = res(4, C); } /* RES 4,C */
-OP(cb,a2) { D = res(4, D); } /* RES 4,D */
-OP(cb,a3) { E = res(4, E); } /* RES 4,E */
-OP(cb,a4) { H = res(4, H); } /* RES 4,H */
-OP(cb,a5) { L = res(4, L); } /* RES 4,L */
-OP(cb,a6) {wm(HL, res(4, rm_reg(HL))); } /* RES 4,(HL) */
-OP(cb,a7) { A = res(4, A); } /* RES 4,A */
-
-OP(cb,a8) { B = res(5, B); } /* RES 5,B */
-OP(cb,a9) { C = res(5, C); } /* RES 5,C */
-OP(cb,aa) { D = res(5, D); } /* RES 5,D */
-OP(cb,ab) { E = res(5, E); } /* RES 5,E */
-OP(cb,ac) { H = res(5, H); } /* RES 5,H */
-OP(cb,ad) { L = res(5, L); } /* RES 5,L */
-OP(cb,ae) { wm(HL, res(5, rm_reg(HL))); } /* RES 5,(HL) */
-OP(cb,af) { A = res(5, A); } /* RES 5,A */
-
-OP(cb,b0) { B = res(6, B); } /* RES 6,B */
-OP(cb,b1) { C = res(6, C); } /* RES 6,C */
-OP(cb,b2) { D = res(6, D); } /* RES 6,D */
-OP(cb,b3) { E = res(6, E); } /* RES 6,E */
-OP(cb,b4) { H = res(6, H); } /* RES 6,H */
-OP(cb,b5) { L = res(6, L); } /* RES 6,L */
-OP(cb,b6) { wm(HL, res(6, rm_reg(HL))); } /* RES 6,(HL) */
-OP(cb,b7) { A = res(6, A); } /* RES 6,A */
-
-OP(cb,b8) { B = res(7, B); } /* RES 7,B */
-OP(cb,b9) { C = res(7, C); } /* RES 7,C */
-OP(cb,ba) { D = res(7, D); } /* RES 7,D */
-OP(cb,bb) { E = res(7, E); } /* RES 7,E */
-OP(cb,bc) { H = res(7, H); } /* RES 7,H */
-OP(cb,bd) { L = res(7, L); } /* RES 7,L */
-OP(cb,be) { wm(HL, res(7, rm_reg(HL))); } /* RES 7,(HL) */
-OP(cb,bf) { A = res(7, A); } /* RES 7,A */
-
-OP(cb,c0) { B = set(0, B); } /* SET 0,B */
-OP(cb,c1) { C = set(0, C); } /* SET 0,C */
-OP(cb,c2) { D = set(0, D); } /* SET 0,D */
-OP(cb,c3) { E = set(0, E); } /* SET 0,E */
-OP(cb,c4) { H = set(0, H); } /* SET 0,H */
-OP(cb,c5) { L = set(0, L); } /* SET 0,L */
-OP(cb,c6) { wm(HL, set(0, rm_reg(HL))); } /* SET 0,(HL) */
-OP(cb,c7) { A = set(0, A); } /* SET 0,A */
-
-OP(cb,c8) { B = set(1, B); } /* SET 1,B */
-OP(cb,c9) { C = set(1, C); } /* SET 1,C */
-OP(cb,ca) { D = set(1, D); } /* SET 1,D */
-OP(cb,cb) { E = set(1, E); } /* SET 1,E */
-OP(cb,cc) { H = set(1, H); } /* SET 1,H */
-OP(cb,cd) { L = set(1, L); } /* SET 1,L */
-OP(cb,ce) { wm(HL, set(1, rm_reg(HL))); } /* SET 1,(HL) */
-OP(cb,cf) { A = set(1, A); } /* SET 1,A */
-
-OP(cb,d0) { B = set(2, B); } /* SET 2,B */
-OP(cb,d1) { C = set(2, C); } /* SET 2,C */
-OP(cb,d2) { D = set(2, D); } /* SET 2,D */
-OP(cb,d3) { E = set(2, E); } /* SET 2,E */
-OP(cb,d4) { H = set(2, H); } /* SET 2,H */
-OP(cb,d5) { L = set(2, L); } /* SET 2,L */
-OP(cb,d6) { wm(HL, set(2, rm_reg(HL))); } /* SET 2,(HL) */
-OP(cb,d7) { A = set(2, A); } /* SET 2,A */
-
-OP(cb,d8) { B = set(3, B); } /* SET 3,B */
-OP(cb,d9) { C = set(3, C); } /* SET 3,C */
-OP(cb,da) { D = set(3, D); } /* SET 3,D */
-OP(cb,db) { E = set(3, E); } /* SET 3,E */
-OP(cb,dc) { H = set(3, H); } /* SET 3,H */
-OP(cb,dd) { L = set(3, L); } /* SET 3,L */
-OP(cb,de) { wm(HL, set(3, rm_reg(HL))); } /* SET 3,(HL) */
-OP(cb,df) { A = set(3, A); } /* SET 3,A */
-
-OP(cb,e0) { B = set(4, B); } /* SET 4,B */
-OP(cb,e1) { C = set(4, C); } /* SET 4,C */
-OP(cb,e2) { D = set(4, D); } /* SET 4,D */
-OP(cb,e3) { E = set(4, E); } /* SET 4,E */
-OP(cb,e4) { H = set(4, H); } /* SET 4,H */
-OP(cb,e5) { L = set(4, L); } /* SET 4,L */
-OP(cb,e6) { wm(HL, set(4, rm_reg(HL))); } /* SET 4,(HL) */
-OP(cb,e7) { A = set(4, A); } /* SET 4,A */
-
-OP(cb,e8) { B = set(5, B); } /* SET 5,B */
-OP(cb,e9) { C = set(5, C); } /* SET 5,C */
-OP(cb,ea) { D = set(5, D); } /* SET 5,D */
-OP(cb,eb) { E = set(5, E); } /* SET 5,E */
-OP(cb,ec) { H = set(5, H); } /* SET 5,H */
-OP(cb,ed) { L = set(5, L); } /* SET 5,L */
-OP(cb,ee) { wm(HL, set(5, rm_reg(HL))); } /* SET 5,(HL) */
-OP(cb,ef) { A = set(5, A); } /* SET 5,A */
-
-OP(cb,f0) { B = set(6, B); } /* SET 6,B */
-OP(cb,f1) { C = set(6, C); } /* SET 6,C */
-OP(cb,f2) { D = set(6, D); } /* SET 6,D */
-OP(cb,f3) { E = set(6, E); } /* SET 6,E */
-OP(cb,f4) { H = set(6, H); } /* SET 6,H */
-OP(cb,f5) { L = set(6, L); } /* SET 6,L */
-OP(cb,f6) { wm(HL, set(6, rm_reg(HL))); } /* SET 6,(HL) */
-OP(cb,f7) { A = set(6, A); } /* SET 6,A */
-
-OP(cb,f8) { B = set(7, B); } /* SET 7,B */
-OP(cb,f9) { C = set(7, C); } /* SET 7,C */
-OP(cb,fa) { D = set(7, D); } /* SET 7,D */
-OP(cb,fb) { E = set(7, E); } /* SET 7,E */
-OP(cb,fc) { H = set(7, H); } /* SET 7,H */
-OP(cb,fd) { L = set(7, L); } /* SET 7,L */
-OP(cb,fe) { wm(HL, set(7, rm_reg(HL))); } /* SET 7,(HL) */
-OP(cb,ff) { A = set(7, A); } /* SET 7,A */
-
-
-/**********************************************************
-* opcodes with DD/FD CB prefix
-* rotate, shift and bit operations with (IX+o)
-**********************************************************/
-OP(xycb,00) { B = rlc(rm_reg(m_ea)); wm(m_ea, B); } /* RLC B=(XY+o) */
-OP(xycb,01) { C = rlc(rm_reg(m_ea)); wm(m_ea, C); } /* RLC C=(XY+o) */
-OP(xycb,02) { D = rlc(rm_reg(m_ea)); wm(m_ea, D); } /* RLC D=(XY+o) */
-OP(xycb,03) { E = rlc(rm_reg(m_ea)); wm(m_ea, E); } /* RLC E=(XY+o) */
-OP(xycb,04) { H = rlc(rm_reg(m_ea)); wm(m_ea, H); } /* RLC H=(XY+o) */
-OP(xycb,05) { L = rlc(rm_reg(m_ea)); wm(m_ea, L); } /* RLC L=(XY+o) */
-OP(xycb,06) { wm(m_ea, rlc(rm_reg(m_ea))); } /* RLC (XY+o) */
-OP(xycb,07) { A = rlc(rm_reg(m_ea)); wm(m_ea, A); } /* RLC A=(XY+o) */
-
-OP(xycb,08) { B = rrc(rm_reg(m_ea)); wm(m_ea, B); } /* RRC B=(XY+o) */
-OP(xycb,09) { C = rrc(rm_reg(m_ea)); wm(m_ea, C); } /* RRC C=(XY+o) */
-OP(xycb,0a) { D = rrc(rm_reg(m_ea)); wm(m_ea, D); } /* RRC D=(XY+o) */
-OP(xycb,0b) { E = rrc(rm_reg(m_ea)); wm(m_ea, E); } /* RRC E=(XY+o) */
-OP(xycb,0c) { H = rrc(rm_reg(m_ea)); wm(m_ea, H); } /* RRC H=(XY+o) */
-OP(xycb,0d) { L = rrc(rm_reg(m_ea)); wm(m_ea, L); } /* RRC L=(XY+o) */
-OP(xycb,0e) { wm(m_ea,rrc(rm_reg(m_ea))); } /* RRC (XY+o) */
-OP(xycb,0f) { A = rrc(rm_reg(m_ea)); wm(m_ea, A); } /* RRC A=(XY+o) */
-
-OP(xycb,10) { B = rl(rm_reg(m_ea)); wm(m_ea, B); } /* RL B=(XY+o) */
-OP(xycb,11) { C = rl(rm_reg(m_ea)); wm(m_ea, C); } /* RL C=(XY+o) */
-OP(xycb,12) { D = rl(rm_reg(m_ea)); wm(m_ea, D); } /* RL D=(XY+o) */
-OP(xycb,13) { E = rl(rm_reg(m_ea)); wm(m_ea, E); } /* RL E=(XY+o) */
-OP(xycb,14) { H = rl(rm_reg(m_ea)); wm(m_ea, H); } /* RL H=(XY+o) */
-OP(xycb,15) { L = rl(rm_reg(m_ea)); wm(m_ea, L); } /* RL L=(XY+o) */
-OP(xycb,16) { wm(m_ea,rl(rm_reg(m_ea))); } /* RL (XY+o) */
-OP(xycb,17) { A = rl(rm_reg(m_ea)); wm(m_ea, A); } /* RL A=(XY+o) */
-
-OP(xycb,18) { B = rr(rm_reg(m_ea)); wm(m_ea, B); } /* RR B=(XY+o) */
-OP(xycb,19) { C = rr(rm_reg(m_ea)); wm(m_ea, C); } /* RR C=(XY+o) */
-OP(xycb,1a) { D = rr(rm_reg(m_ea)); wm(m_ea, D); } /* RR D=(XY+o) */
-OP(xycb,1b) { E = rr(rm_reg(m_ea)); wm(m_ea, E); } /* RR E=(XY+o) */
-OP(xycb,1c) { H = rr(rm_reg(m_ea)); wm(m_ea, H); } /* RR H=(XY+o) */
-OP(xycb,1d) { L = rr(rm_reg(m_ea)); wm(m_ea, L); } /* RR L=(XY+o) */
-OP(xycb,1e) { wm(m_ea, rr(rm_reg(m_ea))); } /* RR (XY+o) */
-OP(xycb,1f) { A = rr(rm_reg(m_ea)); wm(m_ea, A); } /* RR A=(XY+o) */
-
-OP(xycb,20) { B = sla(rm_reg(m_ea)); wm(m_ea, B); } /* SLA B=(XY+o) */
-OP(xycb,21) { C = sla(rm_reg(m_ea)); wm(m_ea, C); } /* SLA C=(XY+o) */
-OP(xycb,22) { D = sla(rm_reg(m_ea)); wm(m_ea, D); } /* SLA D=(XY+o) */
-OP(xycb,23) { E = sla(rm_reg(m_ea)); wm(m_ea, E); } /* SLA E=(XY+o) */
-OP(xycb,24) { H = sla(rm_reg(m_ea)); wm(m_ea, H); } /* SLA H=(XY+o) */
-OP(xycb,25) { L = sla(rm_reg(m_ea)); wm(m_ea, L); } /* SLA L=(XY+o) */
-OP(xycb,26) { wm(m_ea, sla(rm_reg(m_ea))); } /* SLA (XY+o) */
-OP(xycb,27) { A = sla(rm_reg(m_ea)); wm(m_ea, A); } /* SLA A=(XY+o) */
-
-OP(xycb,28) { B = sra(rm_reg(m_ea)); wm(m_ea, B); } /* SRA B=(XY+o) */
-OP(xycb,29) { C = sra(rm_reg(m_ea)); wm(m_ea, C); } /* SRA C=(XY+o) */
-OP(xycb,2a) { D = sra(rm_reg(m_ea)); wm(m_ea, D); } /* SRA D=(XY+o) */
-OP(xycb,2b) { E = sra(rm_reg(m_ea)); wm(m_ea, E); } /* SRA E=(XY+o) */
-OP(xycb,2c) { H = sra(rm_reg(m_ea)); wm(m_ea, H); } /* SRA H=(XY+o) */
-OP(xycb,2d) { L = sra(rm_reg(m_ea)); wm(m_ea, L); } /* SRA L=(XY+o) */
-OP(xycb,2e) { wm(m_ea, sra(rm_reg(m_ea))); } /* SRA (XY+o) */
-OP(xycb,2f) { A = sra(rm_reg(m_ea)); wm(m_ea, A); } /* SRA A=(XY+o) */
-
-OP(xycb,30) { B = sll(rm_reg(m_ea)); wm(m_ea, B); } /* SLL B=(XY+o) */
-OP(xycb,31) { C = sll(rm_reg(m_ea)); wm(m_ea, C); } /* SLL C=(XY+o) */
-OP(xycb,32) { D = sll(rm_reg(m_ea)); wm(m_ea, D); } /* SLL D=(XY+o) */
-OP(xycb,33) { E = sll(rm_reg(m_ea)); wm(m_ea, E); } /* SLL E=(XY+o) */
-OP(xycb,34) { H = sll(rm_reg(m_ea)); wm(m_ea, H); } /* SLL H=(XY+o) */
-OP(xycb,35) { L = sll(rm_reg(m_ea)); wm(m_ea, L); } /* SLL L=(XY+o) */
-OP(xycb,36) { wm(m_ea, sll(rm_reg(m_ea))); } /* SLL (XY+o) */
-OP(xycb,37) { A = sll(rm_reg(m_ea)); wm(m_ea, A); } /* SLL A=(XY+o) */
-
-OP(xycb,38) { B = srl(rm_reg(m_ea)); wm(m_ea, B); } /* SRL B=(XY+o) */
-OP(xycb,39) { C = srl(rm_reg(m_ea)); wm(m_ea, C); } /* SRL C=(XY+o) */
-OP(xycb,3a) { D = srl(rm_reg(m_ea)); wm(m_ea, D); } /* SRL D=(XY+o) */
-OP(xycb,3b) { E = srl(rm_reg(m_ea)); wm(m_ea, E); } /* SRL E=(XY+o) */
-OP(xycb,3c) { H = srl(rm_reg(m_ea)); wm(m_ea, H); } /* SRL H=(XY+o) */
-OP(xycb,3d) { L = srl(rm_reg(m_ea)); wm(m_ea, L); } /* SRL L=(XY+o) */
-OP(xycb,3e) { wm(m_ea, srl(rm_reg(m_ea))); } /* SRL (XY+o) */
-OP(xycb,3f) { A = srl(rm_reg(m_ea)); wm(m_ea, A); } /* SRL A=(XY+o) */
-
-OP(xycb,40) { xycb_46(); } /* BIT 0,(XY+o) */
-OP(xycb,41) { xycb_46(); } /* BIT 0,(XY+o) */
-OP(xycb,42) { xycb_46(); } /* BIT 0,(XY+o) */
-OP(xycb,43) { xycb_46(); } /* BIT 0,(XY+o) */
-OP(xycb,44) { xycb_46(); } /* BIT 0,(XY+o) */
-OP(xycb,45) { xycb_46(); } /* BIT 0,(XY+o) */
-OP(xycb,46) { bit_xy(0, rm_reg(m_ea)); } /* BIT 0,(XY+o) */
-OP(xycb,47) { xycb_46(); } /* BIT 0,(XY+o) */
-
-OP(xycb,48) { xycb_4e(); } /* BIT 1,(XY+o) */
-OP(xycb,49) { xycb_4e(); } /* BIT 1,(XY+o) */
-OP(xycb,4a) { xycb_4e(); } /* BIT 1,(XY+o) */
-OP(xycb,4b) { xycb_4e(); } /* BIT 1,(XY+o) */
-OP(xycb,4c) { xycb_4e(); } /* BIT 1,(XY+o) */
-OP(xycb,4d) { xycb_4e(); } /* BIT 1,(XY+o) */
-OP(xycb,4e) { bit_xy(1, rm_reg(m_ea)); } /* BIT 1,(XY+o) */
-OP(xycb,4f) { xycb_4e(); } /* BIT 1,(XY+o) */
-
-OP(xycb,50) { xycb_56(); } /* BIT 2,(XY+o) */
-OP(xycb,51) { xycb_56(); } /* BIT 2,(XY+o) */
-OP(xycb,52) { xycb_56(); } /* BIT 2,(XY+o) */
-OP(xycb,53) { xycb_56(); } /* BIT 2,(XY+o) */
-OP(xycb,54) { xycb_56(); } /* BIT 2,(XY+o) */
-OP(xycb,55) { xycb_56(); } /* BIT 2,(XY+o) */
-OP(xycb,56) { bit_xy(2, rm_reg(m_ea)); } /* BIT 2,(XY+o) */
-OP(xycb,57) { xycb_56(); } /* BIT 2,(XY+o) */
-
-OP(xycb,58) { xycb_5e(); } /* BIT 3,(XY+o) */
-OP(xycb,59) { xycb_5e(); } /* BIT 3,(XY+o) */
-OP(xycb,5a) { xycb_5e(); } /* BIT 3,(XY+o) */
-OP(xycb,5b) { xycb_5e(); } /* BIT 3,(XY+o) */
-OP(xycb,5c) { xycb_5e(); } /* BIT 3,(XY+o) */
-OP(xycb,5d) { xycb_5e(); } /* BIT 3,(XY+o) */
-OP(xycb,5e) { bit_xy(3, rm_reg(m_ea)); } /* BIT 3,(XY+o) */
-OP(xycb,5f) { xycb_5e(); } /* BIT 3,(XY+o) */
-
-OP(xycb,60) { xycb_66(); } /* BIT 4,(XY+o) */
-OP(xycb,61) { xycb_66(); } /* BIT 4,(XY+o) */
-OP(xycb,62) { xycb_66(); } /* BIT 4,(XY+o) */
-OP(xycb,63) { xycb_66(); } /* BIT 4,(XY+o) */
-OP(xycb,64) { xycb_66(); } /* BIT 4,(XY+o) */
-OP(xycb,65) { xycb_66(); } /* BIT 4,(XY+o) */
-OP(xycb,66) { bit_xy(4, rm_reg(m_ea)); } /* BIT 4,(XY+o) */
-OP(xycb,67) { xycb_66(); } /* BIT 4,(XY+o) */
-
-OP(xycb,68) { xycb_6e(); } /* BIT 5,(XY+o) */
-OP(xycb,69) { xycb_6e(); } /* BIT 5,(XY+o) */
-OP(xycb,6a) { xycb_6e(); } /* BIT 5,(XY+o) */
-OP(xycb,6b) { xycb_6e(); } /* BIT 5,(XY+o) */
-OP(xycb,6c) { xycb_6e(); } /* BIT 5,(XY+o) */
-OP(xycb,6d) { xycb_6e(); } /* BIT 5,(XY+o) */
-OP(xycb,6e) { bit_xy(5, rm_reg(m_ea)); } /* BIT 5,(XY+o) */
-OP(xycb,6f) { xycb_6e(); } /* BIT 5,(XY+o) */
-
-OP(xycb,70) { xycb_76(); } /* BIT 6,(XY+o) */
-OP(xycb,71) { xycb_76(); } /* BIT 6,(XY+o) */
-OP(xycb,72) { xycb_76(); } /* BIT 6,(XY+o) */
-OP(xycb,73) { xycb_76(); } /* BIT 6,(XY+o) */
-OP(xycb,74) { xycb_76(); } /* BIT 6,(XY+o) */
-OP(xycb,75) { xycb_76(); } /* BIT 6,(XY+o) */
-OP(xycb,76) { bit_xy(6, rm_reg(m_ea)); } /* BIT 6,(XY+o) */
-OP(xycb,77) { xycb_76(); } /* BIT 6,(XY+o) */
-
-OP(xycb,78) { xycb_7e(); } /* BIT 7,(XY+o) */
-OP(xycb,79) { xycb_7e(); } /* BIT 7,(XY+o) */
-OP(xycb,7a) { xycb_7e(); } /* BIT 7,(XY+o) */
-OP(xycb,7b) { xycb_7e(); } /* BIT 7,(XY+o) */
-OP(xycb,7c) { xycb_7e(); } /* BIT 7,(XY+o) */
-OP(xycb,7d) { xycb_7e(); } /* BIT 7,(XY+o) */
-OP(xycb,7e) { bit_xy(7, rm_reg(m_ea)); } /* BIT 7,(XY+o) */
-OP(xycb,7f) { xycb_7e(); } /* BIT 7,(XY+o) */
-
-OP(xycb,80) { B = res(0, rm_reg(m_ea)); wm(m_ea, B); } /* RES 0,B=(XY+o) */
-OP(xycb,81) { C = res(0, rm_reg(m_ea)); wm(m_ea, C); } /* RES 0,C=(XY+o) */
-OP(xycb,82) { D = res(0, rm_reg(m_ea)); wm(m_ea, D); } /* RES 0,D=(XY+o) */
-OP(xycb,83) { E = res(0, rm_reg(m_ea)); wm(m_ea, E); } /* RES 0,E=(XY+o) */
-OP(xycb,84) { H = res(0, rm_reg(m_ea)); wm(m_ea, H); } /* RES 0,H=(XY+o) */
-OP(xycb,85) { L = res(0, rm_reg(m_ea)); wm(m_ea, L); } /* RES 0,L=(XY+o) */
-OP(xycb,86) { wm(m_ea, res(0, rm_reg(m_ea))); } /* RES 0,(XY+o) */
-OP(xycb,87) { A = res(0, rm_reg(m_ea)); wm(m_ea, A); } /* RES 0,A=(XY+o) */
-
-OP(xycb,88) { B = res(1, rm_reg(m_ea)); wm(m_ea, B); } /* RES 1,B=(XY+o) */
-OP(xycb,89) { C = res(1, rm_reg(m_ea)); wm(m_ea, C); } /* RES 1,C=(XY+o) */
-OP(xycb,8a) { D = res(1, rm_reg(m_ea)); wm(m_ea, D); } /* RES 1,D=(XY+o) */
-OP(xycb,8b) { E = res(1, rm_reg(m_ea)); wm(m_ea, E); } /* RES 1,E=(XY+o) */
-OP(xycb,8c) { H = res(1, rm_reg(m_ea)); wm(m_ea, H); } /* RES 1,H=(XY+o) */
-OP(xycb,8d) { L = res(1, rm_reg(m_ea)); wm(m_ea, L); } /* RES 1,L=(XY+o) */
-OP(xycb,8e) { wm(m_ea, res(1, rm_reg(m_ea))); } /* RES 1,(XY+o) */
-OP(xycb,8f) { A = res(1, rm_reg(m_ea)); wm(m_ea, A); } /* RES 1,A=(XY+o) */
-
-OP(xycb,90) { B = res(2, rm_reg(m_ea)); wm(m_ea, B); } /* RES 2,B=(XY+o) */
-OP(xycb,91) { C = res(2, rm_reg(m_ea)); wm(m_ea, C); } /* RES 2,C=(XY+o) */
-OP(xycb,92) { D = res(2, rm_reg(m_ea)); wm(m_ea, D); } /* RES 2,D=(XY+o) */
-OP(xycb,93) { E = res(2, rm_reg(m_ea)); wm(m_ea, E); } /* RES 2,E=(XY+o) */
-OP(xycb,94) { H = res(2, rm_reg(m_ea)); wm(m_ea, H); } /* RES 2,H=(XY+o) */
-OP(xycb,95) { L = res(2, rm_reg(m_ea)); wm(m_ea, L); } /* RES 2,L=(XY+o) */
-OP(xycb,96) { wm(m_ea, res(2, rm_reg(m_ea))); } /* RES 2,(XY+o) */
-OP(xycb,97) { A = res(2, rm_reg(m_ea)); wm(m_ea, A); } /* RES 2,A=(XY+o) */
-
-OP(xycb,98) { B = res(3, rm_reg(m_ea)); wm(m_ea, B); } /* RES 3,B=(XY+o) */
-OP(xycb,99) { C = res(3, rm_reg(m_ea)); wm(m_ea, C); } /* RES 3,C=(XY+o) */
-OP(xycb,9a) { D = res(3, rm_reg(m_ea)); wm(m_ea, D); } /* RES 3,D=(XY+o) */
-OP(xycb,9b) { E = res(3, rm_reg(m_ea)); wm(m_ea, E); } /* RES 3,E=(XY+o) */
-OP(xycb,9c) { H = res(3, rm_reg(m_ea)); wm(m_ea, H); } /* RES 3,H=(XY+o) */
-OP(xycb,9d) { L = res(3, rm_reg(m_ea)); wm(m_ea, L); } /* RES 3,L=(XY+o) */
-OP(xycb,9e) { wm(m_ea, res(3, rm_reg(m_ea))); } /* RES 3,(XY+o) */
-OP(xycb,9f) { A = res(3, rm_reg(m_ea)); wm(m_ea, A); } /* RES 3,A=(XY+o) */
-
-OP(xycb,a0) { B = res(4, rm_reg(m_ea)); wm(m_ea, B); } /* RES 4,B=(XY+o) */
-OP(xycb,a1) { C = res(4, rm_reg(m_ea)); wm(m_ea, C); } /* RES 4,C=(XY+o) */
-OP(xycb,a2) { D = res(4, rm_reg(m_ea)); wm(m_ea, D); } /* RES 4,D=(XY+o) */
-OP(xycb,a3) { E = res(4, rm_reg(m_ea)); wm(m_ea, E); } /* RES 4,E=(XY+o) */
-OP(xycb,a4) { H = res(4, rm_reg(m_ea)); wm(m_ea, H); } /* RES 4,H=(XY+o) */
-OP(xycb,a5) { L = res(4, rm_reg(m_ea)); wm(m_ea, L); } /* RES 4,L=(XY+o) */
-OP(xycb,a6) { wm(m_ea, res(4, rm_reg(m_ea))); } /* RES 4,(XY+o) */
-OP(xycb,a7) { A = res(4, rm_reg(m_ea)); wm(m_ea, A); } /* RES 4,A=(XY+o) */
-
-OP(xycb,a8) { B = res(5, rm_reg(m_ea)); wm(m_ea, B); } /* RES 5,B=(XY+o) */
-OP(xycb,a9) { C = res(5, rm_reg(m_ea)); wm(m_ea, C); } /* RES 5,C=(XY+o) */
-OP(xycb,aa) { D = res(5, rm_reg(m_ea)); wm(m_ea, D); } /* RES 5,D=(XY+o) */
-OP(xycb,ab) { E = res(5, rm_reg(m_ea)); wm(m_ea, E); } /* RES 5,E=(XY+o) */
-OP(xycb,ac) { H = res(5, rm_reg(m_ea)); wm(m_ea, H); } /* RES 5,H=(XY+o) */
-OP(xycb,ad) { L = res(5, rm_reg(m_ea)); wm(m_ea, L); } /* RES 5,L=(XY+o) */
-OP(xycb,ae) { wm(m_ea, res(5, rm_reg(m_ea))); } /* RES 5,(XY+o) */
-OP(xycb,af) { A = res(5, rm_reg(m_ea)); wm(m_ea, A); } /* RES 5,A=(XY+o) */
-
-OP(xycb,b0) { B = res(6, rm_reg(m_ea)); wm(m_ea, B); } /* RES 6,B=(XY+o) */
-OP(xycb,b1) { C = res(6, rm_reg(m_ea)); wm(m_ea, C); } /* RES 6,C=(XY+o) */
-OP(xycb,b2) { D = res(6, rm_reg(m_ea)); wm(m_ea, D); } /* RES 6,D=(XY+o) */
-OP(xycb,b3) { E = res(6, rm_reg(m_ea)); wm(m_ea, E); } /* RES 6,E=(XY+o) */
-OP(xycb,b4) { H = res(6, rm_reg(m_ea)); wm(m_ea, H); } /* RES 6,H=(XY+o) */
-OP(xycb,b5) { L = res(6, rm_reg(m_ea)); wm(m_ea, L); } /* RES 6,L=(XY+o) */
-OP(xycb,b6) { wm(m_ea, res(6, rm_reg(m_ea))); } /* RES 6,(XY+o) */
-OP(xycb,b7) { A = res(6, rm_reg(m_ea)); wm(m_ea, A); } /* RES 6,A=(XY+o) */
-
-OP(xycb,b8) { B = res(7, rm_reg(m_ea)); wm(m_ea, B); } /* RES 7,B=(XY+o) */
-OP(xycb,b9) { C = res(7, rm_reg(m_ea)); wm(m_ea, C); } /* RES 7,C=(XY+o) */
-OP(xycb,ba) { D = res(7, rm_reg(m_ea)); wm(m_ea, D); } /* RES 7,D=(XY+o) */
-OP(xycb,bb) { E = res(7, rm_reg(m_ea)); wm(m_ea, E); } /* RES 7,E=(XY+o) */
-OP(xycb,bc) { H = res(7, rm_reg(m_ea)); wm(m_ea, H); } /* RES 7,H=(XY+o) */
-OP(xycb,bd) { L = res(7, rm_reg(m_ea)); wm(m_ea, L); } /* RES 7,L=(XY+o) */
-OP(xycb,be) { wm(m_ea, res(7, rm_reg(m_ea))); } /* RES 7,(XY+o) */
-OP(xycb,bf) { A = res(7, rm_reg(m_ea)); wm(m_ea, A); } /* RES 7,A=(XY+o) */
-
-OP(xycb,c0) { B = set(0, rm_reg(m_ea)); wm(m_ea, B); } /* SET 0,B=(XY+o) */
-OP(xycb,c1) { C = set(0, rm_reg(m_ea)); wm(m_ea, C); } /* SET 0,C=(XY+o) */
-OP(xycb,c2) { D = set(0, rm_reg(m_ea)); wm(m_ea, D); } /* SET 0,D=(XY+o) */
-OP(xycb,c3) { E = set(0, rm_reg(m_ea)); wm(m_ea, E); } /* SET 0,E=(XY+o) */
-OP(xycb,c4) { H = set(0, rm_reg(m_ea)); wm(m_ea, H); } /* SET 0,H=(XY+o) */
-OP(xycb,c5) { L = set(0, rm_reg(m_ea)); wm(m_ea, L); } /* SET 0,L=(XY+o) */
-OP(xycb,c6) { wm(m_ea, set(0, rm_reg(m_ea))); } /* SET 0,(XY+o) */
-OP(xycb,c7) { A = set(0, rm_reg(m_ea)); wm(m_ea, A); } /* SET 0,A=(XY+o) */
-
-OP(xycb,c8) { B = set(1, rm_reg(m_ea)); wm(m_ea, B); } /* SET 1,B=(XY+o) */
-OP(xycb,c9) { C = set(1, rm_reg(m_ea)); wm(m_ea, C); } /* SET 1,C=(XY+o) */
-OP(xycb,ca) { D = set(1, rm_reg(m_ea)); wm(m_ea, D); } /* SET 1,D=(XY+o) */
-OP(xycb,cb) { E = set(1, rm_reg(m_ea)); wm(m_ea, E); } /* SET 1,E=(XY+o) */
-OP(xycb,cc) { H = set(1, rm_reg(m_ea)); wm(m_ea, H); } /* SET 1,H=(XY+o) */
-OP(xycb,cd) { L = set(1, rm_reg(m_ea)); wm(m_ea, L); } /* SET 1,L=(XY+o) */
-OP(xycb,ce) { wm(m_ea, set(1, rm_reg(m_ea))); } /* SET 1,(XY+o) */
-OP(xycb,cf) { A = set(1, rm_reg(m_ea)); wm(m_ea, A); } /* SET 1,A=(XY+o) */
-
-OP(xycb,d0) { B = set(2, rm_reg(m_ea)); wm(m_ea, B); } /* SET 2,B=(XY+o) */
-OP(xycb,d1) { C = set(2, rm_reg(m_ea)); wm(m_ea, C); } /* SET 2,C=(XY+o) */
-OP(xycb,d2) { D = set(2, rm_reg(m_ea)); wm(m_ea, D); } /* SET 2,D=(XY+o) */
-OP(xycb,d3) { E = set(2, rm_reg(m_ea)); wm(m_ea, E); } /* SET 2,E=(XY+o) */
-OP(xycb,d4) { H = set(2, rm_reg(m_ea)); wm(m_ea, H); } /* SET 2,H=(XY+o) */
-OP(xycb,d5) { L = set(2, rm_reg(m_ea)); wm(m_ea, L); } /* SET 2,L=(XY+o) */
-OP(xycb,d6) { wm(m_ea, set(2, rm_reg(m_ea))); } /* SET 2,(XY+o) */
-OP(xycb,d7) { A = set(2, rm_reg(m_ea)); wm(m_ea, A); } /* SET 2,A=(XY+o) */
-
-OP(xycb,d8) { B = set(3, rm_reg(m_ea)); wm(m_ea, B); } /* SET 3,B=(XY+o) */
-OP(xycb,d9) { C = set(3, rm_reg(m_ea)); wm(m_ea, C); } /* SET 3,C=(XY+o) */
-OP(xycb,da) { D = set(3, rm_reg(m_ea)); wm(m_ea, D); } /* SET 3,D=(XY+o) */
-OP(xycb,db) { E = set(3, rm_reg(m_ea)); wm(m_ea, E); } /* SET 3,E=(XY+o) */
-OP(xycb,dc) { H = set(3, rm_reg(m_ea)); wm(m_ea, H); } /* SET 3,H=(XY+o) */
-OP(xycb,dd) { L = set(3, rm_reg(m_ea)); wm(m_ea, L); } /* SET 3,L=(XY+o) */
-OP(xycb,de) { wm(m_ea, set(3, rm_reg(m_ea))); } /* SET 3,(XY+o) */
-OP(xycb,df) { A = set(3, rm_reg(m_ea)); wm(m_ea, A); } /* SET 3,A=(XY+o) */
-
-OP(xycb,e0) { B = set(4, rm_reg(m_ea)); wm(m_ea, B); } /* SET 4,B=(XY+o) */
-OP(xycb,e1) { C = set(4, rm_reg(m_ea)); wm(m_ea, C); } /* SET 4,C=(XY+o) */
-OP(xycb,e2) { D = set(4, rm_reg(m_ea)); wm(m_ea, D); } /* SET 4,D=(XY+o) */
-OP(xycb,e3) { E = set(4, rm_reg(m_ea)); wm(m_ea, E); } /* SET 4,E=(XY+o) */
-OP(xycb,e4) { H = set(4, rm_reg(m_ea)); wm(m_ea, H); } /* SET 4,H=(XY+o) */
-OP(xycb,e5) { L = set(4, rm_reg(m_ea)); wm(m_ea, L); } /* SET 4,L=(XY+o) */
-OP(xycb,e6) { wm(m_ea, set(4, rm_reg(m_ea))); } /* SET 4,(XY+o) */
-OP(xycb,e7) { A = set(4, rm_reg(m_ea)); wm(m_ea, A); } /* SET 4,A=(XY+o) */
-
-OP(xycb,e8) { B = set(5, rm_reg(m_ea)); wm(m_ea, B); } /* SET 5,B=(XY+o) */
-OP(xycb,e9) { C = set(5, rm_reg(m_ea)); wm(m_ea, C); } /* SET 5,C=(XY+o) */
-OP(xycb,ea) { D = set(5, rm_reg(m_ea)); wm(m_ea, D); } /* SET 5,D=(XY+o) */
-OP(xycb,eb) { E = set(5, rm_reg(m_ea)); wm(m_ea, E); } /* SET 5,E=(XY+o) */
-OP(xycb,ec) { H = set(5, rm_reg(m_ea)); wm(m_ea, H); } /* SET 5,H=(XY+o) */
-OP(xycb,ed) { L = set(5, rm_reg(m_ea)); wm(m_ea, L); } /* SET 5,L=(XY+o) */
-OP(xycb,ee) { wm(m_ea, set(5, rm_reg(m_ea))); } /* SET 5,(XY+o) */
-OP(xycb,ef) { A = set(5, rm_reg(m_ea)); wm(m_ea, A); } /* SET 5,A=(XY+o) */
-
-OP(xycb,f0) { B = set(6, rm_reg(m_ea)); wm(m_ea, B); } /* SET 6,B=(XY+o) */
-OP(xycb,f1) { C = set(6, rm_reg(m_ea)); wm(m_ea, C); } /* SET 6,C=(XY+o) */
-OP(xycb,f2) { D = set(6, rm_reg(m_ea)); wm(m_ea, D); } /* SET 6,D=(XY+o) */
-OP(xycb,f3) { E = set(6, rm_reg(m_ea)); wm(m_ea, E); } /* SET 6,E=(XY+o) */
-OP(xycb,f4) { H = set(6, rm_reg(m_ea)); wm(m_ea, H); } /* SET 6,H=(XY+o) */
-OP(xycb,f5) { L = set(6, rm_reg(m_ea)); wm(m_ea, L); } /* SET 6,L=(XY+o) */
-OP(xycb,f6) { wm(m_ea, set(6, rm_reg(m_ea))); } /* SET 6,(XY+o) */
-OP(xycb,f7) { A = set(6, rm_reg(m_ea)); wm(m_ea, A); } /* SET 6,A=(XY+o) */
-
-OP(xycb,f8) { B = set(7, rm_reg(m_ea)); wm(m_ea, B); } /* SET 7,B=(XY+o) */
-OP(xycb,f9) { C = set(7, rm_reg(m_ea)); wm(m_ea, C); } /* SET 7,C=(XY+o) */
-OP(xycb,fa) { D = set(7, rm_reg(m_ea)); wm(m_ea, D); } /* SET 7,D=(XY+o) */
-OP(xycb,fb) { E = set(7, rm_reg(m_ea)); wm(m_ea, E); } /* SET 7,E=(XY+o) */
-OP(xycb,fc) { H = set(7, rm_reg(m_ea)); wm(m_ea, H); } /* SET 7,H=(XY+o) */
-OP(xycb,fd) { L = set(7, rm_reg(m_ea)); wm(m_ea, L); } /* SET 7,L=(XY+o) */
-OP(xycb,fe) { wm(m_ea, set(7, rm_reg(m_ea))); } /* SET 7,(XY+o) */
-OP(xycb,ff) { A = set(7, rm_reg(m_ea)); wm(m_ea, A); } /* SET 7,A=(XY+o) */
-
-
-/**********************************************************
- * IX register related opcodes (DD prefix)
- **********************************************************/
-OP(dd,00) { illegal_1(); op_00(); } /* DB DD */
-OP(dd,01) { illegal_1(); op_01(); } /* DB DD */
-OP(dd,02) { illegal_1(); op_02(); } /* DB DD */
-OP(dd,03) { illegal_1(); op_03(); } /* DB DD */
-OP(dd,04) { illegal_1(); op_04(); } /* DB DD */
-OP(dd,05) { illegal_1(); op_05(); } /* DB DD */
-OP(dd,06) { illegal_1(); op_06(); } /* DB DD */
-OP(dd,07) { illegal_1(); op_07(); } /* DB DD */
-
-OP(dd,08) { illegal_1(); op_08(); } /* DB DD */
-OP(dd,09) { add16(m_ix, m_bc); } /* ADD IX,BC */
-OP(dd,0a) { illegal_1(); op_0a(); } /* DB DD */
-OP(dd,0b) { illegal_1(); op_0b(); } /* DB DD */
-OP(dd,0c) { illegal_1(); op_0c(); } /* DB DD */
-OP(dd,0d) { illegal_1(); op_0d(); } /* DB DD */
-OP(dd,0e) { illegal_1(); op_0e(); } /* DB DD */
-OP(dd,0f) { illegal_1(); op_0f(); } /* DB DD */
-
-OP(dd,10) { illegal_1(); op_10(); } /* DB DD */
-OP(dd,11) { illegal_1(); op_11(); } /* DB DD */
-OP(dd,12) { illegal_1(); op_12(); } /* DB DD */
-OP(dd,13) { illegal_1(); op_13(); } /* DB DD */
-OP(dd,14) { illegal_1(); op_14(); } /* DB DD */
-OP(dd,15) { illegal_1(); op_15(); } /* DB DD */
-OP(dd,16) { illegal_1(); op_16(); } /* DB DD */
-OP(dd,17) { illegal_1(); op_17(); } /* DB DD */
-
-OP(dd,18) { illegal_1(); op_18(); } /* DB DD */
-OP(dd,19) { add16(m_ix, m_de); } /* ADD IX,DE */
-OP(dd,1a) { illegal_1(); op_1a(); } /* DB DD */
-OP(dd,1b) { illegal_1(); op_1b(); } /* DB DD */
-OP(dd,1c) { illegal_1(); op_1c(); } /* DB DD */
-OP(dd,1d) { illegal_1(); op_1d(); } /* DB DD */
-OP(dd,1e) { illegal_1(); op_1e(); } /* DB DD */
-OP(dd,1f) { illegal_1(); op_1f(); } /* DB DD */
-
-OP(dd,20) { illegal_1(); op_20(); } /* DB DD */
-OP(dd,21) { IX = arg16(); } /* LD IX,w */
-OP(dd,22) { m_ea = arg16(); wm16(m_ea, m_ix); WZ = m_ea + 1; } /* LD (w),IX */
-OP(dd,23) { nomreq_ir(2); IX++; } /* INC IX */
-OP(dd,24) { HX = inc(HX); } /* INC HX */
-OP(dd,25) { HX = dec(HX); } /* DEC HX */
-OP(dd,26) { HX = arg(); } /* LD HX,n */
-OP(dd,27) { illegal_1(); op_27(); } /* DB DD */
-
-OP(dd,28) { illegal_1(); op_28(); } /* DB DD */
-OP(dd,29) { add16(m_ix, m_ix); } /* ADD IX,IX */
-OP(dd,2a) { m_ea = arg16(); rm16(m_ea, m_ix); WZ = m_ea + 1; } /* LD IX,(w) */
-OP(dd,2b) { nomreq_ir(2); IX--; } /* DEC IX */
-OP(dd,2c) { LX = inc(LX); } /* INC LX */
-OP(dd,2d) { LX = dec(LX); } /* DEC LX */
-OP(dd,2e) { LX = arg(); } /* LD LX,n */
-OP(dd,2f) { illegal_1(); op_2f(); } /* DB DD */
-
-OP(dd,30) { illegal_1(); op_30(); } /* DB DD */
-OP(dd,31) { illegal_1(); op_31(); } /* DB DD */
-OP(dd,32) { illegal_1(); op_32(); } /* DB DD */
-OP(dd,33) { illegal_1(); op_33(); } /* DB DD */
-OP(dd,34) { eax(); nomreq_addr(PCD-1, 5); wm(m_ea, inc(rm_reg(m_ea))); } /* INC (IX+o) */
-OP(dd,35) { eax(); nomreq_addr(PCD-1, 5); wm(m_ea, dec(rm_reg(m_ea))); } /* DEC (IX+o) */
-OP(dd,36) { eax(); u8 a = arg(); nomreq_addr(PCD-1, 2); wm(m_ea, a); } /* LD (IX+o),n */
-OP(dd,37) { illegal_1(); op_37(); } /* DB DD */
-
-OP(dd,38) { illegal_1(); op_38(); } /* DB DD */
-OP(dd,39) { add16(m_ix, m_sp); } /* ADD IX,SP */
-OP(dd,3a) { illegal_1(); op_3a(); } /* DB DD */
-OP(dd,3b) { illegal_1(); op_3b(); } /* DB DD */
-OP(dd,3c) { illegal_1(); op_3c(); } /* DB DD */
-OP(dd,3d) { illegal_1(); op_3d(); } /* DB DD */
-OP(dd,3e) { illegal_1(); op_3e(); } /* DB DD */
-OP(dd,3f) { illegal_1(); op_3f(); } /* DB DD */
-
-OP(dd,40) { illegal_1(); op_40(); } /* DB DD */
-OP(dd,41) { illegal_1(); op_41(); } /* DB DD */
-OP(dd,42) { illegal_1(); op_42(); } /* DB DD */
-OP(dd,43) { illegal_1(); op_43(); } /* DB DD */
-OP(dd,44) { B = HX; } /* LD B,HX */
-OP(dd,45) { B = LX; } /* LD B,LX */
-OP(dd,46) { eax(); nomreq_addr(PCD-1, 5); B = rm(m_ea); } /* LD B,(IX+o) */
-OP(dd,47) { illegal_1(); op_47(); } /* DB DD */
-
-OP(dd,48) { illegal_1(); op_48(); } /* DB DD */
-OP(dd,49) { illegal_1(); op_49(); } /* DB DD */
-OP(dd,4a) { illegal_1(); op_4a(); } /* DB DD */
-OP(dd,4b) { illegal_1(); op_4b(); } /* DB DD */
-OP(dd,4c) { C = HX; } /* LD C,HX */
-OP(dd,4d) { C = LX; } /* LD C,LX */
-OP(dd,4e) { eax(); nomreq_addr(PCD-1, 5); C = rm(m_ea); } /* LD C,(IX+o) */
-OP(dd,4f) { illegal_1(); op_4f(); } /* DB DD */
-
-OP(dd,50) { illegal_1(); op_50(); } /* DB DD */
-OP(dd,51) { illegal_1(); op_51(); } /* DB DD */
-OP(dd,52) { illegal_1(); op_52(); } /* DB DD */
-OP(dd,53) { illegal_1(); op_53(); } /* DB DD */
-OP(dd,54) { D = HX; } /* LD D,HX */
-OP(dd,55) { D = LX; } /* LD D,LX */
-OP(dd,56) { eax(); nomreq_addr(PCD-1, 5); D = rm(m_ea); } /* LD D,(IX+o) */
-OP(dd,57) { illegal_1(); op_57(); } /* DB DD */
-
-OP(dd,58) { illegal_1(); op_58(); } /* DB DD */
-OP(dd,59) { illegal_1(); op_59(); } /* DB DD */
-OP(dd,5a) { illegal_1(); op_5a(); } /* DB DD */
-OP(dd,5b) { illegal_1(); op_5b(); } /* DB DD */
-OP(dd,5c) { E = HX; } /* LD E,HX */
-OP(dd,5d) { E = LX; } /* LD E,LX */
-OP(dd,5e) { eax(); nomreq_addr(PCD-1, 5); E = rm(m_ea); } /* LD E,(IX+o) */
-OP(dd,5f) { illegal_1(); op_5f(); } /* DB DD */
-
-OP(dd,60) { HX = B; } /* LD HX,B */
-OP(dd,61) { HX = C; } /* LD HX,C */
-OP(dd,62) { HX = D; } /* LD HX,D */
-OP(dd,63) { HX = E; } /* LD HX,E */
-OP(dd,64) { } /* LD HX,HX */
-OP(dd,65) { HX = LX; } /* LD HX,LX */
-OP(dd,66) { eax(); nomreq_addr(PCD-1, 5); H = rm(m_ea); } /* LD H,(IX+o) */
-OP(dd,67) { HX = A; } /* LD HX,A */
-
-OP(dd,68) { LX = B; } /* LD LX,B */
-OP(dd,69) { LX = C; } /* LD LX,C */
-OP(dd,6a) { LX = D; } /* LD LX,D */
-OP(dd,6b) { LX = E; } /* LD LX,E */
-OP(dd,6c) { LX = HX; } /* LD LX,HX */
-OP(dd,6d) { } /* LD LX,LX */
-OP(dd,6e) { eax(); nomreq_addr(PCD-1, 5); L = rm(m_ea); } /* LD L,(IX+o) */
-OP(dd,6f) { LX = A; } /* LD LX,A */
-
-OP(dd,70) { eax(); nomreq_addr(PCD-1, 5); wm(m_ea, B); } /* LD (IX+o),B */
-OP(dd,71) { eax(); nomreq_addr(PCD-1, 5); wm(m_ea, C); } /* LD (IX+o),C */
-OP(dd,72) { eax(); nomreq_addr(PCD-1, 5); wm(m_ea, D); } /* LD (IX+o),D */
-OP(dd,73) { eax(); nomreq_addr(PCD-1, 5); wm(m_ea, E); } /* LD (IX+o),E */
-OP(dd,74) { eax(); nomreq_addr(PCD-1, 5); wm(m_ea, H); } /* LD (IX+o),H */
-OP(dd,75) { eax(); nomreq_addr(PCD-1, 5); wm(m_ea, L); } /* LD (IX+o),L */
-OP(dd,76) { illegal_1(); op_76(); } /* DB DD */
-OP(dd,77) { eax(); nomreq_addr(PCD-1, 5); wm(m_ea, A); } /* LD (IX+o),A */
-
-OP(dd,78) { illegal_1(); op_78(); } /* DB DD */
-OP(dd,79) { illegal_1(); op_79(); } /* DB DD */
-OP(dd,7a) { illegal_1(); op_7a(); } /* DB DD */
-OP(dd,7b) { illegal_1(); op_7b(); } /* DB DD */
-OP(dd,7c) { A = HX; } /* LD A,HX */
-OP(dd,7d) { A = LX; } /* LD A,LX */
-OP(dd,7e) { eax(); nomreq_addr(PCD-1, 5); A = rm(m_ea); } /* LD A,(IX+o) */
-OP(dd,7f) { illegal_1(); op_7f(); } /* DB DD */
-
-OP(dd,80) { illegal_1(); op_80(); } /* DB DD */
-OP(dd,81) { illegal_1(); op_81(); } /* DB DD */
-OP(dd,82) { illegal_1(); op_82(); } /* DB DD */
-OP(dd,83) { illegal_1(); op_83(); } /* DB DD */
-OP(dd,84) { add_a(HX); } /* ADD A,HX */
-OP(dd,85) { add_a(LX); } /* ADD A,LX */
-OP(dd,86) { eax(); nomreq_addr(PCD-1, 5); add_a(rm(m_ea)); } /* ADD A,(IX+o) */
-OP(dd,87) { illegal_1(); op_87(); } /* DB DD */
-
-OP(dd,88) { illegal_1(); op_88(); } /* DB DD */
-OP(dd,89) { illegal_1(); op_89(); } /* DB DD */
-OP(dd,8a) { illegal_1(); op_8a(); } /* DB DD */
-OP(dd,8b) { illegal_1(); op_8b(); } /* DB DD */
-OP(dd,8c) { adc_a(HX); } /* ADC A,HX */
-OP(dd,8d) { adc_a(LX); } /* ADC A,LX */
-OP(dd,8e) { eax(); nomreq_addr(PCD-1, 5); adc_a(rm(m_ea)); } /* ADC A,(IX+o) */
-OP(dd,8f) { illegal_1(); op_8f(); } /* DB DD */
-
-OP(dd,90) { illegal_1(); op_90(); } /* DB DD */
-OP(dd,91) { illegal_1(); op_91(); } /* DB DD */
-OP(dd,92) { illegal_1(); op_92(); } /* DB DD */
-OP(dd,93) { illegal_1(); op_93(); } /* DB DD */
-OP(dd,94) { sub(HX); } /* SUB HX */
-OP(dd,95) { sub(LX); } /* SUB LX */
-OP(dd,96) { eax(); nomreq_addr(PCD-1, 5); sub(rm(m_ea)); } /* SUB (IX+o) */
-OP(dd,97) { illegal_1(); op_97(); } /* DB DD */
-
-OP(dd,98) { illegal_1(); op_98(); } /* DB DD */
-OP(dd,99) { illegal_1(); op_99(); } /* DB DD */
-OP(dd,9a) { illegal_1(); op_9a(); } /* DB DD */
-OP(dd,9b) { illegal_1(); op_9b(); } /* DB DD */
-OP(dd,9c) { sbc_a(HX); } /* SBC A,HX */
-OP(dd,9d) { sbc_a(LX); } /* SBC A,LX */
-OP(dd,9e) { eax(); nomreq_addr(PCD-1, 5); sbc_a(rm(m_ea)); } /* SBC A,(IX+o) */
-OP(dd,9f) { illegal_1(); op_9f(); } /* DB DD */
-
-OP(dd,a0) { illegal_1(); op_a0(); } /* DB DD */
-OP(dd,a1) { illegal_1(); op_a1(); } /* DB DD */
-OP(dd,a2) { illegal_1(); op_a2(); } /* DB DD */
-OP(dd,a3) { illegal_1(); op_a3(); } /* DB DD */
-OP(dd,a4) { and_a(HX); } /* AND HX */
-OP(dd,a5) { and_a(LX); } /* AND LX */
-OP(dd,a6) { eax(); nomreq_addr(PCD-1, 5); and_a(rm(m_ea)); } /* AND (IX+o) */
-OP(dd,a7) { illegal_1(); op_a7(); } /* DB DD */
-
-OP(dd,a8) { illegal_1(); op_a8(); } /* DB DD */
-OP(dd,a9) { illegal_1(); op_a9(); } /* DB DD */
-OP(dd,aa) { illegal_1(); op_aa(); } /* DB DD */
-OP(dd,ab) { illegal_1(); op_ab(); } /* DB DD */
-OP(dd,ac) { xor_a(HX); } /* XOR HX */
-OP(dd,ad) { xor_a(LX); } /* XOR LX */
-OP(dd,ae) { eax(); nomreq_addr(PCD-1, 5); xor_a(rm(m_ea)); } /* XOR (IX+o) */
-OP(dd,af) { illegal_1(); op_af(); } /* DB DD */
-
-OP(dd,b0) { illegal_1(); op_b0(); } /* DB DD */
-OP(dd,b1) { illegal_1(); op_b1(); } /* DB DD */
-OP(dd,b2) { illegal_1(); op_b2(); } /* DB DD */
-OP(dd,b3) { illegal_1(); op_b3(); } /* DB DD */
-OP(dd,b4) { or_a(HX); } /* OR HX */
-OP(dd,b5) { or_a(LX); } /* OR LX */
-OP(dd,b6) { eax(); nomreq_addr(PCD-1, 5); or_a(rm(m_ea)); } /* OR (IX+o) */
-OP(dd,b7) { illegal_1(); op_b7(); } /* DB DD */
-
-OP(dd,b8) { illegal_1(); op_b8(); } /* DB DD */
-OP(dd,b9) { illegal_1(); op_b9(); } /* DB DD */
-OP(dd,ba) { illegal_1(); op_ba(); } /* DB DD */
-OP(dd,bb) { illegal_1(); op_bb(); } /* DB DD */
-OP(dd,bc) { cp(HX); } /* CP HX */
-OP(dd,bd) { cp(LX); } /* CP LX */
-OP(dd,be) { eax(); nomreq_addr(PCD-1, 5); cp(rm(m_ea)); } /* CP (IX+o) */
-OP(dd,bf) { illegal_1(); op_bf(); } /* DB DD */
-
-OP(dd,c0) { illegal_1(); op_c0(); } /* DB DD */
-OP(dd,c1) { illegal_1(); op_c1(); } /* DB DD */
-OP(dd,c2) { illegal_1(); op_c2(); } /* DB DD */
-OP(dd,c3) { illegal_1(); op_c3(); } /* DB DD */
-OP(dd,c4) { illegal_1(); op_c4(); } /* DB DD */
-OP(dd,c5) { illegal_1(); op_c5(); } /* DB DD */
-OP(dd,c6) { illegal_1(); op_c6(); } /* DB DD */
-OP(dd,c7) { illegal_1(); op_c7(); } /* DB DD */
-
-OP(dd,c8) { illegal_1(); op_c8(); } /* DB DD */
-OP(dd,c9) { illegal_1(); op_c9(); } /* DB DD */
-OP(dd,ca) { illegal_1(); op_ca(); } /* DB DD */
-OP(dd,cb) { eax(); u8 a = arg(); nomreq_addr(PCD-1, 2); EXEC(xycb, a); } /* ** DD CB xx */
-OP(dd,cc) { illegal_1(); op_cc(); } /* DB DD */
-OP(dd,cd) { illegal_1(); op_cd(); } /* DB DD */
-OP(dd,ce) { illegal_1(); op_ce(); } /* DB DD */
-OP(dd,cf) { illegal_1(); op_cf(); } /* DB DD */
-
-OP(dd,d0) { illegal_1(); op_d0(); } /* DB DD */
-OP(dd,d1) { illegal_1(); op_d1(); } /* DB DD */
-OP(dd,d2) { illegal_1(); op_d2(); } /* DB DD */
-OP(dd,d3) { illegal_1(); op_d3(); } /* DB DD */
-OP(dd,d4) { illegal_1(); op_d4(); } /* DB DD */
-OP(dd,d5) { illegal_1(); op_d5(); } /* DB DD */
-OP(dd,d6) { illegal_1(); op_d6(); } /* DB DD */
-OP(dd,d7) { illegal_1(); op_d7(); } /* DB DD */
-
-OP(dd,d8) { illegal_1(); op_d8(); } /* DB DD */
-OP(dd,d9) { illegal_1(); op_d9(); } /* DB DD */
-OP(dd,da) { illegal_1(); op_da(); } /* DB DD */
-OP(dd,db) { illegal_1(); op_db(); } /* DB DD */
-OP(dd,dc) { illegal_1(); op_dc(); } /* DB DD */
-OP(dd,dd) { illegal_1(); op_dd(); } /* DB DD */
-OP(dd,de) { illegal_1(); op_de(); } /* DB DD */
-OP(dd,df) { illegal_1(); op_df(); } /* DB DD */
-
-OP(dd,e0) { illegal_1(); op_e0(); } /* DB DD */
-OP(dd,e1) { pop(m_ix); } /* POP IX */
-OP(dd,e2) { illegal_1(); op_e2(); } /* DB DD */
-OP(dd,e3) { ex_sp(m_ix); } /* EX (SP),IX */
-OP(dd,e4) { illegal_1(); op_e4(); } /* DB DD */
-OP(dd,e5) { push(m_ix); } /* PUSH IX */
-OP(dd,e6) { illegal_1(); op_e6(); } /* DB DD */
-OP(dd,e7) { illegal_1(); op_e7(); } /* DB DD */
-
-OP(dd,e8) { illegal_1(); op_e8(); } /* DB DD */
-OP(dd,e9) { PC = IX; } /* JP (IX) */
-OP(dd,ea) { illegal_1(); op_ea(); } /* DB DD */
-OP(dd,eb) { illegal_1(); op_eb(); } /* DB DD */
-OP(dd,ec) { illegal_1(); op_ec(); } /* DB DD */
-OP(dd,ed) { illegal_1(); op_ed(); } /* DB DD */
-OP(dd,ee) { illegal_1(); op_ee(); } /* DB DD */
-OP(dd,ef) { illegal_1(); op_ef(); } /* DB DD */
-
-OP(dd,f0) { illegal_1(); op_f0(); } /* DB DD */
-OP(dd,f1) { illegal_1(); op_f1(); } /* DB DD */
-OP(dd,f2) { illegal_1(); op_f2(); } /* DB DD */
-OP(dd,f3) { illegal_1(); op_f3(); } /* DB DD */
-OP(dd,f4) { illegal_1(); op_f4(); } /* DB DD */
-OP(dd,f5) { illegal_1(); op_f5(); } /* DB DD */
-OP(dd,f6) { illegal_1(); op_f6(); } /* DB DD */
-OP(dd,f7) { illegal_1(); op_f7(); } /* DB DD */
-
-OP(dd,f8) { illegal_1(); op_f8(); } /* DB DD */
-OP(dd,f9) { nomreq_ir(2); SP = IX; } /* LD SP,IX */
-OP(dd,fa) { illegal_1(); op_fa(); } /* DB DD */
-OP(dd,fb) { illegal_1(); op_fb(); } /* DB DD */
-OP(dd,fc) { illegal_1(); op_fc(); } /* DB DD */
-OP(dd,fd) { illegal_1(); op_fd(); } /* DB DD */
-OP(dd,fe) { illegal_1(); op_fe(); } /* DB DD */
-OP(dd,ff) { illegal_1(); op_ff(); } /* DB DD */
-
-/**********************************************************
- * IY register related opcodes (FD prefix)
- **********************************************************/
-OP(fd,00) { illegal_1(); op_00(); } /* DB FD */
-OP(fd,01) { illegal_1(); op_01(); } /* DB FD */
-OP(fd,02) { illegal_1(); op_02(); } /* DB FD */
-OP(fd,03) { illegal_1(); op_03(); } /* DB FD */
-OP(fd,04) { illegal_1(); op_04(); } /* DB FD */
-OP(fd,05) { illegal_1(); op_05(); } /* DB FD */
-OP(fd,06) { illegal_1(); op_06(); } /* DB FD */
-OP(fd,07) { illegal_1(); op_07(); } /* DB FD */
-
-OP(fd,08) { illegal_1(); op_08(); } /* DB FD */
-OP(fd,09) { add16(m_iy, m_bc); } /* ADD IY,BC */
-OP(fd,0a) { illegal_1(); op_0a(); } /* DB FD */
-OP(fd,0b) { illegal_1(); op_0b(); } /* DB FD */
-OP(fd,0c) { illegal_1(); op_0c(); } /* DB FD */
-OP(fd,0d) { illegal_1(); op_0d(); } /* DB FD */
-OP(fd,0e) { illegal_1(); op_0e(); } /* DB FD */
-OP(fd,0f) { illegal_1(); op_0f(); } /* DB FD */
-
-OP(fd,10) { illegal_1(); op_10(); } /* DB FD */
-OP(fd,11) { illegal_1(); op_11(); } /* DB FD */
-OP(fd,12) { illegal_1(); op_12(); } /* DB FD */
-OP(fd,13) { illegal_1(); op_13(); } /* DB FD */
-OP(fd,14) { illegal_1(); op_14(); } /* DB FD */
-OP(fd,15) { illegal_1(); op_15(); } /* DB FD */
-OP(fd,16) { illegal_1(); op_16(); } /* DB FD */
-OP(fd,17) { illegal_1(); op_17(); } /* DB FD */
-
-OP(fd,18) { illegal_1(); op_18(); } /* DB FD */
-OP(fd,19) { add16(m_iy, m_de); } /* ADD IY,DE */
-OP(fd,1a) { illegal_1(); op_1a(); } /* DB FD */
-OP(fd,1b) { illegal_1(); op_1b(); } /* DB FD */
-OP(fd,1c) { illegal_1(); op_1c(); } /* DB FD */
-OP(fd,1d) { illegal_1(); op_1d(); } /* DB FD */
-OP(fd,1e) { illegal_1(); op_1e(); } /* DB FD */
-OP(fd,1f) { illegal_1(); op_1f(); } /* DB FD */
-
-OP(fd,20) { illegal_1(); op_20(); } /* DB FD */
-OP(fd,21) { IY = arg16(); } /* LD IY,w */
-OP(fd,22) { m_ea = arg16(); wm16(m_ea, m_iy); WZ = m_ea + 1; } /* LD (w),IY */
-OP(fd,23) { nomreq_ir(2); IY++; } /* INC IY */
-OP(fd,24) { HY = inc(HY); } /* INC HY */
-OP(fd,25) { HY = dec(HY); } /* DEC HY */
-OP(fd,26) { HY = arg(); } /* LD HY,n */
-OP(fd,27) { illegal_1(); op_27(); } /* DB FD */
-
-OP(fd,28) { illegal_1(); op_28(); } /* DB FD */
-OP(fd,29) { add16(m_iy, m_iy); } /* ADD IY,IY */
-OP(fd,2a) { m_ea = arg16(); rm16(m_ea, m_iy); WZ = m_ea + 1; } /* LD IY,(w) */
-OP(fd,2b) { nomreq_ir(2); IY--; } /* DEC IY */
-OP(fd,2c) { LY = inc(LY); } /* INC LY */
-OP(fd,2d) { LY = dec(LY); } /* DEC LY */
-OP(fd,2e) { LY = arg(); } /* LD LY,n */
-OP(fd,2f) { illegal_1(); op_2f(); } /* DB FD */
-
-OP(fd,30) { illegal_1(); op_30(); } /* DB FD */
-OP(fd,31) { illegal_1(); op_31(); } /* DB FD */
-OP(fd,32) { illegal_1(); op_32(); } /* DB FD */
-OP(fd,33) { illegal_1(); op_33(); } /* DB FD */
-OP(fd,34) { eay(); nomreq_addr(PCD-1, 5); wm(m_ea, inc(rm_reg(m_ea))); } /* INC (IY+o) */
-OP(fd,35) { eay(); nomreq_addr(PCD-1, 5); wm(m_ea, dec(rm_reg(m_ea))); } /* DEC (IY+o) */
-OP(fd,36) { eay(); u8 a = arg(); nomreq_addr(PCD-1, 2); wm(m_ea, a); } /* LD (IY+o),n */
-OP(fd,37) { illegal_1(); op_37(); } /* DB FD */
-
-OP(fd,38) { illegal_1(); op_38(); } /* DB FD */
-OP(fd,39) { add16(m_iy, m_sp); } /* ADD IY,SP */
-OP(fd,3a) { illegal_1(); op_3a(); } /* DB FD */
-OP(fd,3b) { illegal_1(); op_3b(); } /* DB FD */
-OP(fd,3c) { illegal_1(); op_3c(); } /* DB FD */
-OP(fd,3d) { illegal_1(); op_3d(); } /* DB FD */
-OP(fd,3e) { illegal_1(); op_3e(); } /* DB FD */
-OP(fd,3f) { illegal_1(); op_3f(); } /* DB FD */
-
-OP(fd,40) { illegal_1(); op_40(); } /* DB FD */
-OP(fd,41) { illegal_1(); op_41(); } /* DB FD */
-OP(fd,42) { illegal_1(); op_42(); } /* DB FD */
-OP(fd,43) { illegal_1(); op_43(); } /* DB FD */
-OP(fd,44) { B = HY; } /* LD B,HY */
-OP(fd,45) { B = LY; } /* LD B,LY */
-OP(fd,46) { eay(); nomreq_addr(PCD-1, 5); B = rm(m_ea); } /* LD B,(IY+o) */
-OP(fd,47) { illegal_1(); op_47(); } /* DB FD */
-
-OP(fd,48) { illegal_1(); op_48(); } /* DB FD */
-OP(fd,49) { illegal_1(); op_49(); } /* DB FD */
-OP(fd,4a) { illegal_1(); op_4a(); } /* DB FD */
-OP(fd,4b) { illegal_1(); op_4b(); } /* DB FD */
-OP(fd,4c) { C = HY; } /* LD C,HY */
-OP(fd,4d) { C = LY; } /* LD C,LY */
-OP(fd,4e) { eay(); nomreq_addr(PCD-1, 5); C = rm(m_ea); } /* LD C,(IY+o) */
-OP(fd,4f) { illegal_1(); op_4f(); } /* DB FD */
-
-OP(fd,50) { illegal_1(); op_50(); } /* DB FD */
-OP(fd,51) { illegal_1(); op_51(); } /* DB FD */
-OP(fd,52) { illegal_1(); op_52(); } /* DB FD */
-OP(fd,53) { illegal_1(); op_53(); } /* DB FD */
-OP(fd,54) { D = HY; } /* LD D,HY */
-OP(fd,55) { D = LY; } /* LD D,LY */
-OP(fd,56) { eay(); nomreq_addr(PCD-1, 5); D = rm(m_ea); } /* LD D,(IY+o) */
-OP(fd,57) { illegal_1(); op_57(); } /* DB FD */
-
-OP(fd,58) { illegal_1(); op_58(); } /* DB FD */
-OP(fd,59) { illegal_1(); op_59(); } /* DB FD */
-OP(fd,5a) { illegal_1(); op_5a(); } /* DB FD */
-OP(fd,5b) { illegal_1(); op_5b(); } /* DB FD */
-OP(fd,5c) { E = HY; } /* LD E,HY */
-OP(fd,5d) { E = LY; } /* LD E,LY */
-OP(fd,5e) { eay(); nomreq_addr(PCD-1, 5); E = rm(m_ea); } /* LD E,(IY+o) */
-OP(fd,5f) { illegal_1(); op_5f(); } /* DB FD */
-
-OP(fd,60) { HY = B; } /* LD HY,B */
-OP(fd,61) { HY = C; } /* LD HY,C */
-OP(fd,62) { HY = D; } /* LD HY,D */
-OP(fd,63) { HY = E; } /* LD HY,E */
-OP(fd,64) { } /* LD HY,HY */
-OP(fd,65) { HY = LY; } /* LD HY,LY */
-OP(fd,66) { eay(); nomreq_addr(PCD-1, 5); H = rm(m_ea); } /* LD H,(IY+o) */
-OP(fd,67) { HY = A; } /* LD HY,A */
-
-OP(fd,68) { LY = B; } /* LD LY,B */
-OP(fd,69) { LY = C; } /* LD LY,C */
-OP(fd,6a) { LY = D; } /* LD LY,D */
-OP(fd,6b) { LY = E; } /* LD LY,E */
-OP(fd,6c) { LY = HY; } /* LD LY,HY */
-OP(fd,6d) { } /* LD LY,LY */
-OP(fd,6e) { eay(); nomreq_addr(PCD-1, 5); L = rm(m_ea); } /* LD L,(IY+o) */
-OP(fd,6f) { LY = A; } /* LD LY,A */
-
-OP(fd,70) { eay(); nomreq_addr(PCD-1, 5); wm(m_ea, B); } /* LD (IY+o),B */
-OP(fd,71) { eay(); nomreq_addr(PCD-1, 5); wm(m_ea, C); } /* LD (IY+o),C */
-OP(fd,72) { eay(); nomreq_addr(PCD-1, 5); wm(m_ea, D); } /* LD (IY+o),D */
-OP(fd,73) { eay(); nomreq_addr(PCD-1, 5); wm(m_ea, E); } /* LD (IY+o),E */
-OP(fd,74) { eay(); nomreq_addr(PCD-1, 5); wm(m_ea, H); } /* LD (IY+o),H */
-OP(fd,75) { eay(); nomreq_addr(PCD-1, 5); wm(m_ea, L); } /* LD (IY+o),L */
-OP(fd,76) { illegal_1(); op_76(); } /* DB FD */
-OP(fd,77) { eay(); nomreq_addr(PCD-1, 5); wm(m_ea, A); } /* LD (IY+o),A */
-
-OP(fd,78) { illegal_1(); op_78(); } /* DB FD */
-OP(fd,79) { illegal_1(); op_79(); } /* DB FD */
-OP(fd,7a) { illegal_1(); op_7a(); } /* DB FD */
-OP(fd,7b) { illegal_1(); op_7b(); } /* DB FD */
-OP(fd,7c) { A = HY; } /* LD A,HY */
-OP(fd,7d) { A = LY; } /* LD A,LY */
-OP(fd,7e) { eay(); nomreq_addr(PCD-1, 5); A = rm(m_ea); } /* LD A,(IY+o) */
-OP(fd,7f) { illegal_1(); op_7f(); } /* DB FD */
-
-OP(fd,80) { illegal_1(); op_80(); } /* DB FD */
-OP(fd,81) { illegal_1(); op_81(); } /* DB FD */
-OP(fd,82) { illegal_1(); op_82(); } /* DB FD */
-OP(fd,83) { illegal_1(); op_83(); } /* DB FD */
-OP(fd,84) { add_a(HY); } /* ADD A,HY */
-OP(fd,85) { add_a(LY); } /* ADD A,LY */
-OP(fd,86) { eay(); nomreq_addr(PCD-1, 5); add_a(rm(m_ea)); } /* ADD A,(IY+o) */
-OP(fd,87) { illegal_1(); op_87(); } /* DB FD */
-
-OP(fd,88) { illegal_1(); op_88(); } /* DB FD */
-OP(fd,89) { illegal_1(); op_89(); } /* DB FD */
-OP(fd,8a) { illegal_1(); op_8a(); } /* DB FD */
-OP(fd,8b) { illegal_1(); op_8b(); } /* DB FD */
-OP(fd,8c) { adc_a(HY); } /* ADC A,HY */
-OP(fd,8d) { adc_a(LY); } /* ADC A,LY */
-OP(fd,8e) { eay(); nomreq_addr(PCD-1, 5); adc_a(rm(m_ea)); } /* ADC A,(IY+o) */
-OP(fd,8f) { illegal_1(); op_8f(); } /* DB FD */
-
-OP(fd,90) { illegal_1(); op_90(); } /* DB FD */
-OP(fd,91) { illegal_1(); op_91(); } /* DB FD */
-OP(fd,92) { illegal_1(); op_92(); } /* DB FD */
-OP(fd,93) { illegal_1(); op_93(); } /* DB FD */
-OP(fd,94) { sub(HY); } /* SUB HY */
-OP(fd,95) { sub(LY); } /* SUB LY */
-OP(fd,96) { eay(); nomreq_addr(PCD-1, 5); sub(rm(m_ea)); } /* SUB (IY+o) */
-OP(fd,97) { illegal_1(); op_97(); } /* DB FD */
-
-OP(fd,98) { illegal_1(); op_98(); } /* DB FD */
-OP(fd,99) { illegal_1(); op_99(); } /* DB FD */
-OP(fd,9a) { illegal_1(); op_9a(); } /* DB FD */
-OP(fd,9b) { illegal_1(); op_9b(); } /* DB FD */
-OP(fd,9c) { sbc_a(HY); } /* SBC A,HY */
-OP(fd,9d) { sbc_a(LY); } /* SBC A,LY */
-OP(fd,9e) { eay(); nomreq_addr(PCD-1, 5); sbc_a(rm(m_ea)); } /* SBC A,(IY+o) */
-OP(fd,9f) { illegal_1(); op_9f(); } /* DB FD */
-
-OP(fd,a0) { illegal_1(); op_a0(); } /* DB FD */
-OP(fd,a1) { illegal_1(); op_a1(); } /* DB FD */
-OP(fd,a2) { illegal_1(); op_a2(); } /* DB FD */
-OP(fd,a3) { illegal_1(); op_a3(); } /* DB FD */
-OP(fd,a4) { and_a(HY); } /* AND HY */
-OP(fd,a5) { and_a(LY); } /* AND LY */
-OP(fd,a6) { eay(); nomreq_addr(PCD-1, 5); and_a(rm(m_ea)); } /* AND (IY+o) */
-OP(fd,a7) { illegal_1(); op_a7(); } /* DB FD */
-
-OP(fd,a8) { illegal_1(); op_a8(); } /* DB FD */
-OP(fd,a9) { illegal_1(); op_a9(); } /* DB FD */
-OP(fd,aa) { illegal_1(); op_aa(); } /* DB FD */
-OP(fd,ab) { illegal_1(); op_ab(); } /* DB FD */
-OP(fd,ac) { xor_a(HY); } /* XOR HY */
-OP(fd,ad) { xor_a(LY); } /* XOR LY */
-OP(fd,ae) { eay(); nomreq_addr(PCD-1, 5); xor_a(rm(m_ea)); } /* XOR (IY+o) */
-OP(fd,af) { illegal_1(); op_af(); } /* DB FD */
-
-OP(fd,b0) { illegal_1(); op_b0(); } /* DB FD */
-OP(fd,b1) { illegal_1(); op_b1(); } /* DB FD */
-OP(fd,b2) { illegal_1(); op_b2(); } /* DB FD */
-OP(fd,b3) { illegal_1(); op_b3(); } /* DB FD */
-OP(fd,b4) { or_a(HY); } /* OR HY */
-OP(fd,b5) { or_a(LY); } /* OR LY */
-OP(fd,b6) { eay(); nomreq_addr(PCD-1, 5); or_a(rm(m_ea)); } /* OR (IY+o) */
-OP(fd,b7) { illegal_1(); op_b7(); } /* DB FD */
-
-OP(fd,b8) { illegal_1(); op_b8(); } /* DB FD */
-OP(fd,b9) { illegal_1(); op_b9(); } /* DB FD */
-OP(fd,ba) { illegal_1(); op_ba(); } /* DB FD */
-OP(fd,bb) { illegal_1(); op_bb(); } /* DB FD */
-OP(fd,bc) { cp(HY); } /* CP HY */
-OP(fd,bd) { cp(LY); } /* CP LY */
-OP(fd,be) { eay(); nomreq_addr(PCD-1, 5); cp(rm(m_ea)); } /* CP (IY+o) */
-OP(fd,bf) { illegal_1(); op_bf(); } /* DB FD */
-
-OP(fd,c0) { illegal_1(); op_c0(); } /* DB FD */
-OP(fd,c1) { illegal_1(); op_c1(); } /* DB FD */
-OP(fd,c2) { illegal_1(); op_c2(); } /* DB FD */
-OP(fd,c3) { illegal_1(); op_c3(); } /* DB FD */
-OP(fd,c4) { illegal_1(); op_c4(); } /* DB FD */
-OP(fd,c5) { illegal_1(); op_c5(); } /* DB FD */
-OP(fd,c6) { illegal_1(); op_c6(); } /* DB FD */
-OP(fd,c7) { illegal_1(); op_c7(); } /* DB FD */
-
-OP(fd,c8) { illegal_1(); op_c8(); } /* DB FD */
-OP(fd,c9) { illegal_1(); op_c9(); } /* DB FD */
-OP(fd,ca) { illegal_1(); op_ca(); } /* DB FD */
-OP(fd,cb) { eay(); u8 a = arg(); nomreq_addr(PCD-1, 2); EXEC(xycb, a); } /* ** FD CB xx */
-OP(fd,cc) { illegal_1(); op_cc(); } /* DB FD */
-OP(fd,cd) { illegal_1(); op_cd(); } /* DB FD */
-OP(fd,ce) { illegal_1(); op_ce(); } /* DB FD */
-OP(fd,cf) { illegal_1(); op_cf(); } /* DB FD */
-
-OP(fd,d0) { illegal_1(); op_d0(); } /* DB FD */
-OP(fd,d1) { illegal_1(); op_d1(); } /* DB FD */
-OP(fd,d2) { illegal_1(); op_d2(); } /* DB FD */
-OP(fd,d3) { illegal_1(); op_d3(); } /* DB FD */
-OP(fd,d4) { illegal_1(); op_d4(); } /* DB FD */
-OP(fd,d5) { illegal_1(); op_d5(); } /* DB FD */
-OP(fd,d6) { illegal_1(); op_d6(); } /* DB FD */
-OP(fd,d7) { illegal_1(); op_d7(); } /* DB FD */
-
-OP(fd,d8) { illegal_1(); op_d8(); } /* DB FD */
-OP(fd,d9) { illegal_1(); op_d9(); } /* DB FD */
-OP(fd,da) { illegal_1(); op_da(); } /* DB FD */
-OP(fd,db) { illegal_1(); op_db(); } /* DB FD */
-OP(fd,dc) { illegal_1(); op_dc(); } /* DB FD */
-OP(fd,dd) { illegal_1(); op_dd(); } /* DB FD */
-OP(fd,de) { illegal_1(); op_de(); } /* DB FD */
-OP(fd,df) { illegal_1(); op_df(); } /* DB FD */
-
-OP(fd,e0) { illegal_1(); op_e0(); } /* DB FD */
-OP(fd,e1) { pop(m_iy); } /* POP IY */
-OP(fd,e2) { illegal_1(); op_e2(); } /* DB FD */
-OP(fd,e3) { ex_sp(m_iy); } /* EX (SP),IY */
-OP(fd,e4) { illegal_1(); op_e4(); } /* DB FD */
-OP(fd,e5) { push(m_iy); } /* PUSH IY */
-OP(fd,e6) { illegal_1(); op_e6(); } /* DB FD */
-OP(fd,e7) { illegal_1(); op_e7(); } /* DB FD */
-
-OP(fd,e8) { illegal_1(); op_e8(); } /* DB FD */
-OP(fd,e9) { PC = IY; } /* JP (IY) */
-OP(fd,ea) { illegal_1(); op_ea(); } /* DB FD */
-OP(fd,eb) { illegal_1(); op_eb(); } /* DB FD */
-OP(fd,ec) { illegal_1(); op_ec(); } /* DB FD */
-OP(fd,ed) { illegal_1(); op_ed(); } /* DB FD */
-OP(fd,ee) { illegal_1(); op_ee(); } /* DB FD */
-OP(fd,ef) { illegal_1(); op_ef(); } /* DB FD */
-
-OP(fd,f0) { illegal_1(); op_f0(); } /* DB FD */
-OP(fd,f1) { illegal_1(); op_f1(); } /* DB FD */
-OP(fd,f2) { illegal_1(); op_f2(); } /* DB FD */
-OP(fd,f3) { illegal_1(); op_f3(); } /* DB FD */
-OP(fd,f4) { illegal_1(); op_f4(); } /* DB FD */
-OP(fd,f5) { illegal_1(); op_f5(); } /* DB FD */
-OP(fd,f6) { illegal_1(); op_f6(); } /* DB FD */
-OP(fd,f7) { illegal_1(); op_f7(); } /* DB FD */
-
-OP(fd,f8) { illegal_1(); op_f8(); } /* DB FD */
-OP(fd,f9) { nomreq_ir(2); SP = IY; } /* LD SP,IY */
-OP(fd,fa) { illegal_1(); op_fa(); } /* DB FD */
-OP(fd,fb) { illegal_1(); op_fb(); } /* DB FD */
-OP(fd,fc) { illegal_1(); op_fc(); } /* DB FD */
-OP(fd,fd) { illegal_1(); op_fd(); } /* DB FD */
-OP(fd,fe) { illegal_1(); op_fe(); } /* DB FD */
-OP(fd,ff) { illegal_1(); op_ff(); } /* DB FD */
-
-
-/**********************************************************
- * special opcodes (ED prefix)
- **********************************************************/
-OP(ed,00) { illegal_2(); } /* DB ED */
-OP(ed,01) { illegal_2(); } /* DB ED */
-OP(ed,02) { illegal_2(); } /* DB ED */
-OP(ed,03) { illegal_2(); } /* DB ED */
-OP(ed,04) { illegal_2(); } /* DB ED */
-OP(ed,05) { illegal_2(); } /* DB ED */
-OP(ed,06) { illegal_2(); } /* DB ED */
-OP(ed,07) { illegal_2(); } /* DB ED */
-
-OP(ed,08) { illegal_2(); } /* DB ED */
-OP(ed,09) { illegal_2(); } /* DB ED */
-OP(ed,0a) { illegal_2(); } /* DB ED */
-OP(ed,0b) { illegal_2(); } /* DB ED */
-OP(ed,0c) { illegal_2(); } /* DB ED */
-OP(ed,0d) { illegal_2(); } /* DB ED */
-OP(ed,0e) { illegal_2(); } /* DB ED */
-OP(ed,0f) { illegal_2(); } /* DB ED */
-
-OP(ed,10) { illegal_2(); } /* DB ED */
-OP(ed,11) { illegal_2(); } /* DB ED */
-OP(ed,12) { illegal_2(); } /* DB ED */
-OP(ed,13) { illegal_2(); } /* DB ED */
-OP(ed,14) { illegal_2(); } /* DB ED */
-OP(ed,15) { illegal_2(); } /* DB ED */
-OP(ed,16) { illegal_2(); } /* DB ED */
-OP(ed,17) { illegal_2(); } /* DB ED */
-
-OP(ed,18) { illegal_2(); } /* DB ED */
-OP(ed,19) { illegal_2(); } /* DB ED */
-OP(ed,1a) { illegal_2(); } /* DB ED */
-OP(ed,1b) { illegal_2(); } /* DB ED */
-OP(ed,1c) { illegal_2(); } /* DB ED */
-OP(ed,1d) { illegal_2(); } /* DB ED */
-OP(ed,1e) { illegal_2(); } /* DB ED */
-OP(ed,1f) { illegal_2(); } /* DB ED */
-
-OP(ed,20) { illegal_2(); } /* DB ED */
-OP(ed,21) { illegal_2(); } /* DB ED */
-OP(ed,22) { illegal_2(); } /* DB ED */
-OP(ed,23) { illegal_2(); } /* DB ED */
-OP(ed,24) { illegal_2(); } /* DB ED */
-OP(ed,25) { illegal_2(); } /* DB ED */
-OP(ed,26) { illegal_2(); } /* DB ED */
-OP(ed,27) { illegal_2(); } /* DB ED */
-
-OP(ed,28) { illegal_2(); } /* DB ED */
-OP(ed,29) { illegal_2(); } /* DB ED */
-OP(ed,2a) { illegal_2(); } /* DB ED */
-OP(ed,2b) { illegal_2(); } /* DB ED */
-OP(ed,2c) { illegal_2(); } /* DB ED */
-OP(ed,2d) { illegal_2(); } /* DB ED */
-OP(ed,2e) { illegal_2(); } /* DB ED */
-OP(ed,2f) { illegal_2(); } /* DB ED */
-
-OP(ed,30) { illegal_2(); } /* DB ED */
-OP(ed,31) { illegal_2(); } /* DB ED */
-OP(ed,32) { illegal_2(); } /* DB ED */
-OP(ed,33) { illegal_2(); } /* DB ED */
-OP(ed,34) { illegal_2(); } /* DB ED */
-OP(ed,35) { illegal_2(); } /* DB ED */
-OP(ed,36) { illegal_2(); } /* DB ED */
-OP(ed,37) { illegal_2(); } /* DB ED */
-
-OP(ed,38) { illegal_2(); } /* DB ED */
-OP(ed,39) { illegal_2(); } /* DB ED */
-OP(ed,3a) { illegal_2(); } /* DB ED */
-OP(ed,3b) { illegal_2(); } /* DB ED */
-OP(ed,3c) { illegal_2(); } /* DB ED */
-OP(ed,3d) { illegal_2(); } /* DB ED */
-OP(ed,3e) { illegal_2(); } /* DB ED */
-OP(ed,3f) { illegal_2(); } /* DB ED */
-
-OP(ed,40) { B = in(BC); set_f((F & CF) | SZP[B]); WZ = BC + 1; } /* IN B,(C) */
-OP(ed,41) { out(BC, B); WZ = BC + 1; } /* OUT (C),B */
-OP(ed,42) { sbc_hl(m_bc); } /* SBC HL,BC */
-OP(ed,43) { m_ea = arg16(); wm16(m_ea, m_bc); WZ = m_ea + 1; } /* LD (w),BC */
-OP(ed,44) { neg(); } /* NEG */
-OP(ed,45) { retn(); } /* RETN */
-OP(ed,46) { m_im = 0; } /* IM 0 */
-OP(ed,47) { ld_i_a(); } /* LD i,A */
-
-OP(ed,48) { C = in(BC); set_f((F & CF) | SZP[C]); WZ = BC + 1; } /* IN C,(C) */
-OP(ed,49) { out(BC, C); WZ = BC + 1; } /* OUT (C),C */
-OP(ed,4a) { adc_hl(m_bc); } /* ADC HL,BC */
-OP(ed,4b) { m_ea = arg16(); rm16(m_ea, m_bc); WZ = m_ea + 1; } /* LD BC,(w) */
-OP(ed,4c) { neg(); } /* NEG */
-OP(ed,4d) { reti(); } /* RETI */
-OP(ed,4e) { m_im = 0; } /* IM 0 */
-OP(ed,4f) { ld_r_a(); } /* LD r,A */
-
-OP(ed,50) { D = in(BC); set_f((F & CF) | SZP[D]); WZ = BC + 1; } /* IN D,(C) */
-OP(ed,51) { out(BC, D); WZ = BC + 1; } /* OUT (C),D */
-OP(ed,52) { sbc_hl(m_de); } /* SBC HL,DE */
-OP(ed,53) { m_ea = arg16(); wm16(m_ea, m_de); WZ = m_ea + 1; } /* LD (w),DE */
-OP(ed,54) { neg(); } /* NEG */
-OP(ed,55) { retn(); } /* RETN */
-OP(ed,56) { m_im = 1; } /* IM 1 */
-OP(ed,57) { ld_a_i(); } /* LD A,i */
-
-OP(ed,58) { E = in(BC); set_f((F & CF) | SZP[E]); WZ = BC + 1; } /* IN E,(C) */
-OP(ed,59) { out(BC, E); WZ = BC + 1; } /* OUT (C),E */
-OP(ed,5a) { adc_hl(m_de); } /* ADC HL,DE */
-OP(ed,5b) { m_ea = arg16(); rm16(m_ea, m_de); WZ = m_ea + 1; } /* LD DE,(w) */
-OP(ed,5c) { neg(); } /* NEG */
-OP(ed,5d) { reti(); } /* RETI */
-OP(ed,5e) { m_im = 2; } /* IM 2 */
-OP(ed,5f) { ld_a_r(); } /* LD A,r */
-
-OP(ed,60) { H = in(BC); set_f((F & CF) | SZP[H]); WZ = BC + 1; } /* IN H,(C) */
-OP(ed,61) { out(BC, H); WZ = BC + 1; } /* OUT (C),H */
-OP(ed,62) { sbc_hl(m_hl); } /* SBC HL,HL */
-OP(ed,63) { m_ea = arg16(); wm16(m_ea, m_hl); WZ = m_ea + 1; } /* LD (w),HL */
-OP(ed,64) { neg(); } /* NEG */
-OP(ed,65) { retn(); } /* RETN */
-OP(ed,66) { m_im = 0; } /* IM 0 */
-OP(ed,67) { rrd(); } /* RRD (HL) */
-
-OP(ed,68) { L = in(BC); set_f((F & CF) | SZP[L]); WZ = BC + 1; } /* IN L,(C) */
-OP(ed,69) { out(BC, L); WZ = BC + 1; } /* OUT (C),L */
-OP(ed,6a) { adc_hl(m_hl); } /* ADC HL,HL */
-OP(ed,6b) { m_ea = arg16(); rm16(m_ea, m_hl); WZ = m_ea + 1; } /* LD HL,(w) */
-OP(ed,6c) { neg(); } /* NEG */
-OP(ed,6d) { reti(); } /* RETI */
-OP(ed,6e) { m_im = 0; } /* IM 0 */
-OP(ed,6f) { rld(); } /* RLD (HL) */
-
-OP(ed,70) { u8 res = in(BC); set_f((F & CF) | SZP[res]); WZ = BC + 1; } /* IN 0,(C) */
-OP(ed,71) { out(BC, 0); WZ = BC + 1; } /* OUT (C),0 */
-OP(ed,72) { sbc_hl(m_sp); } /* SBC HL,SP */
-OP(ed,73) { m_ea = arg16(); wm16(m_ea, m_sp); WZ = m_ea + 1; } /* LD (w),SP */
-OP(ed,74) { neg(); } /* NEG */
-OP(ed,75) { retn(); } /* RETN */
-OP(ed,76) { m_im = 1; } /* IM 1 */
-OP(ed,77) { illegal_2(); } /* DB ED,77 */
-
-OP(ed,78) { A = in(BC); set_f((F & CF) | SZP[A]); WZ = BC + 1; } /* IN A,(C) */
-OP(ed,79) { out(BC, A); WZ = BC + 1; } /* OUT (C),A */
-OP(ed,7a) { adc_hl(m_sp); } /* ADC HL,SP */
-OP(ed,7b) { m_ea = arg16(); rm16(m_ea, m_sp); WZ = m_ea + 1; } /* LD SP,(w) */
-OP(ed,7c) { neg(); } /* NEG */
-OP(ed,7d) { reti(); } /* RETI */
-OP(ed,7e) { m_im = 2; } /* IM 2 */
-OP(ed,7f) { illegal_2(); } /* DB ED,7F */
-
-OP(ed,80) { illegal_2(); } /* DB ED */
-OP(ed,81) { illegal_2(); } /* DB ED */
-OP(ed,82) { illegal_2(); } /* DB ED */
-OP(ed,83) { illegal_2(); } /* DB ED */
-OP(ed,84) { illegal_2(); } /* DB ED */
-OP(ed,85) { illegal_2(); } /* DB ED */
-OP(ed,86) { illegal_2(); } /* DB ED */
-OP(ed,87) { illegal_2(); } /* DB ED */
-
-OP(ed,88) { illegal_2(); } /* DB ED */
-OP(ed,89) { illegal_2(); } /* DB ED */
-OP(ed,8a) { illegal_2(); } /* DB ED */
-OP(ed,8b) { illegal_2(); } /* DB ED */
-OP(ed,8c) { illegal_2(); } /* DB ED */
-OP(ed,8d) { illegal_2(); } /* DB ED */
-OP(ed,8e) { illegal_2(); } /* DB ED */
-OP(ed,8f) { illegal_2(); } /* DB ED */
-
-OP(ed,90) { illegal_2(); } /* DB ED */
-OP(ed,91) { illegal_2(); } /* DB ED */
-OP(ed,92) { illegal_2(); } /* DB ED */
-OP(ed,93) { illegal_2(); } /* DB ED */
-OP(ed,94) { illegal_2(); } /* DB ED */
-OP(ed,95) { illegal_2(); } /* DB ED */
-OP(ed,96) { illegal_2(); } /* DB ED */
-OP(ed,97) { illegal_2(); } /* DB ED */
-
-OP(ed,98) { illegal_2(); } /* DB ED */
-OP(ed,99) { illegal_2(); } /* DB ED */
-OP(ed,9a) { illegal_2(); } /* DB ED */
-OP(ed,9b) { illegal_2(); } /* DB ED */
-OP(ed,9c) { illegal_2(); } /* DB ED */
-OP(ed,9d) { illegal_2(); } /* DB ED */
-OP(ed,9e) { illegal_2(); } /* DB ED */
-OP(ed,9f) { illegal_2(); } /* DB ED */
-
-OP(ed,a0) { ldi(); } /* LDI */
-OP(ed,a1) { cpi(); } /* CPI */
-OP(ed,a2) { ini(); } /* INI */
-OP(ed,a3) { outi(); } /* OUTI */
-OP(ed,a4) { illegal_2(); } /* DB ED */
-OP(ed,a5) { illegal_2(); } /* DB ED */
-OP(ed,a6) { illegal_2(); } /* DB ED */
-OP(ed,a7) { illegal_2(); } /* DB ED */
-
-OP(ed,a8) { ldd(); } /* LDD */
-OP(ed,a9) { cpd(); } /* CPD */
-OP(ed,aa) { ind(); } /* IND */
-OP(ed,ab) { outd(); } /* OUTD */
-OP(ed,ac) { illegal_2(); } /* DB ED */
-OP(ed,ad) { illegal_2(); } /* DB ED */
-OP(ed,ae) { illegal_2(); } /* DB ED */
-OP(ed,af) { illegal_2(); } /* DB ED */
-
-OP(ed,b0) { ldir(); } /* LDIR */
-OP(ed,b1) { cpir(); } /* CPIR */
-OP(ed,b2) { inir(); } /* INIR */
-OP(ed,b3) { otir(); } /* OTIR */
-OP(ed,b4) { illegal_2(); } /* DB ED */
-OP(ed,b5) { illegal_2(); } /* DB ED */
-OP(ed,b6) { illegal_2(); } /* DB ED */
-OP(ed,b7) { illegal_2(); } /* DB ED */
-
-OP(ed,b8) { lddr(); } /* LDDR */
-OP(ed,b9) { cpdr(); } /* CPDR */
-OP(ed,ba) { indr(); } /* INDR */
-OP(ed,bb) { otdr(); } /* OTDR */
-OP(ed,bc) { illegal_2(); } /* DB ED */
-OP(ed,bd) { illegal_2(); } /* DB ED */
-OP(ed,be) { illegal_2(); } /* DB ED */
-OP(ed,bf) { illegal_2(); } /* DB ED */
-
-OP(ed,c0) { illegal_2(); } /* DB ED */
-OP(ed,c1) { illegal_2(); } /* DB ED */
-OP(ed,c2) { illegal_2(); } /* DB ED */
-OP(ed,c3) { illegal_2(); } /* DB ED */
-OP(ed,c4) { illegal_2(); } /* DB ED */
-OP(ed,c5) { illegal_2(); } /* DB ED */
-OP(ed,c6) { illegal_2(); } /* DB ED */
-OP(ed,c7) { illegal_2(); } /* DB ED */
-
-OP(ed,c8) { illegal_2(); } /* DB ED */
-OP(ed,c9) { illegal_2(); } /* DB ED */
-OP(ed,ca) { illegal_2(); } /* DB ED */
-OP(ed,cb) { illegal_2(); } /* DB ED */
-OP(ed,cc) { illegal_2(); } /* DB ED */
-OP(ed,cd) { illegal_2(); } /* DB ED */
-OP(ed,ce) { illegal_2(); } /* DB ED */
-OP(ed,cf) { illegal_2(); } /* DB ED */
-
-OP(ed,d0) { illegal_2(); } /* DB ED */
-OP(ed,d1) { illegal_2(); } /* DB ED */
-OP(ed,d2) { illegal_2(); } /* DB ED */
-OP(ed,d3) { illegal_2(); } /* DB ED */
-OP(ed,d4) { illegal_2(); } /* DB ED */
-OP(ed,d5) { illegal_2(); } /* DB ED */
-OP(ed,d6) { illegal_2(); } /* DB ED */
-OP(ed,d7) { illegal_2(); } /* DB ED */
-
-OP(ed,d8) { illegal_2(); } /* DB ED */
-OP(ed,d9) { illegal_2(); } /* DB ED */
-OP(ed,da) { illegal_2(); } /* DB ED */
-OP(ed,db) { illegal_2(); } /* DB ED */
-OP(ed,dc) { illegal_2(); } /* DB ED */
-OP(ed,dd) { illegal_2(); } /* DB ED */
-OP(ed,de) { illegal_2(); } /* DB ED */
-OP(ed,df) { illegal_2(); } /* DB ED */
-
-OP(ed,e0) { illegal_2(); } /* DB ED */
-OP(ed,e1) { illegal_2(); } /* DB ED */
-OP(ed,e2) { illegal_2(); } /* DB ED */
-OP(ed,e3) { illegal_2(); } /* DB ED */
-OP(ed,e4) { illegal_2(); } /* DB ED */
-OP(ed,e5) { illegal_2(); } /* DB ED */
-OP(ed,e6) { illegal_2(); } /* DB ED */
-OP(ed,e7) { illegal_2(); } /* DB ED */
-
-OP(ed,e8) { illegal_2(); } /* DB ED */
-OP(ed,e9) { illegal_2(); } /* DB ED */
-OP(ed,ea) { illegal_2(); } /* DB ED */
-OP(ed,eb) { illegal_2(); } /* DB ED */
-OP(ed,ec) { illegal_2(); } /* DB ED */
-OP(ed,ed) { illegal_2(); } /* DB ED */
-OP(ed,ee) { illegal_2(); } /* DB ED */
-OP(ed,ef) { illegal_2(); } /* DB ED */
-
-OP(ed,f0) { illegal_2(); } /* DB ED */
-OP(ed,f1) { illegal_2(); } /* DB ED */
-OP(ed,f2) { illegal_2(); } /* DB ED */
-OP(ed,f3) { illegal_2(); } /* DB ED */
-OP(ed,f4) { illegal_2(); } /* DB ED */
-OP(ed,f5) { illegal_2(); } /* DB ED */
-OP(ed,f6) { illegal_2(); } /* DB ED */
-OP(ed,f7) { illegal_2(); } /* DB ED */
-
-OP(ed,f8) { illegal_2(); } /* DB ED */
-OP(ed,f9) { illegal_2(); } /* DB ED */
-OP(ed,fa) { illegal_2(); } /* DB ED */
-OP(ed,fb) { illegal_2(); } /* DB ED */
-OP(ed,fc) { illegal_2(); } /* DB ED */
-OP(ed,fd) { illegal_2(); } /* DB ED */
-OP(ed,fe) { illegal_2(); } /* DB ED */
-OP(ed,ff) { illegal_2(); } /* DB ED */
-
-
-/**********************************************************
- * main opcodes
- **********************************************************/
-OP(op,00) { } /* NOP */
-OP(op,01) { BC = arg16(); } /* LD BC,w */
-OP(op,02) { wm(BC,A); WZ_L = (BC + 1) & 0xFF; WZ_H = A; } /* LD (BC),A */
-OP(op,03) { nomreq_ir(2); BC++; } /* INC BC */
-OP(op,04) { B = inc(B); } /* INC B */
-OP(op,05) { B = dec(B); } /* DEC B */
-OP(op,06) { B = arg(); } /* LD B,n */
-OP(op,07) { rlca(); } /* RLCA */
-
-OP(op,08) { using std::swap; swap(m_af, m_af2); } /* EX AF,AF' */
-OP(op,09) { add16(m_hl, m_bc); } /* ADD HL,BC */
-OP(op,0a) { A = rm(BC); WZ=BC+1; } /* LD A,(BC) */
-OP(op,0b) { nomreq_ir(2); BC--; } /* DEC BC */
-OP(op,0c) { C = inc(C); } /* INC C */
-OP(op,0d) { C = dec(C); } /* DEC C */
-OP(op,0e) { C = arg(); } /* LD C,n */
-OP(op,0f) { rrca(); } /* RRCA */
-
-OP(op,10) { nomreq_ir(1); B--; jr_cond(B, 0x10); } /* DJNZ o */
-OP(op,11) { DE = arg16(); } /* LD DE,w */
-OP(op,12) { wm(DE,A); WZ_L = (DE + 1) & 0xFF; WZ_H = A; } /* LD (DE),A */
-OP(op,13) { nomreq_ir(2); DE++; } /* INC DE */
-OP(op,14) { D = inc(D); } /* INC D */
-OP(op,15) { D = dec(D); } /* DEC D */
-OP(op,16) { D = arg(); } /* LD D,n */
-OP(op,17) { rla(); } /* RLA */
-
-OP(op,18) { jr(); } /* JR o */
-OP(op,19) { add16(m_hl, m_de); } /* ADD HL,DE */
-OP(op,1a) { A = rm(DE); WZ = DE + 1; } /* LD A,(DE) */
-OP(op,1b) { nomreq_ir(2); DE--; } /* DEC DE */
-OP(op,1c) { E = inc(E); } /* INC E */
-OP(op,1d) { E = dec(E); } /* DEC E */
-OP(op,1e) { E = arg(); } /* LD E,n */
-OP(op,1f) { rra(); } /* RRA */
-
-OP(op,20) { jr_cond(!(F & ZF), 0x20); } /* JR NZ,o */
-OP(op,21) { HL = arg16(); } /* LD HL,w */
-OP(op,22) { m_ea = arg16(); wm16(m_ea, m_hl); WZ = m_ea + 1; } /* LD (w),HL */
-OP(op,23) { nomreq_ir(2); HL++; } /* INC HL */
-OP(op,24) { H = inc(H); } /* INC H */
-OP(op,25) { H = dec(H); } /* DEC H */
-OP(op,26) { H = arg(); } /* LD H,n */
-OP(op,27) { daa(); } /* DAA */
-
-OP(op,28) { jr_cond(F & ZF, 0x28); } /* JR Z,o */
-OP(op,29) { add16(m_hl, m_hl); } /* ADD HL,HL */
-OP(op,2a) { m_ea = arg16(); rm16(m_ea, m_hl); WZ = m_ea + 1; } /* LD HL,(w) */
-OP(op,2b) { nomreq_ir(2); HL--; } /* DEC HL */
-OP(op,2c) { L = inc(L); } /* INC L */
-OP(op,2d) { L = dec(L); } /* DEC L */
-OP(op,2e) { L = arg(); } /* LD L,n */
-OP(op,2f) { A ^= 0xff; set_f((F & (SF | ZF | PF | CF)) | HF | NF | (A & (YF | XF))); } /* CPL */
-
-OP(op,30) { jr_cond(!(F & CF), 0x30); } /* JR NC,o */
-OP(op,31) { SP = arg16(); } /* LD SP,w */
-OP(op,32) { m_ea = arg16(); wm(m_ea, A); WZ_L = (m_ea + 1) & 0xFF; WZ_H = A; } /* LD (w),A */
-OP(op,33) { nomreq_ir(2); SP++; } /* INC SP */
-OP(op,34) { wm(HL, inc(rm_reg(HL))); } /* INC (HL) */
-OP(op,35) { wm(HL, dec(rm_reg(HL))); } /* DEC (HL) */
-OP(op,36) { wm(HL, arg()); } /* LD (HL),n */
-OP(op,37) { set_f((F & (SF | ZF | PF)) | CF | (((F & Q) | A) & (YF | XF))); } /* SCF */
-
-OP(op,38) { jr_cond(F & CF, 0x38); } /* JR C,o */
-OP(op,39) { add16(m_hl, m_sp); } /* ADD HL,SP */
-OP(op,3a) { m_ea = arg16(); A = rm(m_ea); WZ = m_ea + 1; } /* LD A,(w) */
-OP(op,3b) { nomreq_ir(2); SP--; } /* DEC SP */
-OP(op,3c) { A = inc(A); } /* INC A */
-OP(op,3d) { A = dec(A); } /* DEC A */
-OP(op,3e) { A = arg(); } /* LD A,n */
-OP(op,3f) { set_f(((F & (SF | ZF | PF | CF)) ^ CF) | ((F & CF) << 4) | (((F & Q) | A) & (YF | XF))); } /* CCF */
-
-OP(op,40) { } /* LD B,B */
-OP(op,41) { B = C; } /* LD B,C */
-OP(op,42) { B = D; } /* LD B,D */
-OP(op,43) { B = E; } /* LD B,E */
-OP(op,44) { B = H; } /* LD B,H */
-OP(op,45) { B = L; } /* LD B,L */
-OP(op,46) { B = rm(HL); } /* LD B,(HL) */
-OP(op,47) { B = A; } /* LD B,A */
-
-OP(op,48) { C = B; } /* LD C,B */
-OP(op,49) { } /* LD C,C */
-OP(op,4a) { C = D; } /* LD C,D */
-OP(op,4b) { C = E; } /* LD C,E */
-OP(op,4c) { C = H; } /* LD C,H */
-OP(op,4d) { C = L; } /* LD C,L */
-OP(op,4e) { C = rm(HL); } /* LD C,(HL) */
-OP(op,4f) { C = A; } /* LD C,A */
-
-OP(op,50) { D = B; } /* LD D,B */
-OP(op,51) { D = C; } /* LD D,C */
-OP(op,52) { } /* LD D,D */
-OP(op,53) { D = E; } /* LD D,E */
-OP(op,54) { D = H; } /* LD D,H */
-OP(op,55) { D = L; } /* LD D,L */
-OP(op,56) { D = rm(HL); } /* LD D,(HL) */
-OP(op,57) { D = A; } /* LD D,A */
-
-OP(op,58) { E = B; } /* LD E,B */
-OP(op,59) { E = C; } /* LD E,C */
-OP(op,5a) { E = D; } /* LD E,D */
-OP(op,5b) { } /* LD E,E */
-OP(op,5c) { E = H; } /* LD E,H */
-OP(op,5d) { E = L; } /* LD E,L */
-OP(op,5e) { E = rm(HL); } /* LD E,(HL) */
-OP(op,5f) { E = A; } /* LD E,A */
-
-OP(op,60) { H = B; } /* LD H,B */
-OP(op,61) { H = C; } /* LD H,C */
-OP(op,62) { H = D; } /* LD H,D */
-OP(op,63) { H = E; } /* LD H,E */
-OP(op,64) { } /* LD H,H */
-OP(op,65) { H = L; } /* LD H,L */
-OP(op,66) { H = rm(HL); } /* LD H,(HL) */
-OP(op,67) { H = A; } /* LD H,A */
-
-OP(op,68) { L = B; } /* LD L,B */
-OP(op,69) { L = C; } /* LD L,C */
-OP(op,6a) { L = D; } /* LD L,D */
-OP(op,6b) { L = E; } /* LD L,E */
-OP(op,6c) { L = H; } /* LD L,H */
-OP(op,6d) { } /* LD L,L */
-OP(op,6e) { L = rm(HL); } /* LD L,(HL) */
-OP(op,6f) { L = A; } /* LD L,A */
-
-OP(op,70) { wm(HL, B); } /* LD (HL),B */
-OP(op,71) { wm(HL, C); } /* LD (HL),C */
-OP(op,72) { wm(HL, D); } /* LD (HL),D */
-OP(op,73) { wm(HL, E); } /* LD (HL),E */
-OP(op,74) { wm(HL, H); } /* LD (HL),H */
-OP(op,75) { wm(HL, L); } /* LD (HL),L */
-OP(op,76) { halt(); } /* HALT */
-OP(op,77) { wm(HL, A); } /* LD (HL),A */
-
-OP(op,78) { A = B; } /* LD A,B */
-OP(op,79) { A = C; } /* LD A,C */
-OP(op,7a) { A = D; } /* LD A,D */
-OP(op,7b) { A = E; } /* LD A,E */
-OP(op,7c) { A = H; } /* LD A,H */
-OP(op,7d) { A = L; } /* LD A,L */
-OP(op,7e) { A = rm(HL); } /* LD A,(HL) */
-OP(op,7f) { } /* LD A,A */
-
-OP(op,80) { add_a(B); } /* ADD A,B */
-OP(op,81) { add_a(C); } /* ADD A,C */
-OP(op,82) { add_a(D); } /* ADD A,D */
-OP(op,83) { add_a(E); } /* ADD A,E */
-OP(op,84) { add_a(H); } /* ADD A,H */
-OP(op,85) { add_a(L); } /* ADD A,L */
-OP(op,86) { add_a(rm(HL)); } /* ADD A,(HL) */
-OP(op,87) { add_a(A); } /* ADD A,A */
-
-OP(op,88) { adc_a(B); } /* ADC A,B */
-OP(op,89) { adc_a(C); } /* ADC A,C */
-OP(op,8a) { adc_a(D); } /* ADC A,D */
-OP(op,8b) { adc_a(E); } /* ADC A,E */
-OP(op,8c) { adc_a(H); } /* ADC A,H */
-OP(op,8d) { adc_a(L); } /* ADC A,L */
-OP(op,8e) { adc_a(rm(HL)); } /* ADC A,(HL) */
-OP(op,8f) { adc_a(A); } /* ADC A,A */
-
-OP(op,90) { sub(B); } /* SUB B */
-OP(op,91) { sub(C); } /* SUB C */
-OP(op,92) { sub(D); } /* SUB D */
-OP(op,93) { sub(E); } /* SUB E */
-OP(op,94) { sub(H); } /* SUB H */
-OP(op,95) { sub(L); } /* SUB L */
-OP(op,96) { sub(rm(HL)); } /* SUB (HL) */
-OP(op,97) { sub(A); } /* SUB A */
-
-OP(op,98) { sbc_a(B); } /* SBC A,B */
-OP(op,99) { sbc_a(C); } /* SBC A,C */
-OP(op,9a) { sbc_a(D); } /* SBC A,D */
-OP(op,9b) { sbc_a(E); } /* SBC A,E */
-OP(op,9c) { sbc_a(H); } /* SBC A,H */
-OP(op,9d) { sbc_a(L); } /* SBC A,L */
-OP(op,9e) { sbc_a(rm(HL)); } /* SBC A,(HL) */
-OP(op,9f) { sbc_a(A); } /* SBC A,A */
-
-OP(op,a0) { and_a(B); } /* AND B */
-OP(op,a1) { and_a(C); } /* AND C */
-OP(op,a2) { and_a(D); } /* AND D */
-OP(op,a3) { and_a(E); } /* AND E */
-OP(op,a4) { and_a(H); } /* AND H */
-OP(op,a5) { and_a(L); } /* AND L */
-OP(op,a6) { and_a(rm(HL)); } /* AND (HL) */
-OP(op,a7) { and_a(A); } /* AND A */
-
-OP(op,a8) { xor_a(B); } /* XOR B */
-OP(op,a9) { xor_a(C); } /* XOR C */
-OP(op,aa) { xor_a(D); } /* XOR D */
-OP(op,ab) { xor_a(E); } /* XOR E */
-OP(op,ac) { xor_a(H); } /* XOR H */
-OP(op,ad) { xor_a(L); } /* XOR L */
-OP(op,ae) { xor_a(rm(HL)); } /* XOR (HL) */
-OP(op,af) { xor_a(A); } /* XOR A */
-
-OP(op,b0) { or_a(B); } /* OR B */
-OP(op,b1) { or_a(C); } /* OR C */
-OP(op,b2) { or_a(D); } /* OR D */
-OP(op,b3) { or_a(E); } /* OR E */
-OP(op,b4) { or_a(H); } /* OR H */
-OP(op,b5) { or_a(L); } /* OR L */
-OP(op,b6) { or_a(rm(HL)); } /* OR (HL) */
-OP(op,b7) { or_a(A); } /* OR A */
-
-OP(op,b8) { cp(B); } /* CP B */
-OP(op,b9) { cp(C); } /* CP C */
-OP(op,ba) { cp(D); } /* CP D */
-OP(op,bb) { cp(E); } /* CP E */
-OP(op,bc) { cp(H); } /* CP H */
-OP(op,bd) { cp(L); } /* CP L */
-OP(op,be) { cp(rm(HL)); } /* CP (HL) */
-OP(op,bf) { cp(A); } /* CP A */
-
-OP(op,c0) { ret_cond(!(F & ZF), 0xc0); } /* RET NZ */
-OP(op,c1) { pop(m_bc); } /* POP BC */
-OP(op,c2) { jp_cond(!(F & ZF)); } /* JP NZ,a */
-OP(op,c3) { jp(); } /* JP a */
-OP(op,c4) { call_cond(!(F & ZF), 0xc4); } /* CALL NZ,a */
-OP(op,c5) { push(m_bc); } /* PUSH BC */
-OP(op,c6) { add_a(arg()); } /* ADD A,n */
-OP(op,c7) { rst(0x00); } /* RST 0 */
-
-OP(op,c8) { ret_cond(F & ZF, 0xc8); } /* RET Z */
-OP(op,c9) { pop(m_pc); WZ = PCD; } /* RET */
-OP(op,ca) { jp_cond(F & ZF); } /* JP Z,a */
-OP(op,cb) { EXEC(cb, rop()); } /* **** CB xx */
-OP(op,cc) { call_cond(F & ZF, 0xcc); } /* CALL Z,a */
-OP(op,cd) { call(); } /* CALL a */
-OP(op,ce) { adc_a(arg()); } /* ADC A,n */
-OP(op,cf) { rst(0x08); } /* RST 1 */
-
-OP(op,d0) { ret_cond(!(F & CF), 0xd0); } /* RET NC */
-OP(op,d1) { pop(m_de); } /* POP DE */
-OP(op,d2) { jp_cond(!(F & CF)); } /* JP NC,a */
-OP(op,d3) { unsigned n = arg() | (A << 8); out(n, A); WZ_L = ((n & 0xff) + 1) & 0xff; WZ_H = A; } /* OUT (n),A */
-OP(op,d4) { call_cond(!(F & CF), 0xd4); } /* CALL NC,a */
-OP(op,d5) { push(m_de); } /* PUSH DE */
-OP(op,d6) { sub(arg()); } /* SUB n */
-OP(op,d7) { rst(0x10); } /* RST 2 */
-
-OP(op,d8) { ret_cond(F & CF, 0xd8); } /* RET C */
-OP(op,d9) { exx(); } /* EXX */
-OP(op,da) { jp_cond(F & CF); } /* JP C,a */
-OP(op,db) { unsigned n = arg() | (A << 8); A = in(n); WZ = n + 1; } /* IN A,(n) */
-OP(op,dc) { call_cond(F & CF, 0xdc); } /* CALL C,a */
-OP(op,dd) { EXEC(dd, rop()); } /* **** DD xx */
-OP(op,de) { sbc_a(arg()); } /* SBC A,n */
-OP(op,df) { rst(0x18); } /* RST 3 */
-
-OP(op,e0) { ret_cond(!(F & PF), 0xe0); } /* RET PO */
-OP(op,e1) { pop(m_hl); } /* POP HL */
-OP(op,e2) { jp_cond(!(F & PF)); } /* JP PO,a */
-OP(op,e3) { ex_sp(m_hl); } /* EX HL,(SP) */
-OP(op,e4) { call_cond(!(F & PF), 0xe4); } /* CALL PO,a */
-OP(op,e5) { push(m_hl); } /* PUSH HL */
-OP(op,e6) { and_a(arg()); } /* AND n */
-OP(op,e7) { rst(0x20); } /* RST 4 */
-
-OP(op,e8) { ret_cond(F & PF, 0xe8); } /* RET PE */
-OP(op,e9) { PC = HL; } /* JP (HL) */
-OP(op,ea) { jp_cond(F & PF); } /* JP PE,a */
-OP(op,eb) { using std::swap; swap(DE, HL); } /* EX DE,HL */
-OP(op,ec) { call_cond(F & PF, 0xec); } /* CALL PE,a */
-OP(op,ed) { EXEC(ed, rop()); } /* **** ED xx */
-OP(op,ee) { xor_a(arg()); } /* XOR n */
-OP(op,ef) { rst(0x28); } /* RST 5 */
-
-OP(op,f0) { ret_cond(!(F & SF), 0xf0); } /* RET P */
-OP(op,f1) { pop(m_af); } /* POP AF */
-OP(op,f2) { jp_cond(!(F & SF)); } /* JP P,a */
-OP(op,f3) { m_iff1 = m_iff2 = 0; } /* DI */
-OP(op,f4) { call_cond(!(F & SF), 0xf4); } /* CALL P,a */
-OP(op,f5) { push(m_af); } /* PUSH AF */
-OP(op,f6) { or_a(arg()); } /* OR n */
-OP(op,f7) { rst(0x30); } /* RST 6 */
-
-OP(op,f8) { ret_cond(F & SF, 0xf8); } /* RET M */
-OP(op,f9) { nomreq_ir(2); SP = HL; } /* LD SP,HL */
-OP(op,fa) { jp_cond(F & SF); } /* JP M,a */
-OP(op,fb) { ei(); } /* EI */
-OP(op,fc) { call_cond(F & SF, 0xfc); } /* CALL M,a */
-OP(op,fd) { EXEC(fd, rop()); } /* **** FD xx */
-OP(op,fe) { cp(arg()); } /* CP n */
-OP(op,ff) { rst(0x38); } /* RST 7 */
-
-
-void z80_device::take_nmi()
-{
- // Check if processor was halted
- leave_halt();
-
-#if HAS_LDAIR_QUIRK
- // reset parity flag after LD A,I or LD A,R
- if (m_after_ldair) F &= ~PF;
-#endif
-
- m_iff1 = 0;
- m_r++;
-
- T(5);
- wm16_sp(m_pc);
- PCD = 0x0066;
- WZ = PCD;
- m_nmi_pending = false;
-}
-
-void z80_device::take_interrupt()
-{
- // check if processor was halted
- leave_halt();
-
- // clear both interrupt flip flops
- m_iff1 = m_iff2 = 0;
-
- // say hi
- // Not precise in all cases. z80 must finish current instruction (NOP) to reach this state - in such case frame timings are shifter from cb event if calulated based on it.
- m_irqack_cb(true);
- m_r++;
-
- // fetch the IRQ vector
- device_z80daisy_interface *intf = daisy_get_irq_device();
- int irq_vector = (intf != nullptr) ? intf->z80daisy_irq_ack() : standard_irq_callback(0, m_pc.w.l);
- LOGINT("single INT irq_vector $%02x\n", irq_vector);
-
- // 'interrupt latency' cycles
- T(2);
-
- // Interrupt mode 2. Call [i:databyte]
- if (m_im == 2)
- {
- // Zilog's datasheet claims that "the least-significant bit must be a zero."
- // However, experiments have confirmed that IM 2 vectors do not have to be
- // even, and all 8 bits will be used; even $FF is handled normally.
- // CALL opcode timing
- T(5);
- wm16_sp(m_pc);
- irq_vector = (irq_vector & 0xff) | (m_i << 8);
- rm16(irq_vector, m_pc);
- LOGINT("IM2 [$%04x] = $%04x\n", irq_vector, PCD);
- }
- else if (m_im == 1)
- {
- // Interrupt mode 1. RST 38h
- LOGINT("'%s' IM1 $0038\n", tag());
- // RST $38
- T(5);
- wm16_sp(m_pc);
- PCD = 0x0038;
- }
- else
- {
- /* Interrupt mode 0. We check for CALL and JP instructions,
- if neither of these were found we assume a 1 byte opcode
- was placed on the databus */
- LOGINT("IM0 $%04x\n", irq_vector);
-
- // check for nop
- if (irq_vector != 0x00)
- {
- switch (irq_vector & 0xff0000)
- {
- case 0xcd0000: // call
- // CALL $xxxx cycles
- T(11);
- wm16_sp(m_pc);
- PCD = irq_vector & 0xffff;
- break;
- case 0xc30000: // jump
- // JP $xxxx cycles
- T(10);
- PCD = irq_vector & 0xffff;
- break;
- default: // rst (or other opcodes?)
- if (irq_vector == 0xfb)
- {
- // EI
- T(4);
- ei();
- }
- else if ((irq_vector & 0xc7) == 0xc7)
- {
- // RST $xx cycles
- T(5);
- wm16_sp(m_pc);
- PCD = irq_vector & 0x0038;
- }
- else
- logerror("take_interrupt: unexpected opcode in im0 mode: 0x%02x\n", irq_vector);
- break;
- }
- }
- }
- WZ = PCD;
-
-#if HAS_LDAIR_QUIRK
- // reset parity flag after LD A,I or LD A,R
- if (m_after_ldair) F &= ~PF;
-#endif
-}
-
-void z80_device::nomreq_ir(s8 cycles)
-{
- nomreq_addr((m_i << 8) | (m_r2 & 0x80) | (m_r & 0x7f), cycles);
-}
-
-void z80_device::nomreq_addr(u16 addr, s8 cycles)
-{
- while (cycles--)
- {
- m_nomreq_cb(addr, 0x00, 0xff);
- T(1);
- }
-}
-
-void nsc800_device::take_interrupt_nsc800()
-{
- // Check if processor was halted
- leave_halt();
-
- // Clear both interrupt flip flops
- m_iff1 = m_iff2 = 0;
-
- // 'interrupt latency' cycles
- T(7);
- if (m_nsc800_irq_state[NSC800_RSTA])
- {
- wm16_sp(m_pc);
- PCD = 0x003c;
- }
- else if (m_nsc800_irq_state[NSC800_RSTB])
- {
- wm16_sp(m_pc);
- PCD = 0x0034;
- }
- else if (m_nsc800_irq_state[NSC800_RSTC])
- {
- wm16_sp(m_pc);
- PCD = 0x002c;
- }
- else
- {
- T(2 * m_memrq_cycles);
- }
-
- WZ = PCD;
-
-#if HAS_LDAIR_QUIRK
- // reset parity flag after LD A,I or LD A,R
- if (m_after_ldair) F &= ~PF;
-#endif
-}
-
/****************************************************************************
* Processor initialization
****************************************************************************/
@@ -3449,6 +770,11 @@ void z80_device::device_start()
save_item(NAME(m_busrq_state));
save_item(NAME(m_after_ei));
save_item(NAME(m_after_ldair));
+ save_item(NAME(m_ref));
+ save_item(NAME(m_tmp_irq_vector));
+ save_item(NAME(m_shared_addr.w));
+ save_item(NAME(m_shared_data.w));
+ save_item(NAME(m_shared_data2.w));
// Reset registers to their initial values
PRVPC = 0;
@@ -3537,6 +863,7 @@ void z80_device::device_reset()
{
leave_halt();
+ m_ref = 0xffff00;
PC = 0x0000;
m_i = 0;
m_r = 0;
@@ -3556,9 +883,42 @@ void nsc800_device::device_reset()
memset(m_nsc800_irq_state, 0, sizeof(m_nsc800_irq_state));
}
-inline void z80_device::execute_cycles(u8 icount)
+bool z80_device::check_icount(u8 to_step, int icount_saved, bool redonable)
+{
+ if ((m_icount < 0) && redonable && access_to_be_redone())
+ {
+ m_icount = icount_saved;
+ m_ref = (m_ref & 0xffff00) | (to_step - 1);
+ m_redone = true;
+ return true;
+ }
+ if (m_wait_state)
+ {
+ m_icount = 0;
+ }
+ if (m_icount <= 0)
+ {
+ m_ref = (m_ref & 0xffff00) | to_step;
+ return true;
+ }
+
+ return false;
+}
+
+void z80_device::do_rop()
+{
+ #include "cpu/z80/z80_rop.hxx"
+}
+
+void z80_device::do_op()
+{
+ #include "cpu/z80/z80.hxx"
+ m_ref = 0xffff00;
+}
+
+void nsc800_device::do_rop()
{
- m_icount -= icount;
+ #include "cpu/z80/z80_ncs800rop.hxx"
}
/****************************************************************************
@@ -3566,42 +926,35 @@ inline void z80_device::execute_cycles(u8 icount)
****************************************************************************/
void z80_device::execute_run()
{
- do
+ if (m_wait_state)
+ {
+ m_icount = 0; // stalled
+ return;
+ }
+
+ m_redone = false;
+ while (m_icount > 0 && !m_redone)
{
- if (m_wait_state)
+ if (m_ref >= 0xffff00)
{
- // stalled
- m_icount = 0;
- return;
+ do_rop();
+ if (m_icount > 0 && !m_redone)
+ {
+ if (m_halt)
+ {
+ PC--;
+ m_ref = 0xffff00;
+ } else {
+ m_ref = (0x00 << 16) | (TDAT8 << 8);
+ do_op();
+ }
+ }
}
-
- // check for interrupts before each instruction
- check_interrupts();
-
- m_after_ei = false;
- m_after_ldair = false;
-
- PRVPC = PCD;
- debugger_instruction_hook(PCD);
-
- u8 opcode = rop();
-
- // when in HALT state, the fetched opcode is not dispatched (aka a NOP)
- if (m_halt)
+ else
{
- PC--;
- opcode = 0;
+ do_op();
}
- EXEC(op, opcode);
- } while (m_icount > 0);
-}
-
-void z80_device::check_interrupts()
-{
- if (m_nmi_pending)
- take_nmi();
- else if (m_irq_state != CLEAR_LINE && m_iff1 && !m_after_ei)
- take_interrupt();
+ }
}
void z80_device::execute_set_input(int inputnum, int state)
@@ -3637,16 +990,6 @@ void z80_device::execute_set_input(int inputnum, int state)
}
}
-void nsc800_device::check_interrupts()
-{
- if (m_nmi_pending)
- take_nmi();
- else if ((m_nsc800_irq_state[NSC800_RSTA] != CLEAR_LINE || m_nsc800_irq_state[NSC800_RSTB] != CLEAR_LINE || m_nsc800_irq_state[NSC800_RSTC] != CLEAR_LINE) && m_iff1 && !m_after_ei)
- take_interrupt_nsc800();
- else if (m_irq_state != CLEAR_LINE && m_iff1 && !m_after_ei)
- take_interrupt();
-}
-
void nsc800_device::execute_set_input(int inputnum, int state)
{
switch (inputnum)
@@ -3733,7 +1076,8 @@ std::unique_ptr<util::disasm_interface> z80_device::create_disassembler()
return std::make_unique<z80_disassembler>();
}
-z80_device::z80_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock) : z80_device(mconfig, Z80, tag, owner, clock)
+z80_device::z80_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock)
+ : z80_device(mconfig, Z80, tag, owner, clock)
{
}
diff --git a/src/devices/cpu/z80/z80.h b/src/devices/cpu/z80/z80.h
index db38863f84c..02e19958704 100644
--- a/src/devices/cpu/z80/z80.h
+++ b/src/devices/cpu/z80/z80.h
@@ -49,10 +49,11 @@ protected:
// device_t implementation
virtual void device_validity_check(validity_checker &valid) const override;
- virtual void device_start() override;
- virtual void device_reset() override;
+ virtual void device_start() override ATTR_COLD;
+ virtual void device_reset() override ATTR_COLD;
// device_execute_interface implementation
+ virtual bool cpu_is_interruptible() const override { return true; }
virtual u32 execute_min_cycles() const noexcept override { return 2; }
virtual u32 execute_max_cycles() const noexcept override { return 16; }
virtual u32 execute_input_lines() const noexcept override { return 4; }
@@ -73,122 +74,17 @@ protected:
// device_disasm_interface implementation
virtual std::unique_ptr<util::disasm_interface> create_disassembler() override;
-#undef PROTOTYPES
-#define PROTOTYPES(prefix) \
- void prefix##_00(); void prefix##_01(); void prefix##_02(); void prefix##_03(); \
- void prefix##_04(); void prefix##_05(); void prefix##_06(); void prefix##_07(); \
- void prefix##_08(); void prefix##_09(); void prefix##_0a(); void prefix##_0b(); \
- void prefix##_0c(); void prefix##_0d(); void prefix##_0e(); void prefix##_0f(); \
- void prefix##_10(); void prefix##_11(); void prefix##_12(); void prefix##_13(); \
- void prefix##_14(); void prefix##_15(); void prefix##_16(); void prefix##_17(); \
- void prefix##_18(); void prefix##_19(); void prefix##_1a(); void prefix##_1b(); \
- void prefix##_1c(); void prefix##_1d(); void prefix##_1e(); void prefix##_1f(); \
- void prefix##_20(); void prefix##_21(); void prefix##_22(); void prefix##_23(); \
- void prefix##_24(); void prefix##_25(); void prefix##_26(); void prefix##_27(); \
- void prefix##_28(); void prefix##_29(); void prefix##_2a(); void prefix##_2b(); \
- void prefix##_2c(); void prefix##_2d(); void prefix##_2e(); void prefix##_2f(); \
- void prefix##_30(); void prefix##_31(); void prefix##_32(); void prefix##_33(); \
- void prefix##_34(); void prefix##_35(); void prefix##_36(); void prefix##_37(); \
- void prefix##_38(); void prefix##_39(); void prefix##_3a(); void prefix##_3b(); \
- void prefix##_3c(); void prefix##_3d(); void prefix##_3e(); void prefix##_3f(); \
- void prefix##_40(); void prefix##_41(); void prefix##_42(); void prefix##_43(); \
- void prefix##_44(); void prefix##_45(); void prefix##_46(); void prefix##_47(); \
- void prefix##_48(); void prefix##_49(); void prefix##_4a(); void prefix##_4b(); \
- void prefix##_4c(); void prefix##_4d(); void prefix##_4e(); void prefix##_4f(); \
- void prefix##_50(); void prefix##_51(); void prefix##_52(); void prefix##_53(); \
- void prefix##_54(); void prefix##_55(); void prefix##_56(); void prefix##_57(); \
- void prefix##_58(); void prefix##_59(); void prefix##_5a(); void prefix##_5b(); \
- void prefix##_5c(); void prefix##_5d(); void prefix##_5e(); void prefix##_5f(); \
- void prefix##_60(); void prefix##_61(); void prefix##_62(); void prefix##_63(); \
- void prefix##_64(); void prefix##_65(); void prefix##_66(); void prefix##_67(); \
- void prefix##_68(); void prefix##_69(); void prefix##_6a(); void prefix##_6b(); \
- void prefix##_6c(); void prefix##_6d(); void prefix##_6e(); void prefix##_6f(); \
- void prefix##_70(); void prefix##_71(); void prefix##_72(); void prefix##_73(); \
- void prefix##_74(); void prefix##_75(); void prefix##_76(); void prefix##_77(); \
- void prefix##_78(); void prefix##_79(); void prefix##_7a(); void prefix##_7b(); \
- void prefix##_7c(); void prefix##_7d(); void prefix##_7e(); void prefix##_7f(); \
- void prefix##_80(); void prefix##_81(); void prefix##_82(); void prefix##_83(); \
- void prefix##_84(); void prefix##_85(); void prefix##_86(); void prefix##_87(); \
- void prefix##_88(); void prefix##_89(); void prefix##_8a(); void prefix##_8b(); \
- void prefix##_8c(); void prefix##_8d(); void prefix##_8e(); void prefix##_8f(); \
- void prefix##_90(); void prefix##_91(); void prefix##_92(); void prefix##_93(); \
- void prefix##_94(); void prefix##_95(); void prefix##_96(); void prefix##_97(); \
- void prefix##_98(); void prefix##_99(); void prefix##_9a(); void prefix##_9b(); \
- void prefix##_9c(); void prefix##_9d(); void prefix##_9e(); void prefix##_9f(); \
- void prefix##_a0(); void prefix##_a1(); void prefix##_a2(); void prefix##_a3(); \
- void prefix##_a4(); void prefix##_a5(); void prefix##_a6(); void prefix##_a7(); \
- void prefix##_a8(); void prefix##_a9(); void prefix##_aa(); void prefix##_ab(); \
- void prefix##_ac(); void prefix##_ad(); void prefix##_ae(); void prefix##_af(); \
- void prefix##_b0(); void prefix##_b1(); void prefix##_b2(); void prefix##_b3(); \
- void prefix##_b4(); void prefix##_b5(); void prefix##_b6(); void prefix##_b7(); \
- void prefix##_b8(); void prefix##_b9(); void prefix##_ba(); void prefix##_bb(); \
- void prefix##_bc(); void prefix##_bd(); void prefix##_be(); void prefix##_bf(); \
- void prefix##_c0(); void prefix##_c1(); void prefix##_c2(); void prefix##_c3(); \
- void prefix##_c4(); void prefix##_c5(); void prefix##_c6(); void prefix##_c7(); \
- void prefix##_c8(); void prefix##_c9(); void prefix##_ca(); void prefix##_cb(); \
- void prefix##_cc(); void prefix##_cd(); void prefix##_ce(); void prefix##_cf(); \
- void prefix##_d0(); void prefix##_d1(); void prefix##_d2(); void prefix##_d3(); \
- void prefix##_d4(); void prefix##_d5(); void prefix##_d6(); void prefix##_d7(); \
- void prefix##_d8(); void prefix##_d9(); void prefix##_da(); void prefix##_db(); \
- void prefix##_dc(); void prefix##_dd(); void prefix##_de(); void prefix##_df(); \
- void prefix##_e0(); void prefix##_e1(); void prefix##_e2(); void prefix##_e3(); \
- void prefix##_e4(); void prefix##_e5(); void prefix##_e6(); void prefix##_e7(); \
- void prefix##_e8(); void prefix##_e9(); void prefix##_ea(); void prefix##_eb(); \
- void prefix##_ec(); void prefix##_ed(); void prefix##_ee(); void prefix##_ef(); \
- void prefix##_f0(); void prefix##_f1(); void prefix##_f2(); void prefix##_f3(); \
- void prefix##_f4(); void prefix##_f5(); void prefix##_f6(); void prefix##_f7(); \
- void prefix##_f8(); void prefix##_f9(); void prefix##_fa(); void prefix##_fb(); \
- void prefix##_fc(); void prefix##_fd(); void prefix##_fe(); void prefix##_ff();
-
- PROTOTYPES(op)
- PROTOTYPES(cb)
- PROTOTYPES(dd)
- PROTOTYPES(ed)
- PROTOTYPES(fd)
- PROTOTYPES(xycb)
-
void illegal_1();
void illegal_2();
void halt();
void leave_halt();
- u8 in(u16 port);
- void out(u16 port, u8 value);
- u8 rm(u16 addr);
- u8 rm_reg(u16 addr);
- void rm16(u16 addr, PAIR &r);
- void wm(u16 addr, u8 value);
- void wm16(u16 addr, PAIR &r);
- void wm16_sp(PAIR &r);
- u8 rop();
- u8 arg();
- u16 arg16();
- void eax();
- void eay();
- void pop(PAIR &r);
- void push(PAIR &r);
- void jp(void);
- void jp_cond(bool cond);
- void jr();
- void jr_cond(bool cond, u8 opcode);
- void call();
- void call_cond(bool cond, u8 opcode);
- void ret_cond(bool cond, u8 opcode);
- void retn();
- void reti();
- void ld_r_a();
- void ld_a_r();
- void ld_i_a();
- void ld_a_i();
- void rst(u16 addr);
- u8 inc(u8 value);
- u8 dec(u8 value);
+ void inc(u8 &r);
+ void dec(u8 &r);
void rlca();
void rrca();
void rla();
void rra();
- void rrd();
- void rld();
void add_a(u8 value);
void adc_a(u8 value);
void sub(u8 value);
@@ -200,10 +96,6 @@ protected:
void xor_a(u8 value);
void cp(u8 value);
void exx();
- void ex_sp(PAIR &r);
- void add16(PAIR &dr, PAIR &sr);
- void adc_hl(PAIR &r);
- void sbc_hl(PAIR &r);
u8 rlc(u8 value);
u8 rrc(u8 value);
u8 rl(u8 value);
@@ -217,32 +109,13 @@ protected:
void bit_xy(int bit, u8 value);
u8 res(int bit, u8 value);
u8 set(int bit, u8 value);
- void ldi();
- void cpi();
- u8 ini();
- u8 outi();
- void ldd();
- void cpd();
- u8 ind();
- u8 outd();
- void ldir();
- void cpir();
- void inir();
- void otir();
- void lddr();
- void cpdr();
- void indr();
- void otdr();
void ei();
void set_f(u8 f);
- void block_io_interrupted_flags(u8 data);
+ void block_io_interrupted_flags();
- void execute_cycles(u8 icount);
- virtual void check_interrupts();
- void take_interrupt();
- void take_nmi();
- void nomreq_ir(s8 cycles);
- void nomreq_addr(u16 addr, s8 cycles);
+ virtual void do_rop();
+ virtual void do_op();
+ bool check_icount(u8 to_step, int icount_saved, bool redonable);
virtual u8 data_read(u16 addr);
virtual void data_write(u16 addr, u8 value);
@@ -296,8 +169,14 @@ protected:
u32 m_ea;
int m_icount;
+ int m_tmp_irq_vector;
+ PAIR16 m_shared_addr;
+ PAIR16 m_shared_data;
+ PAIR16 m_shared_data2;
u8 m_rtemp;
+ bool m_redone;
+ u32 m_ref;
u8 m_m1_cycles;
u8 m_memrq_cycles;
u8 m_iorq_cycles;
@@ -312,15 +191,14 @@ public:
protected:
// device_t implementation
- virtual void device_start() override;
- virtual void device_reset() override;
+ virtual void device_start() override ATTR_COLD;
+ virtual void device_reset() override ATTR_COLD;
// device_execute_interface implementation
virtual u32 execute_input_lines() const noexcept override { return 7; }
virtual void execute_set_input(int inputnum, int state) override;
- virtual void check_interrupts() override;
- void take_interrupt_nsc800();
+ virtual void do_rop() override;
u8 m_nsc800_irq_state[4]; // state of NSC800 restart interrupts A, B, C
};
diff --git a/src/devices/cpu/z80/z80.lst b/src/devices/cpu/z80/z80.lst
new file mode 100644
index 00000000000..173c2903614
--- /dev/null
+++ b/src/devices/cpu/z80/z80.lst
@@ -0,0 +1,6645 @@
+# license:BSD-3-Clause
+# copyright-holders:Juergen Buchmueller, Andrei I. Holub
+##########################################################
+# macros
+##########################################################
+macro nomreq_addr
+ m_nomreq_cb(TADR, 0x00, 0xff);
+ + 1
+
+macro nomreq_ir %cycles
+ TADR = (m_i << 8) | (m_r2 & 0x80) | (m_r & 0x7f);
+ %cycles * call nomreq_addr
+
+macro in
+ m_iorq_cycles !! TDAT8 = m_io.read_interruptible(TADR);
+
+macro out
+ m_iorq_cycles !! m_io.write_interruptible(TADR, TDAT8);
+
+macro rm
+ m_memrq_cycles !! TDAT8 = data_read(TADR);
+
+macro rm_reg
+ call rm
+ call nomreq_addr
+
+macro rm16
+ call rm
+ TDAT_H = TDAT_L; TADR++;
+ call rm
+ using std::swap; std::swap(TDAT_H, TDAT_L);
+
+macro wm
+ m_memrq_cycles !! data_write(TADR, TDAT8);
+
+macro wm16
+ call wm
+ TADR++; TDAT8 = TDAT_H;
+ call wm
+
+macro wm16_sp
+ SP--;
+ m_memrq_cycles !! data_write(SPD, TDAT_H);
+ SP--;
+ m_memrq_cycles !! data_write(SPD, TDAT_L);
+
+macro rop
+ m_m1_cycles-2 !! TDAT8 = opcode_read();
+ m_refresh_cb((I << 8) | (R2 & 0x80) | (R & 0x7f), 0x00, 0xff);
+ + 2
+ PC++; R++; Q = QT; QT = YF | XF;
+
+macro arg
+ m_memrq_cycles !! TDAT8 = arg_read();
+ PC++;
+
+macro arg16
+ call arg
+ TDAT_H = TDAT_L;
+ call arg
+ using std::swap; swap(TDAT_H, TDAT_L);
+
+macro eax
+ call arg
+ m_ea = (u32)(u16)(IX + (s8)TDAT8); WZ = m_ea;
+
+macro eay
+ call arg
+ m_ea = (u32)(u16)(IY + (s8)TDAT8); WZ = m_ea;
+
+macro pop
+ m_memrq_cycles !! TDAT_L = data_read(SPD);
+ SP++;
+ m_memrq_cycles !! TDAT_H = data_read(SPD);
+ SP++;
+
+macro push
+ call nomreq_ir 1
+ call wm16_sp
+
+macro jp
+ call arg16
+ PCD = TDAT; WZ = PC;
+
+macro jp_cond
+ if (TDAT8) {
+ call arg16
+ PC = TDAT; WZ = PCD;
+ } else {
+ // implicit do PC += 2
+ call arg16
+ WZ = TDAT;
+ }
+
+macro jr
+ call arg
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ PC += (s8)TDAT8; WZ = PC;
+
+macro jr_cond
+ if (TDAT8) {
+ call jr
+ } else {
+ call arg
+ }
+
+macro arg16_call
+ call arg16
+ m_ea = TDAT; TADR = PCD-1;
+ call nomreq_addr
+ WZ = m_ea; TDAT = PC;
+ call wm16_sp
+ PCD = m_ea;
+
+macro call_cond
+ if (TDAT8) {
+ call arg16_call
+ } else {
+ call arg16
+ WZ = TDAT;
+ }
+
+macro ret_cond
+ call nomreq_ir 1
+ if (TDAT8) {
+ call pop
+ PC = TDAT; WZ = PC;
+ }
+
+macro retn
+ call pop
+ PC = TDAT; LOGINT("RETN m_iff1:%d m_iff2:%d\n", m_iff1, m_iff2); WZ = PC; m_iff1 = m_iff2;
+
+macro reti
+ call pop
+ PC = TDAT; WZ = PC; m_iff1 = m_iff2; daisy_call_reti_device();
+
+macro ld_r_a
+ call nomreq_ir 1
+ m_r = A; m_r2 = A & 0x80; // keep bit 7 of r
+
+macro ld_a_r
+ call nomreq_ir 1
+ A = (m_r & 0x7f) | m_r2; set_f((F & CF) | SZ[A] | (m_iff2 << 2)); m_after_ldair = true;
+
+macro ld_i_a
+ call nomreq_ir 1
+ m_i = A;
+
+macro ld_a_i
+ call nomreq_ir 1
+ A = m_i; set_f((F & CF) | SZ[A] | (m_iff2 << 2)); m_after_ldair = true;
+
+macro rst addr
+ TDAT = PC;
+ call push
+ PC = addr; WZ = PC;
+
+macro rrd
+ TADR = HL;
+ call rm
+ WZ = HL+1;
+ 4 * call nomreq_addr
+ TDAT_H = TDAT8; TDAT8 = (TDAT8 >> 4) | (A << 4);
+ call wm
+ A = (A & 0xf0) | (TDAT_H & 0x0f); set_f((F & CF) | SZP[A]);
+
+macro rld
+ TADR = HL;
+ call rm
+ WZ = HL+1;
+ 4 * call nomreq_addr
+ TDAT_H = TDAT8; TDAT8 = (TDAT8 << 4) | (A & 0x0f);
+ call wm
+ A = (A & 0xf0) | (TDAT_H >> 4); set_f((F & CF) | SZP[A]);
+
+macro ex_sp
+ TDAT2 = TDAT;
+ call pop
+ TADR = SP-1;
+ call nomreq_addr
+ using std::swap; std::swap(TDAT, TDAT2);
+ call wm16_sp
+ TADR = SP;
+ 2 * call nomreq_addr
+ using std::swap; std::swap(TDAT, TDAT2); WZ = TDAT;
+
+macro add16
+ call nomreq_ir 7
+ { u32 res = TDAT + TDAT2; WZ = TDAT + 1; set_f((F & (SF | ZF | VF)) | (((TDAT ^ res ^ TDAT2) >> 8) & HF) | ((res >> 16) & CF) | ((res >> 8) & (YF | XF))); TDAT = (u16)res; }
+
+macro adc_hl
+ call nomreq_ir 7
+ { u32 res = HLD + TDAT + (F & CF); WZ = HL + 1; set_f((((HLD ^ res ^ TDAT) >> 8) & HF) | ((res >> 16) & CF) | ((res >> 8) & (SF | YF | XF)) | ((res & 0xffff) ? 0 : ZF) | (((TDAT ^ HLD ^ 0x8000) & (TDAT ^ res) & 0x8000) >> 13)); HL = (u16)res; }
+
+macro sbc_hl
+ call nomreq_ir 7
+ { u32 res = HLD - TDAT - (F & CF); WZ = HL + 1; set_f((((HLD ^ res ^ TDAT) >> 8) & HF) | NF | ((res >> 16) & CF) | ((res >> 8) & (SF | YF | XF)) | ((res & 0xffff) ? 0 : ZF) | (((TDAT ^ HLD) & (HLD ^ res) &0x8000) >> 13)); HL = (u16)res; }
+
+macro ldi
+ TADR = HL;
+ call rm
+ TADR = DE;
+ call wm
+ 2 * call nomreq_addr
+ set_f(F & (SF | ZF | CF)); if ((A + TDAT8) & 0x02) F |= YF; if ((A + TDAT8) & 0x08) F |= XF; HL++; DE++; BC--; if(BC) F |= VF;
+
+macro cpi
+ TADR = HL;
+ call rm
+ 5 * call nomreq_addr
+ { u8 res = A - TDAT8; WZ++; HL++; BC--; set_f((F & CF) | (SZ[res]&~(YF|XF)) | ((A^TDAT8^res)&HF) | NF); if (F & HF) res -= 1; if (res & 0x02) F |= YF; if (res & 0x08) F |= XF; if (BC) F |= VF; }
+
+macro ini
+ call nomreq_ir 1
+ TADR = BC;
+ call in
+ WZ = BC + 1; B--; TADR = HL;
+ call wm
+ { HL++; set_f(SZ[B]); unsigned t = (unsigned)((C + 1) & 0xff) + (unsigned)TDAT8; if (TDAT8 & SF) F |= NF; if (t & 0x100) F |= HF | CF; F |= SZP[(u8)(t & 0x07) ^ B] & PF; }
+
+macro outi
+ call nomreq_ir 1
+ TADR = HL;
+ call rm
+ B--; WZ = BC + 1; TADR = BC;
+ call out
+ { HL++; set_f(SZ[B]); unsigned t = (unsigned)L + (unsigned)TDAT8; if (TDAT8 & SF) F |= NF; if (t & 0x100) F |= HF | CF; F |= SZP[(u8)(t & 0x07) ^ B] & PF; }
+
+macro ldd
+ TADR = HL;
+ call rm
+ TADR = DE;
+ call wm
+ 2 * call nomreq_addr
+ { set_f(F & (SF | ZF | CF)); if ((A + TDAT8) & 0x02) F |= YF; if ((A + TDAT8) & 0x08) F |= XF; HL--; DE--; BC--; if (BC) F |= VF; }
+
+macro cpd
+ TADR = HL;
+ call rm
+ TADR = HL;
+ 5 * call nomreq_addr
+ { u8 res = A - TDAT8; WZ--; HL--; BC--; set_f((F & CF) | (SZ[res]&~(YF|XF)) | ((A^TDAT8^res)&HF) | NF); if (F & HF) res -= 1; if (res & 0x02) F |= YF; if (res & 0x08) F |= XF; if (BC) F |= VF; }
+
+macro ind
+ call nomreq_ir 1
+ TADR = BC;
+ call in
+ WZ = BC - 1; B--; TADR = HL;
+ call wm
+ { HL--; set_f(SZ[B]); unsigned t = ((unsigned)(C - 1) & 0xff) + (unsigned)TDAT8; if (TDAT8 & SF) F |= NF; if (t & 0x100) F |= HF | CF; F |= SZP[(u8)(t & 0x07) ^ B] & PF; }
+
+macro outd
+ call nomreq_ir 1
+ TADR = HL;
+ call rm
+ B--; WZ = BC - 1; TADR = BC;
+ call out
+ { HL--; set_f(SZ[B]); unsigned t = (unsigned)L + (unsigned)TDAT8; if (TDAT8 & SF) F |= NF; if (t & 0x100) F |= HF | CF; F |= SZP[(u8)(t & 0x07) ^ B] & PF; }
+
+macro ldir
+ call ldi
+ if (BC != 0) {
+ TADR = DE;
+ 5 * call nomreq_addr
+ PC -= 2; WZ = PC + 1; F &= ~(YF | XF); F |= (PC >> 8) & (YF | XF);
+ }
+
+macro cpir
+ call cpi
+ if (BC != 0 && !(F & ZF)) {
+ TADR = HL;
+ 5 * call nomreq_addr
+ PC -= 2; WZ = PC + 1; F &= ~(YF | XF); F |= (PC >> 8) & (YF | XF);
+ }
+
+macro inir
+ call ini
+ if (B != 0) {
+ TADR = HL;
+ 5 * call nomreq_addr
+ PC -= 2; block_io_interrupted_flags();
+ }
+
+macro otir
+ call outi
+ if (B != 0) {
+ TADR = BC;
+ 5 * call nomreq_addr
+ PC -= 2; block_io_interrupted_flags();
+ }
+
+macro lddr
+ call ldd
+ if (BC != 0) {
+ TADR = DE;
+ 5 * call nomreq_addr
+ PC -= 2; WZ = PC + 1; F &= ~(YF | XF); F |= (PC >> 8) & (YF | XF);
+ }
+
+macro cpdr
+ call cpd
+ if (BC != 0 && !(F & ZF)) {
+ TADR = HL;
+ 5 * call nomreq_addr
+ PC -= 2; WZ = PC + 1; F &= ~(YF | XF); F |= (PC >> 8) & (YF | XF);
+ }
+
+macro indr
+ call ind
+ if (B != 0) {
+ TADR = HL;
+ 5 * call nomreq_addr
+ PC -= 2; block_io_interrupted_flags();
+ }
+
+macro otdr
+ call outd
+ if (B != 0) {
+ TADR = BC;
+ 5 * call nomreq_addr
+ PC -= 2; block_io_interrupted_flags();
+ }
+
+macro jump %opcode
+ m_ref = 0x%opcode00;
+ if (true) return;
+
+macro jump_prefixed %prefix
+ m_ref = (%prefix << 16) | (TDAT8 << 8);
+ if (true) return;
+
+macro take_nmi
+ // Check if processor was halted
+ leave_halt();
+ #if HAS_LDAIR_QUIRK
+ // reset parity flag after LD A,I or LD A,R
+ if (m_after_ldair) F &= ~PF;
+ #endif
+ m_iff1 = 0;
+ m_r++;
+ + 5
+ TDAT = PC;
+ call wm16_sp
+ PCD = 0x0066;
+ WZ = PCD;
+ m_nmi_pending = false;
+
+macro take_interrupt
+ // check if processor was halted
+ leave_halt();
+ // clear both interrupt flip flops
+ m_iff1 = m_iff2 = 0;
+ // say hi
+ // Not precise in all cases. z80 must finish current instruction (NOP) to reach this state - in such case frame timings are shifter from cb event if calculated based on it.
+ m_irqack_cb(true);
+ m_r++;
+ {
+ // fetch the IRQ vector
+ device_z80daisy_interface *intf = daisy_get_irq_device();
+ m_tmp_irq_vector = (intf != nullptr) ? intf->z80daisy_irq_ack() : standard_irq_callback(0, m_pc.w.l);
+ LOGINT("single INT m_tmp_irq_vector $%02x\n", m_tmp_irq_vector);
+ }
+ // 'interrupt latency' cycles
+ + 2
+ // Interrupt mode 2. Call [i:databyte]
+ if (m_im == 2) {
+ // Zilog's datasheet claims that "the least-significant bit must be a zero."
+ // However, experiments have confirmed that IM 2 vectors do not have to be
+ // even, and all 8 bits will be used; even $FF is handled normally.
+ // CALL opcode timing
+ + 5
+ TDAT = PC;
+ call wm16_sp
+ m_tmp_irq_vector = (m_tmp_irq_vector & 0xff) | (m_i << 8);
+ TADR = m_tmp_irq_vector;
+ call rm16
+ PCD = TDAT;
+ LOGINT("IM2 [$%04x] = $%04x\n", m_tmp_irq_vector, PCD);
+ } else if (m_im == 1) {
+ // Interrupt mode 1. RST 38h
+ LOGINT("'%s' IM1 $0038\n", tag());
+ // RST $38
+ + 5
+ TDAT = PC;
+ call wm16_sp
+ PCD = 0x0038;
+ } else {
+ /* Interrupt mode 0. We check for CALL and JP instructions,
+ if neither of these were found we assume a 1 byte opcode
+ was placed on the databus */
+ LOGINT("IM0 $%04x\n", m_tmp_irq_vector);
+
+ // check for nop
+ if (m_tmp_irq_vector != 0x00) {
+ if ((m_tmp_irq_vector & 0xff0000) == 0xcd0000) {
+ // CALL $xxxx cycles
+ + 11
+ TDAT = PC;
+ call wm16_sp
+ PCD = m_tmp_irq_vector & 0xffff;
+ } else if ((m_tmp_irq_vector & 0xff0000) == 0xc30000) {
+ // JP $xxxx cycles
+ + 10
+ PCD = m_tmp_irq_vector & 0xffff;
+ } else if (m_tmp_irq_vector == 0xfb) {
+ // rst (or other opcodes?)
+ + 4
+ ei();
+ } else if ((m_tmp_irq_vector & 0xc7) == 0xc7) {
+ // RST $xx cycles
+ + 5
+ TDAT = PC;
+ call wm16_sp
+ PCD = m_tmp_irq_vector & 0x0038;
+ } else {
+ logerror("take_interrupt: unexpected opcode in im0 mode: 0x%02x\n", m_tmp_irq_vector);
+ }
+ }
+ }
+ WZ = PCD;
+ #if HAS_LDAIR_QUIRK
+ // reset parity flag after LD A,I or LD A,R
+ if (m_after_ldair) F &= ~PF;
+ #endif
+
+macro check_interrupts
+ if (m_nmi_pending) {
+ call take_nmi
+ } else if (m_irq_state != CLEAR_LINE && m_iff1 && !m_after_ei) {
+ call take_interrupt
+ }
+
+macro nsc800_take_interrupt
+ // Check if processor was halted
+ leave_halt();
+ // Clear both interrupt flip flops
+ m_iff1 = m_iff2 = 0;
+ // 'interrupt latency' cycles
+ + 7
+ if (m_nsc800_irq_state[NSC800_RSTA]) {
+ TDAT = PC;
+ call wm16_sp
+ PCD = 0x003c;
+ } else if (m_nsc800_irq_state[NSC800_RSTB]) {
+ TDAT = PC;
+ call wm16_sp
+ PCD = 0x0034;
+ } else if (m_nsc800_irq_state[NSC800_RSTC]) {
+ TDAT = PC;
+ call wm16_sp
+ PCD = 0x002c;
+ } else {
+ + 2 * m_memrq_cycles
+ ;
+ }
+ WZ = PCD;
+ #if HAS_LDAIR_QUIRK
+ // reset parity flag after LD A,I or LD A,R
+ if (m_after_ldair) F &= ~PF;
+ #endif
+
+macro ncs800_check_interrupts
+ if (m_nmi_pending) {
+ call take_nmi
+ } else if ((m_nsc800_irq_state[NSC800_RSTA] != CLEAR_LINE || m_nsc800_irq_state[NSC800_RSTB] != CLEAR_LINE || m_nsc800_irq_state[NSC800_RSTC] != CLEAR_LINE) && m_iff1 && !m_after_ei) {
+ call nsc800_take_interrupt
+ } else if (m_irq_state != CLEAR_LINE && m_iff1 && !m_after_ei) {
+ call take_interrupt
+ }
+
+
+##########################################################
+# ROP
+##########################################################
+rop:ffff
+ call check_interrupts
+ m_after_ei = false;
+ m_after_ldair = false;
+ PRVPC = PCD;
+ debugger_instruction_hook(PCD);
+ call rop
+
+ncs800rop:ffff
+ call ncs800_check_interrupts
+ m_after_ei = false;
+ m_after_ldair = false;
+ PRVPC = PCD;
+ debugger_instruction_hook(PCD);
+ call rop
+
+
+##########################################################
+# opcodes with CB prefix
+# rotate, shift and bit operations
+##########################################################
+cb00 # RLC B
+ B = rlc(B);
+
+cb01 # RLC C
+ C = rlc(C);
+
+cb02 # RLC D
+ D = rlc(D);
+
+cb03 # RLC E
+ E = rlc(E);
+
+cb04 # RLC H
+ H = rlc(H);
+
+cb05 # RLC L
+ L = rlc(L);
+
+cb06 # RLC (HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = rlc(TDAT8);
+ call wm
+
+cb07 # RLC A
+ A = rlc(A);
+
+cb08 # RRC B
+ B = rrc(B);
+
+cb09 # RRC C
+ C = rrc(C);
+
+cb0a # RRC D
+ D = rrc(D);
+
+cb0b # RRC E
+ E = rrc(E);
+
+cb0c # RRC H
+ H = rrc(H);
+
+cb0d # RRC L
+ L = rrc(L);
+
+cb0e # RRC (HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = rrc(TDAT8);
+ call wm
+
+cb0f # RRC A
+ A = rrc(A);
+
+cb10 # RL B
+ B = rl(B);
+
+cb11 # RL C
+ C = rl(C);
+
+cb12 # RL D
+ D = rl(D);
+
+cb13 # RL E
+ E = rl(E);
+
+cb14 # RL H
+ H = rl(H);
+
+cb15 # RL L
+ L = rl(L);
+
+cb16 # RL (HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = rl(TDAT8);
+ call wm
+
+cb17 # RL A
+ A = rl(A);
+
+cb18 # RR B
+ B = rr(B);
+
+cb19 # RR C
+ C = rr(C);
+
+cb1a # RR D
+ D = rr(D);
+
+cb1b # RR E
+ E = rr(E);
+
+cb1c # RR H
+ H = rr(H);
+
+cb1d # RR L
+ L = rr(L);
+
+cb1e # RR (HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = rr(TDAT8);
+ call wm
+
+cb1f # RR A
+ A = rr(A);
+
+cb20 # SLA B
+ B = sla(B);
+
+cb21 # SLA C
+ C = sla(C);
+
+cb22 # SLA D
+ D = sla(D);
+
+cb23 # SLA E
+ E = sla(E);
+
+cb24 # SLA H
+ H = sla(H);
+
+cb25 # SLA L
+ L = sla(L);
+
+cb26 # SLA (HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = sla(TDAT8);
+ call wm
+
+cb27 # SLA A
+ A = sla(A);
+
+cb28 # SRA B
+ B = sra(B);
+
+cb29 # SRA C
+ C = sra(C);
+
+cb2a # SRA D
+ D = sra(D);
+
+cb2b # SRA E
+ E = sra(E);
+
+cb2c # SRA H
+ H = sra(H);
+
+cb2d # SRA L
+ L = sra(L);
+
+cb2e # SRA (HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = sra(TDAT8);
+ call wm
+
+cb2f # SRA A
+ A = sra(A);
+
+cb30 # SLL B
+ B = sll(B);
+
+cb31 # SLL C
+ C = sll(C);
+
+cb32 # SLL D
+ D = sll(D);
+
+cb33 # SLL E
+ E = sll(E);
+
+cb34 # SLL H
+ H = sll(H);
+
+cb35 # SLL L
+ L = sll(L);
+
+cb36 # SLL (HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = sll(TDAT8);
+ call wm
+
+cb37 # SLL A
+ A = sll(A);
+
+cb38 # SRL B
+ B = srl(B);
+
+cb39 # SRL C
+ C = srl(C);
+
+cb3a # SRL D
+ D = srl(D);
+
+cb3b # SRL E
+ E = srl(E);
+
+cb3c # SRL H
+ H = srl(H);
+
+cb3d # SRL L
+ L = srl(L);
+
+cb3e # SRL (HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = srl(TDAT8);
+ call wm
+
+cb3f # SRL A
+ A = srl(A);
+
+cb40 # BIT 0,B
+ bit(0, B);
+
+cb41 # BIT 0,C
+ bit(0, C);
+
+cb42 # BIT 0,D
+ bit(0, D);
+
+cb43 # BIT 0,E
+ bit(0, E);
+
+cb44 # BIT 0,H
+ bit(0, H);
+
+cb45 # BIT 0,L
+ bit(0, L);
+
+cb46 # BIT 0,(HL)
+ TADR = HL;
+ call rm_reg
+ bit_hl(0, TDAT8);
+
+cb47 # BIT 0,A
+ bit(0, A);
+
+cb48 # BIT 1,B
+ bit(1, B);
+
+cb49 # BIT 1,C
+ bit(1, C);
+
+cb4a # BIT 1,D
+ bit(1, D);
+
+cb4b # BIT 1,E
+ bit(1, E);
+
+cb4c # BIT 1,H
+ bit(1, H);
+
+cb4d # BIT 1,L
+ bit(1, L);
+
+cb4e # BIT 1,(HL)
+ TADR = HL;
+ call rm_reg
+ bit_hl(1, TDAT8);
+
+cb4f # BIT 1,A
+ bit(1, A);
+
+cb50 # BIT 2,B
+ bit(2, B);
+
+cb51 # BIT 2,C
+ bit(2, C);
+
+cb52 # BIT 2,D
+ bit(2, D);
+
+cb53 # BIT 2,E
+ bit(2, E);
+
+cb54 # BIT 2,H
+ bit(2, H);
+
+cb55 # BIT 2,L
+ bit(2, L);
+
+cb56 # BIT 2,(HL)
+ TADR = HL;
+ call rm_reg
+ bit_hl(2, TDAT8);
+
+cb57 # BIT 2,A
+ bit(2, A);
+
+cb58 # BIT 3,B
+ bit(3, B);
+
+cb59 # BIT 3,C
+ bit(3, C);
+
+cb5a # BIT 3,D
+ bit(3, D);
+
+cb5b # BIT 3,E
+ bit(3, E);
+
+cb5c # BIT 3,H
+ bit(3, H);
+
+cb5d # BIT 3,L
+ bit(3, L);
+
+cb5e # BIT 3,(HL)
+ TADR = HL;
+ call rm_reg
+ bit_hl(3, TDAT8);
+
+cb5f # BIT 3,A
+ bit(3, A);
+
+cb60 # BIT 4,B
+ bit(4, B);
+
+cb61 # BIT 4,C
+ bit(4, C);
+
+cb62 # BIT 4,D
+ bit(4, D);
+
+cb63 # BIT 4,E
+ bit(4, E);
+
+cb64 # BIT 4,H
+ bit(4, H);
+
+cb65 # BIT 4,L
+ bit(4, L);
+
+cb66 # BIT 4,(HL)
+ TADR = HL;
+ call rm_reg
+ bit_hl(4, TDAT8);
+
+cb67 # BIT 4,A
+ bit(4, A);
+
+cb68 # BIT 5,B
+ bit(5, B);
+
+cb69 # BIT 5,C
+ bit(5, C);
+
+cb6a # BIT 5,D
+ bit(5, D);
+
+cb6b # BIT 5,E
+ bit(5, E);
+
+cb6c # BIT 5,H
+ bit(5, H);
+
+cb6d # BIT 5,L
+ bit(5, L);
+
+cb6e # BIT 5,(HL)
+ TADR = HL;
+ call rm_reg
+ bit_hl(5, TDAT8);
+
+cb6f # BIT 5,A
+ bit(5, A);
+
+cb70 # BIT 6,B
+ bit(6, B);
+
+cb71 # BIT 6,C
+ bit(6, C);
+
+cb72 # BIT 6,D
+ bit(6, D);
+
+cb73 # BIT 6,E
+ bit(6, E);
+
+cb74 # BIT 6,H
+ bit(6, H);
+
+cb75 # BIT 6,L
+ bit(6, L);
+
+cb76 # BIT 6,(HL)
+ TADR = HL;
+ call rm_reg
+ bit_hl(6, TDAT8);
+
+cb77 # BIT 6,A
+ bit(6, A);
+
+cb78 # BIT 7,B
+ bit(7, B);
+
+cb79 # BIT 7,C
+ bit(7, C);
+
+cb7a # BIT 7,D
+ bit(7, D);
+
+cb7b # BIT 7,E
+ bit(7, E);
+
+cb7c # BIT 7,H
+ bit(7, H);
+
+cb7d # BIT 7,L
+ bit(7, L);
+
+cb7e # BIT 7,(HL)
+ TADR = HL;
+ call rm_reg
+ bit_hl(7, TDAT8);
+
+cb7f # BIT 7,A
+ bit(7, A);
+
+cb80 # RES 0,B
+ B = res(0, B);
+
+cb81 # RES 0,C
+ C = res(0, C);
+
+cb82 # RES 0,D
+ D = res(0, D);
+
+cb83 # RES 0,E
+ E = res(0, E);
+
+cb84 # RES 0,H
+ H = res(0, H);
+
+cb85 # RES 0,L
+ L = res(0, L);
+
+cb86 # RES 0,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = res(0, TDAT8);
+ call wm
+
+cb87 # RES 0,A
+ A = res(0, A);
+
+cb88 # RES 1,B
+ B = res(1, B);
+
+cb89 # RES 1,C
+ C = res(1, C);
+
+cb8a # RES 1,D
+ D = res(1, D);
+
+cb8b # RES 1,E
+ E = res(1, E);
+
+cb8c # RES 1,H
+ H = res(1, H);
+
+cb8d # RES 1,L
+ L = res(1, L);
+
+cb8e # RES 1,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = res(1, TDAT8);
+ call wm
+
+cb8f # RES 1,A
+ A = res(1, A);
+
+cb90 # RES 2,B
+ B = res(2, B);
+
+cb91 # RES 2,C
+ C = res(2, C);
+
+cb92 # RES 2,D
+ D = res(2, D);
+
+cb93 # RES 2,E
+ E = res(2, E);
+
+cb94 # RES 2,H
+ H = res(2, H);
+
+cb95 # RES 2,L
+ L = res(2, L);
+
+cb96 # RES 2,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = res(2, TDAT8);
+ call wm
+
+cb97 # RES 2,A
+ A = res(2, A);
+
+cb98 # RES 3,B
+ B = res(3, B);
+
+cb99 # RES 3,C
+ C = res(3, C);
+
+cb9a # RES 3,D
+ D = res(3, D);
+
+cb9b # RES 3,E
+ E = res(3, E);
+
+cb9c # RES 3,H
+ H = res(3, H);
+
+cb9d # RES 3,L
+ L = res(3, L);
+
+cb9e # RES 3,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = res(3, TDAT8);
+ call wm
+
+cb9f # RES 3,A
+ A = res(3, A);
+
+cba0 # RES 4,B
+ B = res(4, B);
+
+cba1 # RES 4,C
+ C = res(4, C);
+
+cba2 # RES 4,D
+ D = res(4, D);
+
+cba3 # RES 4,E
+ E = res(4, E);
+
+cba4 # RES 4,H
+ H = res(4, H);
+
+cba5 # RES 4,L
+ L = res(4, L);
+
+cba6 # RES 4,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = res(4, TDAT8);
+ call wm
+
+cba7 # RES 4,A
+ A = res(4, A);
+
+cba8 # RES 5,B
+ B = res(5, B);
+
+cba9 # RES 5,C
+ C = res(5, C);
+
+cbaa # RES 5,D
+ D = res(5, D);
+
+cbab # RES 5,E
+ E = res(5, E);
+
+cbac # RES 5,H
+ H = res(5, H);
+
+cbad # RES 5,L
+ L = res(5, L);
+
+cbae # RES 5,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = res(5, TDAT8);
+ call wm
+
+cbaf # RES 5,A
+ A = res(5, A);
+
+cbb0 # RES 6,B
+ B = res(6, B);
+
+cbb1 # RES 6,C
+ C = res(6, C);
+
+cbb2 # RES 6,D
+ D = res(6, D);
+
+cbb3 # RES 6,E
+ E = res(6, E);
+
+cbb4 # RES 6,H
+ H = res(6, H);
+
+cbb5 # RES 6,L
+ L = res(6, L);
+
+cbb6 # RES 6,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = res(6, TDAT8);
+ call wm
+
+cbb7 # RES 6,A
+ A = res(6, A);
+
+cbb8 # RES 7,B
+ B = res(7, B);
+
+cbb9 # RES 7,C
+ C = res(7, C);
+
+cbba # RES 7,D
+ D = res(7, D);
+
+cbbb # RES 7,E
+ E = res(7, E);
+
+cbbc # RES 7,H
+ H = res(7, H);
+
+cbbd # RES 7,L
+ L = res(7, L);
+
+cbbe # RES 7,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = res(7, TDAT8);
+ call wm
+
+cbbf # RES 7,A
+ A = res(7, A);
+
+cbc0 # SET 0,B
+ B = set(0, B);
+
+cbc1 # SET 0,C
+ C = set(0, C);
+
+cbc2 # SET 0,D
+ D = set(0, D);
+
+cbc3 # SET 0,E
+ E = set(0, E);
+
+cbc4 # SET 0,H
+ H = set(0, H);
+
+cbc5 # SET 0,L
+ L = set(0, L);
+
+cbc6 # SET 0,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = set(0, TDAT8);
+ call wm
+
+cbc7 # SET 0,A
+ A = set(0, A);
+
+cbc8 # SET 1,B
+ B = set(1, B);
+
+cbc9 # SET 1,C
+ C = set(1, C);
+
+cbca # SET 1,D
+ D = set(1, D);
+
+cbcb # SET 1,E
+ E = set(1, E);
+
+cbcc # SET 1,H
+ H = set(1, H);
+
+cbcd # SET 1,L
+ L = set(1, L);
+
+cbce # SET 1,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = set(1, TDAT8);
+ call wm
+
+cbcf # SET 1,A
+ A = set(1, A);
+
+cbd0 # SET 2,B
+ B = set(2, B);
+
+cbd1 # SET 2,C
+ C = set(2, C);
+
+cbd2 # SET 2,D
+ D = set(2, D);
+
+cbd3 # SET 2,E
+ E = set(2, E);
+
+cbd4 # SET 2,H
+ H = set(2, H);
+
+cbd5 # SET 2,L
+ L = set(2, L);
+
+cbd6 # SET 2,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = set(2, TDAT8);
+ call wm
+
+cbd7 # SET 2,A
+ A = set(2, A);
+
+cbd8 # SET 3,B
+ B = set(3, B);
+
+cbd9 # SET 3,C
+ C = set(3, C);
+
+cbda # SET 3,D
+ D = set(3, D);
+
+cbdb # SET 3,E
+ E = set(3, E);
+
+cbdc # SET 3,H
+ H = set(3, H);
+
+cbdd # SET 3,L
+ L = set(3, L);
+
+cbde # SET 3,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = set(3, TDAT8);
+ call wm
+
+cbdf # SET 3,A
+ A = set(3, A);
+
+cbe0 # SET 4,B
+ B = set(4, B);
+
+cbe1 # SET 4,C
+ C = set(4, C);
+
+cbe2 # SET 4,D
+ D = set(4, D);
+
+cbe3 # SET 4,E
+ E = set(4, E);
+
+cbe4 # SET 4,H
+ H = set(4, H);
+
+cbe5 # SET 4,L
+ L = set(4, L);
+
+cbe6 # SET 4,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = set(4, TDAT8);
+ call wm
+
+cbe7 # SET 4,A
+ A = set(4, A);
+
+cbe8 # SET 5,B
+ B = set(5, B);
+
+cbe9 # SET 5,C
+ C = set(5, C);
+
+cbea # SET 5,D
+ D = set(5, D);
+
+cbeb # SET 5,E
+ E = set(5, E);
+
+cbec # SET 5,H
+ H = set(5, H);
+
+cbed # SET 5,L
+ L = set(5, L);
+
+cbee # SET 5,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = set(5, TDAT8);
+ call wm
+
+cbef # SET 5,A
+ A = set(5, A);
+
+cbf0 # SET 6,B
+ B = set(6, B);
+
+cbf1 # SET 6,C
+ C = set(6, C);
+
+cbf2 # SET 6,D
+ D = set(6, D);
+
+cbf3 # SET 6,E
+ E = set(6, E);
+
+cbf4 # SET 6,H
+ H = set(6, H);
+
+cbf5 # SET 6,L
+ L = set(6, L);
+
+cbf6 # SET 6,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = set(6, TDAT8);
+ call wm
+
+cbf7 # SET 6,A
+ A = set(6, A);
+
+cbf8 # SET 7,B
+ B = set(7, B);
+
+cbf9 # SET 7,C
+ C = set(7, C);
+
+cbfa # SET 7,D
+ D = set(7, D);
+
+cbfb # SET 7,E
+ E = set(7, E);
+
+cbfc # SET 7,H
+ H = set(7, H);
+
+cbfd # SET 7,L
+ L = set(7, L);
+
+cbfe # SET 7,(HL)
+ TADR = HL;
+ call rm_reg
+ TDAT8 = set(7, TDAT8);
+ call wm
+
+cbff # SET 7,A
+ A = set(7, A);
+
+
+##########################################################
+# opcodes with DD/FD CB prefix
+# rotate, shift and bit operations with (IX+o)
+##########################################################
+fe00 # RLC B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = rlc(TDAT8); TDAT8 = B;
+ call wm
+
+fe01 # RLC C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = rlc(TDAT8); TDAT8 = C;
+ call wm
+
+fe02 # RLC D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = rlc(TDAT8); TDAT8 = D;
+ call wm
+
+fe03 # RLC E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = rlc(TDAT8); TDAT8 = E;
+ call wm
+
+fe04 # RLC H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = rlc(TDAT8); TDAT8 = H;
+ call wm
+
+fe05 # RLC L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = rlc(TDAT8); TDAT8 = L;
+ call wm
+
+fe06 # RLC (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = rlc(TDAT8);
+ call wm
+
+fe07 # RLC A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = rlc(TDAT8); TDAT8 = A;
+ call wm
+
+fe08 # RRC B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = rrc(TDAT8); TDAT8 = B;
+ call wm
+
+fe09 # RRC C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = rrc(TDAT8); TDAT8 = C;
+ call wm
+
+fe0a # RRC D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = rrc(TDAT8); TDAT8 = D;
+ call wm
+
+fe0b # RRC E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = rrc(TDAT8); TDAT8 = E;
+ call wm
+
+fe0c # RRC H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = rrc(TDAT8); TDAT8 = H;
+ call wm
+
+fe0d # RRC L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = rrc(TDAT8); TDAT8 = L;
+ call wm
+
+fe0e # RRC (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = rrc(TDAT8);
+ call wm
+
+fe0f # RRC A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = rrc(TDAT8); TDAT8 = A;
+ call wm
+
+fe10 # RL B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = rl(TDAT8); TDAT8 = B;
+ call wm
+
+fe11 # RL C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = rl(TDAT8); TDAT8 = C;
+ call wm
+
+fe12 # RL D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = rl(TDAT8); TDAT8 = D;
+ call wm
+
+fe13 # RL E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = rl(TDAT8); TDAT8 = E;
+ call wm
+
+fe14 # RL H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = rl(TDAT8); TDAT8 = H;
+ call wm
+
+fe15 # RL L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = rl(TDAT8); TDAT8 = L;
+ call wm
+
+fe16 # RL (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = rl(TDAT8);
+ call wm
+
+fe17 # RL A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = rl(TDAT8); TDAT8 = A;
+ call wm
+
+fe18 # RR B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = rr(TDAT8); TDAT8 = B;
+ call wm
+
+fe19 # RR C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = rr(TDAT8); TDAT8 = C;
+ call wm
+
+fe1a # RR D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = rr(TDAT8); TDAT8 = D;
+ call wm
+
+fe1b # RR E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = rr(TDAT8); TDAT8 = E;
+ call wm
+
+fe1c # RR H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = rr(TDAT8); TDAT8 = H;
+ call wm
+
+fe1d # RR L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = rr(TDAT8); TDAT8 = L;
+ call wm
+
+fe1e # RR (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = rr(TDAT8);
+ call wm
+
+fe1f # RR A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = rr(TDAT8); TDAT8 = A;
+ call wm
+
+fe20 # SLA B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = sla(TDAT8); TDAT8 = B;
+ call wm
+
+fe21 # SLA C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = sla(TDAT8); TDAT8 = C;
+ call wm
+
+fe22 # SLA D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = sla(TDAT8); TDAT8 = D;
+ call wm
+
+fe23 # SLA E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = sla(TDAT8); TDAT8 = E;
+ call wm
+
+fe24 # SLA H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = sla(TDAT8); TDAT8 = H;
+ call wm
+
+fe25 # SLA L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = sla(TDAT8); TDAT8 = L;
+ call wm
+
+fe26 # SLA (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = sla(TDAT8);
+ call wm
+
+fe27 # SLA A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = sla(TDAT8); TDAT8 = A;
+ call wm
+
+fe28 # SRA B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = sra(TDAT8); TDAT8 = B;
+ call wm
+
+fe29 # SRA C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = sra(TDAT8); TDAT8 = C;
+ call wm
+
+fe2a # SRA D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = sra(TDAT8); TDAT8 = D;
+ call wm
+
+fe2b # SRA E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = sra(TDAT8); TDAT8 = E;
+ call wm
+
+fe2c # SRA H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = sra(TDAT8); TDAT8 = H;
+ call wm
+
+fe2d # SRA L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = sra(TDAT8); TDAT8 = L;
+ call wm
+
+fe2e # SRA (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = sra(TDAT8);
+ call wm
+
+fe2f # SRA A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = sra(TDAT8); TDAT8 = A;
+ call wm
+
+fe30 # SLL B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = sll(TDAT8); TDAT8 = B;
+ call wm
+
+fe31 # SLL C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = sll(TDAT8); TDAT8 = C;
+ call wm
+
+fe32 # SLL D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = sll(TDAT8); TDAT8 = D;
+ call wm
+
+fe33 # SLL E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = sll(TDAT8); TDAT8 = E;
+ call wm
+
+fe34 # SLL H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = sll(TDAT8); TDAT8 = H;
+ call wm
+
+fe35 # SLL L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = sll(TDAT8); TDAT8 = L;
+ call wm
+
+fe36 # SLL (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = sll(TDAT8);
+ call wm
+
+fe37 # SLL A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = sll(TDAT8); TDAT8 = A;
+ call wm
+
+fe38 # SRL B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = srl(TDAT8); TDAT8 = B;
+ call wm
+
+fe39 # SRL C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = srl(TDAT8); TDAT8 = C;
+ call wm
+
+fe3a # SRL D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = srl(TDAT8); TDAT8 = D;
+ call wm
+
+fe3b # SRL E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = srl(TDAT8); TDAT8 = E;
+ call wm
+
+fe3c # SRL H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = srl(TDAT8); TDAT8 = H;
+ call wm
+
+fe3d # SRL L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = srl(TDAT8); TDAT8 = L;
+ call wm
+
+fe3e # SRL (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = srl(TDAT8);
+ call wm
+
+fe3f # SRL A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = srl(TDAT8); TDAT8 = A;
+ call wm
+
+fe40 # BIT 0,(XY+o)
+ call jump fe46
+
+fe41 # BIT 0,(XY+o)
+ call jump fe46
+
+fe42 # BIT 0,(XY+o)
+ call jump fe46
+
+fe43 # BIT 0,(XY+o)
+ call jump fe46
+
+fe44 # BIT 0,(XY+o)
+ call jump fe46
+
+fe45 # BIT 0,(XY+o)
+ call jump fe46
+
+fe46 # BIT 0,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ bit_xy(0, TDAT8);
+
+fe47 # BIT 0,(XY+o)
+ call jump fe46
+
+fe48 # BIT 1,(XY+o)
+ call jump fe4e
+
+fe49 # BIT 1,(XY+o)
+ call jump fe4e
+
+fe4a # BIT 1,(XY+o)
+ call jump fe4e
+
+fe4b # BIT 1,(XY+o)
+ call jump fe4e
+
+fe4c # BIT 1,(XY+o)
+ call jump fe4e
+
+fe4d # BIT 1,(XY+o)
+ call jump fe4e
+
+fe4e # BIT 1,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ bit_xy(1, TDAT8);
+
+fe4f # BIT 1,(XY+o)
+ call jump fe4e
+
+fe50 # BIT 2,(XY+o)
+ call jump fe56
+
+fe51 # BIT 2,(XY+o)
+ call jump fe56
+
+fe52 # BIT 2,(XY+o)
+ call jump fe56
+
+fe53 # BIT 2,(XY+o)
+ call jump fe56
+
+fe54 # BIT 2,(XY+o)
+ call jump fe56
+
+fe55 # BIT 2,(XY+o)
+ call jump fe56
+
+fe56 # BIT 2,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ bit_xy(2, TDAT8);
+
+fe57 # BIT 2,(XY+o)
+ call jump fe56
+
+fe58 # BIT 3,(XY+o)
+ call jump fe5e
+
+fe59 # BIT 3,(XY+o)
+ call jump fe5e
+
+fe5a # BIT 3,(XY+o)
+ call jump fe5e
+
+fe5b # BIT 3,(XY+o)
+ call jump fe5e
+
+fe5c # BIT 3,(XY+o)
+ call jump fe5e
+
+fe5d # BIT 3,(XY+o)
+ call jump fe5e
+
+fe5e # BIT 3,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ bit_xy(3, TDAT8);
+
+fe5f # BIT 3,(XY+o)
+ call jump fe5e
+
+fe60 # BIT 4,(XY+o)
+ call jump fe66
+
+fe61 # BIT 4,(XY+o)
+ call jump fe66
+
+fe62 # BIT 4,(XY+o)
+ call jump fe66
+
+fe63 # BIT 4,(XY+o)
+ call jump fe66
+
+fe64 # BIT 4,(XY+o)
+ call jump fe66
+
+fe65 # BIT 4,(XY+o)
+ call jump fe66
+
+fe66 # BIT 4,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ bit_xy(4, TDAT8);
+
+fe67 # BIT 4,(XY+o)
+ call jump fe66
+
+fe68 # BIT 5,(XY+o)
+ call jump fe6e
+
+fe69 # BIT 5,(XY+o)
+ call jump fe6e
+
+fe6a # BIT 5,(XY+o)
+ call jump fe6e
+
+fe6b # BIT 5,(XY+o)
+ call jump fe6e
+
+fe6c # BIT 5,(XY+o)
+ call jump fe6e
+
+fe6d # BIT 5,(XY+o)
+ call jump fe6e
+
+fe6e # BIT 5,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ bit_xy(5, TDAT8);
+
+fe6f # BIT 5,(XY+o)
+ call jump fe6e
+
+fe70 # BIT 6,(XY+o)
+ call jump fe76
+
+fe71 # BIT 6,(XY+o)
+ call jump fe76
+
+fe72 # BIT 6,(XY+o)
+ call jump fe76
+
+fe73 # BIT 6,(XY+o)
+ call jump fe76
+
+fe74 # BIT 6,(XY+o)
+ call jump fe76
+
+fe75 # BIT 6,(XY+o)
+ call jump fe76
+
+fe76 # BIT 6,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ bit_xy(6, TDAT8);
+
+fe77 # BIT 6,(XY+o)
+ call jump fe76
+
+fe78 # BIT 7,(XY+o)
+ call jump fe7e
+
+fe79 # BIT 7,(XY+o)
+ call jump fe7e
+
+fe7a # BIT 7,(XY+o)
+ call jump fe7e
+
+fe7b # BIT 7,(XY+o)
+ call jump fe7e
+
+fe7c # BIT 7,(XY+o)
+ call jump fe7e
+
+fe7d # BIT 7,(XY+o)
+ call jump fe7e
+
+fe7e # BIT 7,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ bit_xy(7, TDAT8);
+
+fe7f # BIT 7,(XY+o)
+ call jump fe7e
+
+fe80 # RES 0,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = res(0, TDAT8); TDAT8 = B;
+ call wm
+
+fe81 # RES 0,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = res(0, TDAT8); TDAT8 = C;
+ call wm
+
+fe82 # RES 0,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = res(0, TDAT8); TDAT8 = D;
+ call wm
+
+fe83 # RES 0,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = res(0, TDAT8); TDAT8 = E;
+ call wm
+
+fe84 # RES 0,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = res(0, TDAT8); TDAT8 = H;
+ call wm
+
+fe85 # RES 0,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = res(0, TDAT8); TDAT8 = L;
+ call wm
+
+fe86 # RES 0,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = res(0, TDAT8);
+ call wm
+
+fe87 # RES 0,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = res(0, TDAT8); TDAT8 = A;
+ call wm
+
+fe88 # RES 1,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = res(1, TDAT8); TDAT8 = B;
+ call wm
+
+fe89 # RES 1,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = res(1, TDAT8); TDAT8 = C;
+ call wm
+
+fe8a # RES 1,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = res(1, TDAT8); TDAT8 = D;
+ call wm
+
+fe8b # RES 1,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = res(1, TDAT8); TDAT8 = E;
+ call wm
+
+fe8c # RES 1,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = res(1, TDAT8); TDAT8 = H;
+ call wm
+
+fe8d # RES 1,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = res(1, TDAT8); TDAT8 = L;
+ call wm
+
+fe8e # RES 1,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = res(1, TDAT8);
+ call wm
+
+fe8f # RES 1,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = res(1, TDAT8); TDAT8 = A;
+ call wm
+
+fe90 # RES 2,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = res(2, TDAT8); TDAT8 = B;
+ call wm
+
+fe91 # RES 2,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = res(2, TDAT8); TDAT8 = C;
+ call wm
+
+fe92 # RES 2,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = res(2, TDAT8); TDAT8 = D;
+ call wm
+
+fe93 # RES 2,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = res(2, TDAT8); TDAT8 = E;
+ call wm
+
+fe94 # RES 2,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = res(2, TDAT8); TDAT8 = H;
+ call wm
+
+fe95 # RES 2,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = res(2, TDAT8); TDAT8 = L;
+ call wm
+
+fe96 # RES 2,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = res(2, TDAT8);
+ call wm
+
+fe97 # RES 2,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = res(2, TDAT8); TDAT8 = A;
+ call wm
+
+fe98 # RES 3,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = res(3, TDAT8); TDAT8 = B;
+ call wm
+
+fe99 # RES 3,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = res(3, TDAT8); TDAT8 = C;
+ call wm
+
+fe9a # RES 3,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = res(3, TDAT8); TDAT8 = D;
+ call wm
+
+fe9b # RES 3,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = res(3, TDAT8); TDAT8 = E;
+ call wm
+
+fe9c # RES 3,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = res(3, TDAT8); TDAT8 = H;
+ call wm
+
+fe9d # RES 3,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = res(3, TDAT8); TDAT8 = L;
+ call wm
+
+fe9e # RES 3,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = res(3, TDAT8);
+ call wm
+
+fe9f # RES 3,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = res(3, TDAT8); TDAT8 = A;
+ call wm
+
+fea0 # RES 4,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = res(4, TDAT8); TDAT8 = B;
+ call wm
+
+fea1 # RES 4,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = res(4, TDAT8); TDAT8 = C;
+ call wm
+
+fea2 # RES 4,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = res(4, TDAT8); TDAT8 = D;
+ call wm
+
+fea3 # RES 4,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = res(4, TDAT8); TDAT8 = E;
+ call wm
+
+fea4 # RES 4,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = res(4, TDAT8); TDAT8 = H;
+ call wm
+
+fea5 # RES 4,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = res(4, TDAT8); TDAT8 = L;
+ call wm
+
+fea6 # RES 4,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = res(4, TDAT8);
+ call wm
+
+fea7 # RES 4,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = res(4, TDAT8); TDAT8 = A;
+ call wm
+
+fea8 # RES 5,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = res(5, TDAT8); TDAT8 = B;
+ call wm
+
+fea9 # RES 5,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = res(5, TDAT8); TDAT8 = C;
+ call wm
+
+feaa # RES 5,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = res(5, TDAT8); TDAT8 = D;
+ call wm
+
+feab # RES 5,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = res(5, TDAT8); TDAT8 = E;
+ call wm
+
+feac # RES 5,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = res(5, TDAT8); TDAT8 = H;
+ call wm
+
+fead # RES 5,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = res(5, TDAT8); TDAT8 = L;
+ call wm
+
+feae # RES 5,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = res(5, TDAT8);
+ call wm
+
+feaf # RES 5,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = res(5, TDAT8); TDAT8 = A;
+ call wm
+
+feb0 # RES 6,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = res(6, TDAT8); TDAT8 = B;
+ call wm
+
+feb1 # RES 6,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = res(6, TDAT8); TDAT8 = C;
+ call wm
+
+feb2 # RES 6,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = res(6, TDAT8); TDAT8 = D;
+ call wm
+
+feb3 # RES 6,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = res(6, TDAT8); TDAT8 = E;
+ call wm
+
+feb4 # RES 6,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = res(6, TDAT8); TDAT8 = H;
+ call wm
+
+feb5 # RES 6,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = res(6, TDAT8); TDAT8 = L;
+ call wm
+
+feb6 # RES 6,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = res(6, TDAT8);
+ call wm
+
+feb7 # RES 6,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = res(6, TDAT8); TDAT8 = A;
+ call wm
+
+feb8 # RES 7,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = res(7, TDAT8); TDAT8 = B;
+ call wm
+
+feb9 # RES 7,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = res(7, TDAT8); TDAT8 = C;
+ call wm
+
+feba # RES 7,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = res(7, TDAT8); TDAT8 = D;
+ call wm
+
+febb # RES 7,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = res(7, TDAT8); TDAT8 = E;
+ call wm
+
+febc # RES 7,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = res(7, TDAT8); TDAT8 = H;
+ call wm
+
+febd # RES 7,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = res(7, TDAT8); TDAT8 = L;
+ call wm
+
+febe # RES 7,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = res(7, TDAT8);
+ call wm
+
+febf # RES 7,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = res(7, TDAT8); TDAT8 = A;
+ call wm
+
+fec0 # SET 0,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = set(0, TDAT8); TDAT8 = B;
+ call wm
+
+fec1 # SET 0,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = set(0, TDAT8); TDAT8 = C;
+ call wm
+
+fec2 # SET 0,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = set(0, TDAT8); TDAT8 = D;
+ call wm
+
+fec3 # SET 0,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = set(0, TDAT8); TDAT8 = E;
+ call wm
+
+fec4 # SET 0,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = set(0, TDAT8); TDAT8 = H;
+ call wm
+
+fec5 # SET 0,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = set(0, TDAT8); TDAT8 = L;
+ call wm
+
+fec6 # SET 0,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = set(0, TDAT8);
+ call wm
+
+fec7 # SET 0,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = set(0, TDAT8); TDAT8 = A;
+ call wm
+
+fec8 # SET 1,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = set(1, TDAT8); TDAT8 = B;
+ call wm
+
+fec9 # SET 1,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = set(1, TDAT8); TDAT8 = C;
+ call wm
+
+feca # SET 1,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = set(1, TDAT8); TDAT8 = D;
+ call wm
+
+fecb # SET 1,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = set(1, TDAT8); TDAT8 = E;
+ call wm
+
+fecc # SET 1,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = set(1, TDAT8); TDAT8 = H;
+ call wm
+
+fecd # SET 1,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = set(1, TDAT8); TDAT8 = L;
+ call wm
+
+fece # SET 1,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = set(1, TDAT8);
+ call wm
+
+fecf # SET 1,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = set(1, TDAT8); TDAT8 = A;
+ call wm
+
+fed0 # SET 2,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = set(2, TDAT8); TDAT8 = B;
+ call wm
+
+fed1 # SET 2,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = set(2, TDAT8); TDAT8 = C;
+ call wm
+
+fed2 # SET 2,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = set(2, TDAT8); TDAT8 = D;
+ call wm
+
+fed3 # SET 2,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = set(2, TDAT8); TDAT8 = E;
+ call wm
+
+fed4 # SET 2,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = set(2, TDAT8); TDAT8 = H;
+ call wm
+
+fed5 # SET 2,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = set(2, TDAT8); TDAT8 = L;
+ call wm
+
+fed6 # SET 2,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = set(2, TDAT8);
+ call wm
+
+fed7 # SET 2,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = set(2, TDAT8); TDAT8 = A;
+ call wm
+
+fed8 # SET 3,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = set(3, TDAT8); TDAT8 = B;
+ call wm
+
+fed9 # SET 3,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = set(3, TDAT8); TDAT8 = C;
+ call wm
+
+feda # SET 3,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = set(3, TDAT8); TDAT8 = D;
+ call wm
+
+fedb # SET 3,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = set(3, TDAT8); TDAT8 = E;
+ call wm
+
+fedc # SET 3,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = set(3, TDAT8); TDAT8 = H;
+ call wm
+
+fedd # SET 3,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = set(3, TDAT8); TDAT8 = L;
+ call wm
+
+fede # SET 3,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = set(3, TDAT8);
+ call wm
+
+fedf # SET 3,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = set(3, TDAT8); TDAT8 = A;
+ call wm
+
+fee0 # SET 4,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = set(4, TDAT8); TDAT8 = B;
+ call wm
+
+fee1 # SET 4,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = set(4, TDAT8); TDAT8 = C;
+ call wm
+
+fee2 # SET 4,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = set(4, TDAT8); TDAT8 = D;
+ call wm
+
+fee3 # SET 4,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = set(4, TDAT8); TDAT8 = E;
+ call wm
+
+fee4 # SET 4,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = set(4, TDAT8); TDAT8 = H;
+ call wm
+
+fee5 # SET 4,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = set(4, TDAT8); TDAT8 = L;
+ call wm
+
+fee6 # SET 4,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = set(4, TDAT8);
+ call wm
+
+fee7 # SET 4,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = set(4, TDAT8); TDAT8 = A;
+ call wm
+
+fee8 # SET 5,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = set(5, TDAT8); TDAT8 = B;
+ call wm
+
+fee9 # SET 5,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = set(5, TDAT8); TDAT8 = C;
+ call wm
+
+feea # SET 5,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = set(5, TDAT8); TDAT8 = D;
+ call wm
+
+feeb # SET 5,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = set(5, TDAT8); TDAT8 = E;
+ call wm
+
+feec # SET 5,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = set(5, TDAT8); TDAT8 = H;
+ call wm
+
+feed # SET 5,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = set(5, TDAT8); TDAT8 = L;
+ call wm
+
+feee # SET 5,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = set(5, TDAT8);
+ call wm
+
+feef # SET 5,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = set(5, TDAT8); TDAT8 = A;
+ call wm
+
+fef0 # SET 6,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = set(6, TDAT8); TDAT8 = B;
+ call wm
+
+fef1 # SET 6,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = set(6, TDAT8); TDAT8 = C;
+ call wm
+
+fef2 # SET 6,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = set(6, TDAT8); TDAT8 = D;
+ call wm
+
+fef3 # SET 6,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = set(6, TDAT8); TDAT8 = E;
+ call wm
+
+fef4 # SET 6,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = set(6, TDAT8); TDAT8 = H;
+ call wm
+
+fef5 # SET 6,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = set(6, TDAT8); TDAT8 = L;
+ call wm
+
+fef6 # SET 6,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = set(6, TDAT8);
+ call wm
+
+fef7 # SET 6,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = set(6, TDAT8); TDAT8 = A;
+ call wm
+
+fef8 # SET 7,B = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ B = set(7, TDAT8); TDAT8 = B;
+ call wm
+
+fef9 # SET 7,C = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ C = set(7, TDAT8); TDAT8 = C;
+ call wm
+
+fefa # SET 7,D = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ D = set(7, TDAT8); TDAT8 = D;
+ call wm
+
+fefb # SET 7,E = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ E = set(7, TDAT8); TDAT8 = E;
+ call wm
+
+fefc # SET 7,H = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ H = set(7, TDAT8); TDAT8 = H;
+ call wm
+
+fefd # SET 7,L = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ L = set(7, TDAT8); TDAT8 = L;
+ call wm
+
+fefe # SET 7,(XY+o)
+ TADR = m_ea;
+ call rm_reg
+ TDAT8 = set(7, TDAT8);
+ call wm
+
+feff # SET 7,A = (XY+o)
+ TADR = m_ea;
+ call rm_reg
+ A = set(7, TDAT8); TDAT8 = A;
+ call wm
+
+
+##########################################################
+# IX register related opcodes (DD prefix)
+##########################################################
+dd00 # DB DD
+ illegal_1();
+ call jump 0000
+
+dd01 # DB DD
+ illegal_1();
+ call jump 0001
+
+dd02 # DB DD
+ illegal_1();
+ call jump 0002
+
+dd03 # DB DD
+ illegal_1();
+ call jump 0003
+
+dd04 # DB DD
+ illegal_1();
+ call jump 0004
+
+dd05 # DB DD
+ illegal_1();
+ call jump 0005
+
+dd06 # DB DD
+ illegal_1();
+ call jump 0006
+
+dd07 # DB DD
+ illegal_1();
+ call jump 0007
+
+dd08 # DB DD
+ illegal_1();
+ call jump 0008
+
+dd09 # ADD IX,BC
+ TDAT = IX; TDAT2 = BC;
+ call add16
+ IX = TDAT;
+
+dd0a # DB DD
+ illegal_1();
+ call jump 000a
+
+dd0b # DB DD
+ illegal_1();
+ call jump 000b
+
+dd0c # DB DD
+ illegal_1();
+ call jump 000c
+
+dd0d # DB DD
+ illegal_1();
+ call jump 000d
+
+dd0e # DB DD
+ illegal_1();
+ call jump 000e
+
+dd0f # DB DD
+ illegal_1();
+ call jump 000f
+
+dd10 # DB DD
+ illegal_1();
+ call jump 0010
+
+dd11 # DB DD
+ illegal_1();
+ call jump 0011
+
+dd12 # DB DD
+ illegal_1();
+ call jump 0012
+
+dd13 # DB DD
+ illegal_1();
+ call jump 0013
+
+dd14 # DB DD
+ illegal_1();
+ call jump 0014
+
+dd15 # DB DD
+ illegal_1();
+ call jump 0015
+
+dd16 # DB DD
+ illegal_1();
+ call jump 0016
+
+dd17 # DB DD
+ illegal_1();
+ call jump 0017
+
+dd18 # DB DD
+ illegal_1();
+ call jump 0018
+
+dd19 # ADD IX,DE
+ TDAT = IX; TDAT2 = DE;
+ call add16
+ IX = TDAT;
+
+dd1a # DB DD
+ illegal_1();
+ call jump 001a
+
+dd1b # DB DD
+ illegal_1();
+ call jump 001b
+
+dd1c # DB DD
+ illegal_1();
+ call jump 001c
+
+dd1d # DB DD
+ illegal_1();
+ call jump 001d
+
+dd1e # DB DD
+ illegal_1();
+ call jump 001e
+
+dd1f # DB DD
+ illegal_1();
+ call jump 001f
+
+dd20 # DB DD
+ illegal_1();
+ call jump 0020
+
+dd21 # LD IX,w
+ call arg16
+ IX = TDAT;
+
+dd22 # LD (w),IX
+ call arg16
+ m_ea = TDAT; TADR = m_ea; TDAT = IX;
+ call wm16
+ WZ = m_ea + 1;
+
+dd23 # INC IX
+ call nomreq_ir 2
+ IX++;
+
+dd24 # INC HX
+ inc(HX);
+
+dd25 # DEC HX
+ dec(HX);
+
+dd26 # LD HX,n
+ call arg
+ HX = TDAT8;
+
+dd27 # DB DD
+ illegal_1();
+ call jump 0027
+
+dd28 # DB DD
+ illegal_1();
+ call jump 0028
+
+dd29 # ADD IX,IX
+ TDAT = IX; TDAT2 = IX;
+ call add16
+ IX = TDAT;
+
+dd2a # LD IX,(w)
+ call arg16
+ m_ea = TDAT; TADR = m_ea;
+ call rm16
+ IX = TDAT; WZ = m_ea + 1;
+
+dd2b # DEC IX
+ call nomreq_ir 2
+ IX--;
+
+dd2c # INC LX
+ inc(LX);
+
+dd2d # DEC LX
+ dec(LX);
+
+dd2e # LD LX,n
+ call arg
+ LX = TDAT8;
+
+dd2f # DB DD
+ illegal_1();
+ call jump 002f
+
+dd30 # DB DD
+ illegal_1();
+ call jump 0030
+
+dd31 # DB DD
+ illegal_1();
+ call jump 0031
+
+dd32 # DB DD
+ illegal_1();
+ call jump 0032
+
+dd33 # DB DD
+ illegal_1();
+ call jump 0033
+
+dd34 # INC (IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm_reg
+ inc(TDAT8);
+ call wm
+
+dd35 # DEC (IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm_reg
+ dec(TDAT8);
+ call wm
+
+dd36 # LD (IX+o),n
+ call eax
+ call arg
+ TADR = PCD-1;
+ 2 * call nomreq_addr
+ TADR = m_ea;
+ call wm
+
+dd37 # DB DD
+ illegal_1();
+ call jump 0037
+
+dd38 # DB DD
+ illegal_1();
+ call jump 0038
+
+dd39 # ADD IX,SP
+ TDAT = IX; TDAT2 = SP;
+ call add16
+ IX = TDAT;
+
+dd3a # DB DD
+ illegal_1();
+ call jump 003a
+
+dd3b # DB DD
+ illegal_1();
+ call jump 003b
+
+dd3c # DB DD
+ illegal_1();
+ call jump 003c
+
+dd3d # DB DD
+ illegal_1();
+ call jump 003d
+
+dd3e # DB DD
+ illegal_1();
+ call jump 003e
+
+dd3f # DB DD
+ illegal_1();
+ call jump 003f
+
+dd40 # DB DD
+ illegal_1();
+ call jump 0040
+
+dd41 # DB DD
+ illegal_1();
+ call jump 0041
+
+dd42 # DB DD
+ illegal_1();
+ call jump 0042
+
+dd43 # DB DD
+ illegal_1();
+ call jump 0043
+
+dd44 # LD B,HX
+ B = HX;
+
+dd45 # LD B,LX
+ B = LX;
+
+dd46 # LD B,(IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ B = TDAT8;
+
+dd47 # DB DD
+ illegal_1();
+ call jump 0047
+
+dd48 # DB DD
+ illegal_1();
+ call jump 0048
+
+dd49 # DB DD
+ illegal_1();
+ call jump 0049
+
+dd4a # DB DD
+ illegal_1();
+ call jump 004a
+
+dd4b # DB DD
+ illegal_1();
+ call jump 004b
+
+dd4c # LD C,HX
+ C = HX;
+
+dd4d # LD C,LX
+ C = LX;
+
+dd4e # LD C,(IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ C = TDAT8;
+
+dd4f # DB DD
+ illegal_1();
+ call jump 004f
+
+dd50 # DB DD
+ illegal_1();
+ call jump 0050
+
+dd51 # DB DD
+ illegal_1();
+ call jump 0051
+
+dd52 # DB DD
+ illegal_1();
+ call jump 0052
+
+dd53 # DB DD
+ illegal_1();
+ call jump 0053
+
+dd54 # LD D,HX
+ D = HX;
+
+dd55 # LD D,LX
+ D = LX;
+
+dd56 # LD D,(IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ D = TDAT8;
+
+dd57 # DB DD
+ illegal_1();
+ call jump 0057
+
+dd58 # DB DD
+ illegal_1();
+ call jump 0058
+
+dd59 # DB DD
+ illegal_1();
+ call jump 0059
+
+dd5a # DB DD
+ illegal_1();
+ call jump 005a
+
+dd5b # DB DD
+ illegal_1();
+ call jump 005b
+
+dd5c # LD E,HX
+ E = HX;
+
+dd5d # LD E,LX
+ E = LX;
+
+dd5e # LD E,(IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ E = TDAT8;
+
+dd5f # DB DD
+ illegal_1();
+ call jump 005f
+
+dd60 # LD HX,B
+ HX = B;
+
+dd61 # LD HX,C
+ HX = C;
+
+dd62 # LD HX,D
+ HX = D;
+
+dd63 # LD HX,E
+ HX = E;
+
+dd64 # LD HX,HX
+
+dd65 # LD HX,LX
+ HX = LX;
+
+dd66 # LD H,(IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ H = TDAT8;
+
+dd67 # LD HX,A
+ HX = A;
+
+dd68 # LD LX,B
+ LX = B;
+
+dd69 # LD LX,C
+ LX = C;
+
+dd6a # LD LX,D
+ LX = D;
+
+dd6b # LD LX,E
+ LX = E;
+
+dd6c # LD LX,HX
+ LX = HX;
+
+dd6d # LD LX,LX
+
+dd6e # LD L,(IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ L = TDAT8;
+
+dd6f # LD LX,A
+ LX = A;
+
+dd70 # LD (IX+o),B
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = B;
+ call wm
+
+dd71 # LD (IX+o),C
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = C;
+ call wm
+
+dd72 # LD (IX+o),D
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = D;
+ call wm
+
+dd73 # LD (IX+o),E
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = E;
+ call wm
+
+dd74 # LD (IX+o),H
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = H;
+ call wm
+
+dd75 # LD (IX+o),L
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = L;
+ call wm
+
+dd76 # DB DD
+ illegal_1();
+ call jump 0076
+
+dd77 # LD (IX+o),A
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = A;
+ call wm
+
+dd78 # DB DD
+ illegal_1();
+ call jump 0078
+
+dd79 # DB DD
+ illegal_1();
+ call jump 0079
+
+dd7a # DB DD
+ illegal_1();
+ call jump 007a
+
+dd7b # DB DD
+ illegal_1();
+ call jump 007b
+
+dd7c # LD A,HX
+ A = HX;
+
+dd7d # LD A,LX
+ A = LX;
+
+dd7e # LD A,(IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ A = TDAT8;
+
+dd7f # DB DD
+ illegal_1();
+ call jump 007f
+
+dd80 # DB DD
+ illegal_1();
+ call jump 0080
+
+dd81 # DB DD
+ illegal_1();
+ call jump 0081
+
+dd82 # DB DD
+ illegal_1();
+ call jump 0082
+
+dd83 # DB DD
+ illegal_1();
+ call jump 0083
+
+dd84 # ADD A,HX
+ add_a(HX);
+
+dd85 # ADD A,LX
+ add_a(LX);
+
+dd86 # ADD A,(IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ add_a(TDAT8);
+
+dd87 # DB DD
+ illegal_1();
+ call jump 0087
+
+dd88 # DB DD
+ illegal_1();
+ call jump 0088
+
+dd89 # DB DD
+ illegal_1();
+ call jump 0089
+
+dd8a # DB DD
+ illegal_1();
+ call jump 008a
+
+dd8b # DB DD
+ illegal_1();
+ call jump 008b
+
+dd8c # ADC A,HX
+ adc_a(HX);
+
+dd8d # ADC A,LX
+ adc_a(LX);
+
+dd8e # ADC A,(IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ adc_a(TDAT8);
+
+dd8f # DB DD
+ illegal_1();
+ call jump 008f
+
+dd90 # DB DD
+ illegal_1();
+ call jump 0090
+
+dd91 # DB DD
+ illegal_1();
+ call jump 0091
+
+dd92 # DB DD
+ illegal_1();
+ call jump 0092
+
+dd93 # DB DD
+ illegal_1();
+ call jump 0093
+
+dd94 # SUB HX
+ sub(HX);
+
+dd95 # SUB LX
+ sub(LX);
+
+dd96 # SUB (IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ sub(TDAT8);
+
+dd97 # DB DD
+ illegal_1();
+ call jump 0097
+
+dd98 # DB DD
+ illegal_1();
+ call jump 0098
+
+dd99 # DB DD
+ illegal_1();
+ call jump 0099
+
+dd9a # DB DD
+ illegal_1();
+ call jump 009a
+
+dd9b # DB DD
+ illegal_1();
+ call jump 009b
+
+dd9c # SBC A,HX
+ sbc_a(HX);
+
+dd9d # SBC A,LX
+ sbc_a(LX);
+
+dd9e # SBC A,(IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ sbc_a(TDAT8);
+
+dd9f # DB DD
+ illegal_1();
+ call jump 009f
+
+dda0 # DB DD
+ illegal_1();
+ call jump 00a0
+
+dda1 # DB DD
+ illegal_1();
+ call jump 00a1
+
+dda2 # DB DD
+ illegal_1();
+ call jump 00a2
+
+dda3 # DB DD
+ illegal_1();
+ call jump 00a3
+
+dda4 # AND HX
+ and_a(HX);
+
+dda5 # AND LX
+ and_a(LX);
+
+dda6 # AND (IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ and_a(TDAT8);
+
+dda7 # DB DD
+ illegal_1();
+ call jump 00a7
+
+dda8 # DB DD
+ illegal_1();
+ call jump 00a8
+
+dda9 # DB DD
+ illegal_1();
+ call jump 00a9
+
+ddaa # DB DD
+ illegal_1();
+ call jump 00aa
+
+ddab # DB DD
+ illegal_1();
+ call jump 00ab
+
+ddac # XOR HX
+ xor_a(HX);
+
+ddad # XOR LX
+ xor_a(LX);
+
+ddae # XOR (IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ xor_a(TDAT8);
+
+ddaf # DB DD
+ illegal_1();
+ call jump 00af
+
+ddb0 # DB DD
+ illegal_1();
+ call jump 00b0
+
+ddb1 # DB DD
+ illegal_1();
+ call jump 00b1
+
+ddb2 # DB DD
+ illegal_1();
+ call jump 00b2
+
+ddb3 # DB DD
+ illegal_1();
+ call jump 00b3
+
+ddb4 # OR HX
+ or_a(HX);
+
+ddb5 # OR LX
+ or_a(LX);
+
+ddb6 # OR (IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ or_a(TDAT8);
+
+ddb7 # DB DD
+ illegal_1();
+ call jump 00b7
+
+ddb8 # DB DD
+ illegal_1();
+ call jump 00b8
+
+ddb9 # DB DD
+ illegal_1();
+ call jump 00b9
+
+ddba # DB DD
+ illegal_1();
+ call jump 00ba
+
+ddbb # DB DD
+ illegal_1();
+ call jump 00bb
+
+ddbc # CP HX
+ cp(HX);
+
+ddbd # CP LX
+ cp(LX);
+
+ddbe # CP (IX+o)
+ call eax
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ cp(TDAT8);
+
+ddbf # DB DD
+ illegal_1();
+ call jump 00bf
+
+ddc0 # DB DD
+ illegal_1();
+ call jump 00c0
+
+ddc1 # DB DD
+ illegal_1();
+ call jump 00c1
+
+ddc2 # DB DD
+ illegal_1();
+ call jump 00c2
+
+ddc3 # DB DD
+ illegal_1();
+ call jump 00c3
+
+ddc4 # DB DD
+ illegal_1();
+ call jump 00c4
+
+ddc5 # DB DD
+ illegal_1();
+ call jump 00c5
+
+ddc6 # DB DD
+ illegal_1();
+ call jump 00c6
+
+ddc7 # DB DD
+ illegal_1();
+ call jump 00c7
+
+ddc8 # DB DD
+ illegal_1();
+ call jump 00c8
+
+ddc9 # DB DD
+ illegal_1();
+ call jump 00c9
+
+ddca # DB DD
+ illegal_1();
+ call jump 00ca
+
+ddcb # ** DD CB xx
+ call eax
+ call arg
+ TADR = PCD-1;
+ 2 * call nomreq_addr
+ call jump_prefixed 0xfe
+
+ddcc # DB DD
+ illegal_1();
+ call jump 00cc
+
+ddcd # DB DD
+ illegal_1();
+ call jump 00cd
+
+ddce # DB DD
+ illegal_1();
+ call jump 00ce
+
+ddcf # DB DD
+ illegal_1();
+ call jump 00cf
+
+ddd0 # DB DD
+ illegal_1();
+ call jump 00d0
+
+ddd1 # DB DD
+ illegal_1();
+ call jump 00d1
+
+ddd2 # DB DD
+ illegal_1();
+ call jump 00d2
+
+ddd3 # DB DD
+ illegal_1();
+ call jump 00d3
+
+ddd4 # DB DD
+ illegal_1();
+ call jump 00d4
+
+ddd5 # DB DD
+ illegal_1();
+ call jump 00d5
+
+ddd6 # DB DD
+ illegal_1();
+ call jump 00d6
+
+ddd7 # DB DD
+ illegal_1();
+ call jump 00d7
+
+ddd8 # DB DD
+ illegal_1();
+ call jump 00d8
+
+ddd9 # DB DD
+ illegal_1();
+ call jump 00d9
+
+ddda # DB DD
+ illegal_1();
+ call jump 00da
+
+dddb # DB DD
+ illegal_1();
+ call jump 00db
+
+dddc # DB DD
+ illegal_1();
+ call jump 00dc
+
+dddd # DB DD
+ illegal_1();
+ call jump 00dd
+
+ddde # DB DD
+ illegal_1();
+ call jump 00de
+
+dddf # DB DD
+ illegal_1();
+ call jump 00df
+
+dde0 # DB DD
+ illegal_1();
+ call jump 00e0
+
+dde1 # POP IX
+ call pop
+ IX = TDAT;
+
+dde2 # DB DD
+ illegal_1();
+ call jump 00e2
+
+dde3 # EX (SP),IX
+ TDAT = IX;
+ call ex_sp
+ IX = TDAT;
+
+dde4 # DB DD
+ illegal_1();
+ call jump 00e4
+
+dde5 # PUSH IX
+ TDAT = IX;
+ call push
+
+dde6 # DB DD
+ illegal_1();
+ call jump 00e6
+
+dde7 # DB DD
+ illegal_1();
+ call jump 00e7
+
+dde8 # DB DD
+ illegal_1();
+ call jump 00e8
+
+dde9 # JP (IX)
+ PC = IX;
+
+ddea # DB DD
+ illegal_1();
+ call jump 00ea
+
+ddeb # DB DD
+ illegal_1();
+ call jump 00eb
+
+ddec # DB DD
+ illegal_1();
+ call jump 00ec
+
+dded # DB DD
+ illegal_1();
+ call jump 00ed
+
+ddee # DB DD
+ illegal_1();
+ call jump 00ee
+
+ddef # DB DD
+ illegal_1();
+ call jump 00ef
+
+ddf0 # DB DD
+ illegal_1();
+ call jump 00f0
+
+ddf1 # DB DD
+ illegal_1();
+ call jump 00f1
+
+ddf2 # DB DD
+ illegal_1();
+ call jump 00f2
+
+ddf3 # DB DD
+ illegal_1();
+ call jump 00f3
+
+ddf4 # DB DD
+ illegal_1();
+ call jump 00f4
+
+ddf5 # DB DD
+ illegal_1();
+ call jump 00f5
+
+ddf6 # DB DD
+ illegal_1();
+ call jump 00f6
+
+ddf7 # DB DD
+ illegal_1();
+ call jump 00f7
+
+ddf8 # DB DD
+ illegal_1();
+ call jump 00f8
+
+ddf9 # LD SP,IX
+ call nomreq_ir 2
+ SP = IX;
+
+ddfa # DB DD
+ illegal_1();
+ call jump 00fa
+
+ddfb # DB DD
+ illegal_1();
+ call jump 00fb
+
+ddfc # DB DD
+ illegal_1();
+ call jump 00fc
+
+ddfd # DB DD
+ illegal_1();
+ call jump 00fd
+
+ddfe # DB DD
+ illegal_1();
+ call jump 00fe
+
+ddff # DB DD
+ illegal_1();
+ call jump 00ff
+
+
+##########################################################
+# IY register related opcodes (FD prefix)
+##########################################################
+fd00 # DB FD
+ illegal_1();
+ call jump 0000
+
+fd01 # DB FD
+ illegal_1();
+ call jump 0001
+
+fd02 # DB FD
+ illegal_1();
+ call jump 0002
+
+fd03 # DB FD
+ illegal_1();
+ call jump 0003
+
+fd04 # DB FD
+ illegal_1();
+ call jump 0004
+
+fd05 # DB FD
+ illegal_1();
+ call jump 0005
+
+fd06 # DB FD
+ illegal_1();
+ call jump 0006
+
+fd07 # DB FD
+ illegal_1();
+ call jump 0007
+
+fd08 # DB FD
+ illegal_1();
+ call jump 0008
+
+fd09 # ADD IY,BC
+ TDAT = IY; TDAT2 = BC;
+ call add16
+ IY = TDAT;
+
+fd0a # DB FD
+ illegal_1();
+ call jump 000a
+
+fd0b # DB FD
+ illegal_1();
+ call jump 000b
+
+fd0c # DB FD
+ illegal_1();
+ call jump 000c
+
+fd0d # DB FD
+ illegal_1();
+ call jump 000d
+
+fd0e # DB FD
+ illegal_1();
+ call jump 000e
+
+fd0f # DB FD
+ illegal_1();
+ call jump 000f
+
+fd10 # DB FD
+ illegal_1();
+ call jump 0010
+
+fd11 # DB FD
+ illegal_1();
+ call jump 0011
+
+fd12 # DB FD
+ illegal_1();
+ call jump 0012
+
+fd13 # DB FD
+ illegal_1();
+ call jump 0013
+
+fd14 # DB FD
+ illegal_1();
+ call jump 0014
+
+fd15 # DB FD
+ illegal_1();
+ call jump 0015
+
+fd16 # DB FD
+ illegal_1();
+ call jump 0016
+
+fd17 # DB FD
+ illegal_1();
+ call jump 0017
+
+fd18 # DB FD
+ illegal_1();
+ call jump 0018
+
+fd19 # ADD IY,DE
+ TDAT = IY; TDAT2 = DE;
+ call add16
+ IY = TDAT;
+
+fd1a # DB FD
+ illegal_1();
+ call jump 001a
+
+fd1b # DB FD
+ illegal_1();
+ call jump 001b
+
+fd1c # DB FD
+ illegal_1();
+ call jump 001c
+
+fd1d # DB FD
+ illegal_1();
+ call jump 001d
+
+fd1e # DB FD
+ illegal_1();
+ call jump 001e
+
+fd1f # DB FD
+ illegal_1();
+ call jump 001f
+
+fd20 # DB FD
+ illegal_1();
+ call jump 0020
+
+fd21 # LD IY,w
+ call arg16
+ IY = TDAT;
+
+fd22 # LD (w),IY
+ call arg16
+ m_ea = TDAT; TADR = m_ea; TDAT = IY;
+ call wm16
+ WZ = m_ea + 1;
+
+fd23 # INC IY
+ call nomreq_ir 2
+ IY++;
+
+fd24 # INC HY
+ inc(HY);
+
+fd25 # DEC HY
+ dec(HY);
+
+fd26 # LD HY,n
+ call arg
+ HY = TDAT8;
+
+fd27 # DB FD
+ illegal_1();
+ call jump 0027
+
+fd28 # DB FD
+ illegal_1();
+ call jump 0028
+
+fd29 # ADD IY,IY
+ TDAT = IY; TDAT2 = IY;
+ call add16
+ IY = TDAT;
+
+fd2a # LD IY,(w)
+ call arg16
+ m_ea = TDAT; TADR = m_ea;
+ call rm16
+ IY = TDAT; WZ = m_ea + 1;
+
+fd2b # DEC IY
+ call nomreq_ir 2
+ IY--;
+
+fd2c # INC LY
+ inc(LY);
+
+fd2d # DEC LY
+ dec(LY);
+
+fd2e # LD LY,n
+ call arg
+ LY = TDAT8;
+
+fd2f # DB FD
+ illegal_1();
+ call jump 002f
+
+fd30 # DB FD
+ illegal_1();
+ call jump 0030
+
+fd31 # DB FD
+ illegal_1();
+ call jump 0031
+
+fd32 # DB FD
+ illegal_1();
+ call jump 0032
+
+fd33 # DB FD
+ illegal_1();
+ call jump 0033
+
+fd34 # INC (IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm_reg
+ inc(TDAT8);
+ call wm
+
+fd35 # DEC (IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm_reg
+ dec(TDAT8);
+ call wm
+
+fd36 # LD (IY+o),n
+ call eay
+ call arg
+ TADR = PCD-1;
+ 2 * call nomreq_addr
+ TADR = m_ea;
+ call wm
+
+fd37 # DB FD
+ illegal_1();
+ call jump 0037
+
+fd38 # DB FD
+ illegal_1();
+ call jump 0038
+
+fd39 # ADD IY,SP
+ TDAT = IY; TDAT2 = SP;
+ call add16
+ IY = TDAT;
+
+fd3a # DB FD
+ illegal_1();
+ call jump 003a
+
+fd3b # DB FD
+ illegal_1();
+ call jump 003b
+
+fd3c # DB FD
+ illegal_1();
+ call jump 003c
+
+fd3d # DB FD
+ illegal_1();
+ call jump 003d
+
+fd3e # DB FD
+ illegal_1();
+ call jump 003e
+
+fd3f # DB FD
+ illegal_1();
+ call jump 003f
+
+fd40 # DB FD
+ illegal_1();
+ call jump 0040
+
+fd41 # DB FD
+ illegal_1();
+ call jump 0041
+
+fd42 # DB FD
+ illegal_1();
+ call jump 0042
+
+fd43 # DB FD
+ illegal_1();
+ call jump 0043
+
+fd44 # LD B,HY
+ B = HY;
+
+fd45 # LD B,LY
+ B = LY;
+
+fd46 # LD B,(IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ B = TDAT8;
+
+fd47 # DB FD
+ illegal_1();
+ call jump 0047
+
+fd48 # DB FD
+ illegal_1();
+ call jump 0048
+
+fd49 # DB FD
+ illegal_1();
+ call jump 0049
+
+fd4a # DB FD
+ illegal_1();
+ call jump 004a
+
+fd4b # DB FD
+ illegal_1();
+ call jump 004b
+
+fd4c # LD C,HY
+ C = HY;
+
+fd4d # LD C,LY
+ C = LY;
+
+fd4e # LD C,(IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ C = TDAT8;
+
+fd4f # DB FD
+ illegal_1();
+ call jump 004f
+
+fd50 # DB FD
+ illegal_1();
+ call jump 0050
+
+fd51 # DB FD
+ illegal_1();
+ call jump 0051
+
+fd52 # DB FD
+ illegal_1();
+ call jump 0052
+
+fd53 # DB FD
+ illegal_1();
+ call jump 0053
+
+fd54 # LD D,HY
+ D = HY;
+
+fd55 # LD D,LY
+ D = LY;
+
+fd56 # LD D,(IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ D = TDAT8;
+
+fd57 # DB FD
+ illegal_1();
+ call jump 0057
+
+fd58 # DB FD
+ illegal_1();
+ call jump 0058
+
+fd59 # DB FD
+ illegal_1();
+ call jump 0059
+
+fd5a # DB FD
+ illegal_1();
+ call jump 005a
+
+fd5b # DB FD
+ illegal_1();
+ call jump 005b
+
+fd5c # LD E,HY
+ E = HY;
+
+fd5d # LD E,LY
+ E = LY;
+
+fd5e # LD E,(IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ E = TDAT8;
+
+fd5f # DB FD
+ illegal_1();
+ call jump 005f
+
+fd60 # LD HY,B
+ HY = B;
+
+fd61 # LD HY,C
+ HY = C;
+
+fd62 # LD HY,D
+ HY = D;
+
+fd63 # LD HY,E
+ HY = E;
+
+fd64 # LD HY,HY
+
+fd65 # LD HY,LY
+ HY = LY;
+
+fd66 # LD H,(IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ H = TDAT8;
+
+fd67 # LD HY,A
+ HY = A;
+
+fd68 # LD LY,B
+ LY = B;
+
+fd69 # LD LY,C
+ LY = C;
+
+fd6a # LD LY,D
+ LY = D;
+
+fd6b # LD LY,E
+ LY = E;
+
+fd6c # LD LY,HY
+ LY = HY;
+
+fd6d # LD LY,LY
+
+fd6e # LD L,(IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ L = TDAT8;
+
+fd6f # LD LY,A
+ LY = A;
+
+fd70 # LD (IY+o),B
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = B;
+ call wm
+
+fd71 # LD (IY+o),C
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = C;
+ call wm
+
+fd72 # LD (IY+o),D
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = D;
+ call wm
+
+fd73 # LD (IY+o),E
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = E;
+ call wm
+
+fd74 # LD (IY+o),H
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = H;
+ call wm
+
+fd75 # LD (IY+o),L
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = L;
+ call wm
+
+fd76 # DB FD
+ illegal_1();
+ call jump 0076
+
+fd77 # LD (IY+o),A
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea; TDAT8 = A;
+ call wm
+
+fd78 # DB FD
+ illegal_1();
+ call jump 0078
+
+fd79 # DB FD
+ illegal_1();
+ call jump 0079
+
+fd7a # DB FD
+ illegal_1();
+ call jump 007a
+
+fd7b # DB FD
+ illegal_1();
+ call jump 007b
+
+fd7c # LD A,HY
+ A = HY;
+
+fd7d # LD A,LY
+ A = LY;
+
+fd7e # LD A,(IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ A = TDAT8;
+
+fd7f # DB FD
+ illegal_1();
+ call jump 007f
+
+fd80 # DB FD
+ illegal_1();
+ call jump 0080
+
+fd81 # DB FD
+ illegal_1();
+ call jump 0081
+
+fd82 # DB FD
+ illegal_1();
+ call jump 0082
+
+fd83 # DB FD
+ illegal_1();
+ call jump 0083
+
+fd84 # ADD A,HY
+ add_a(HY);
+
+fd85 # ADD A,LY
+ add_a(LY);
+
+fd86 # ADD A,(IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ add_a(TDAT8);
+
+fd87 # DB FD
+ illegal_1();
+ call jump 0087
+
+fd88 # DB FD
+ illegal_1();
+ call jump 0088
+
+fd89 # DB FD
+ illegal_1();
+ call jump 0089
+
+fd8a # DB FD
+ illegal_1();
+ call jump 008a
+
+fd8b # DB FD
+ illegal_1();
+ call jump 008b
+
+fd8c # ADC A,HY
+ adc_a(HY);
+
+fd8d # ADC A,LY
+ adc_a(LY);
+
+fd8e # ADC A,(IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ adc_a(TDAT8);
+
+fd8f # DB FD
+ illegal_1();
+ call jump 008f
+
+fd90 # DB FD
+ illegal_1();
+ call jump 0090
+
+fd91 # DB FD
+ illegal_1();
+ call jump 0091
+
+fd92 # DB FD
+ illegal_1();
+ call jump 0092
+
+fd93 # DB FD
+ illegal_1();
+ call jump 0093
+
+fd94 # SUB HY
+ sub(HY);
+
+fd95 # SUB LY
+ sub(LY);
+
+fd96 # SUB (IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ sub(TDAT8);
+
+fd97 # DB FD
+ illegal_1();
+ call jump 0097
+
+fd98 # DB FD
+ illegal_1();
+ call jump 0098
+
+fd99 # DB FD
+ illegal_1();
+ call jump 0099
+
+fd9a # DB FD
+ illegal_1();
+ call jump 009a
+
+fd9b # DB FD
+ illegal_1();
+ call jump 009b
+
+fd9c # SBC A,HY
+ sbc_a(HY);
+
+fd9d # SBC A,LY
+ sbc_a(LY);
+
+fd9e # SBC A,(IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ sbc_a(TDAT8);
+
+fd9f # DB FD
+ illegal_1();
+ call jump 009f
+
+fda0 # DB FD
+ illegal_1();
+ call jump 00a0
+
+fda1 # DB FD
+ illegal_1();
+ call jump 00a1
+
+fda2 # DB FD
+ illegal_1();
+ call jump 00a2
+
+fda3 # DB FD
+ illegal_1();
+ call jump 00a3
+
+fda4 # AND HY
+ and_a(HY);
+
+fda5 # AND LY
+ and_a(LY);
+
+fda6 # AND (IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ and_a(TDAT8);
+
+fda7 # DB FD
+ illegal_1();
+ call jump 00a7
+
+fda8 # DB FD
+ illegal_1();
+ call jump 00a8
+
+fda9 # DB FD
+ illegal_1();
+ call jump 00a9
+
+fdaa # DB FD
+ illegal_1();
+ call jump 00aa
+
+fdab # DB FD
+ illegal_1();
+ call jump 00ab
+
+fdac # XOR HY
+ xor_a(HY);
+
+fdad # XOR LY
+ xor_a(LY);
+
+fdae # XOR (IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ xor_a(TDAT8);
+
+fdaf # DB FD
+ illegal_1();
+ call jump 00af
+
+fdb0 # DB FD
+ illegal_1();
+ call jump 00b0
+
+fdb1 # DB FD
+ illegal_1();
+ call jump 00b1
+
+fdb2 # DB FD
+ illegal_1();
+ call jump 00b2
+
+fdb3 # DB FD
+ illegal_1();
+ call jump 00b3
+
+fdb4 # OR HY
+ or_a(HY);
+
+fdb5 # OR LY
+ or_a(LY);
+
+fdb6 # OR (IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ or_a(TDAT8);
+
+fdb7 # DB FD
+ illegal_1();
+ call jump 00b7
+
+fdb8 # DB FD
+ illegal_1();
+ call jump 00b8
+
+fdb9 # DB FD
+ illegal_1();
+ call jump 00b9
+
+fdba # DB FD
+ illegal_1();
+ call jump 00ba
+
+fdbb # DB FD
+ illegal_1();
+ call jump 00bb
+
+fdbc # CP HY
+ cp(HY);
+
+fdbd # CP LY
+ cp(LY);
+
+fdbe # CP (IY+o)
+ call eay
+ TADR = PCD-1;
+ 5 * call nomreq_addr
+ TADR = m_ea;
+ call rm
+ cp(TDAT8);
+
+fdbf # DB FD
+ illegal_1();
+ call jump 00bf
+
+fdc0 # DB FD
+ illegal_1();
+ call jump 00c0
+
+fdc1 # DB FD
+ illegal_1();
+ call jump 00c1
+
+fdc2 # DB FD
+ illegal_1();
+ call jump 00c2
+
+fdc3 # DB FD
+ illegal_1();
+ call jump 00c3
+
+fdc4 # DB FD
+ illegal_1();
+ call jump 00c4
+
+fdc5 # DB FD
+ illegal_1();
+ call jump 00c5
+
+fdc6 # DB FD
+ illegal_1();
+ call jump 00c6
+
+fdc7 # DB FD
+ illegal_1();
+ call jump 00c7
+
+fdc8 # DB FD
+ illegal_1();
+ call jump 00c8
+
+fdc9 # DB FD
+ illegal_1();
+ call jump 00c9
+
+fdca # DB FD
+ illegal_1();
+ call jump 00ca
+
+fdcb # ** FD CB xx
+ call eay
+ call arg
+ TADR = PCD-1;
+ 2 * call nomreq_addr
+ call jump_prefixed 0xfe
+
+fdcc # DB FD
+ illegal_1();
+ call jump 00cc
+
+fdcd # DB FD
+ illegal_1();
+ call jump 00cd
+
+fdce # DB FD
+ illegal_1();
+ call jump 00ce
+
+fdcf # DB FD
+ illegal_1();
+ call jump 00cf
+
+fdd0 # DB FD
+ illegal_1();
+ call jump 00d0
+
+fdd1 # DB FD
+ illegal_1();
+ call jump 00d1
+
+fdd2 # DB FD
+ illegal_1();
+ call jump 00d2
+
+fdd3 # DB FD
+ illegal_1();
+ call jump 00d3
+
+fdd4 # DB FD
+ illegal_1();
+ call jump 00d4
+
+fdd5 # DB FD
+ illegal_1();
+ call jump 00d5
+
+fdd6 # DB FD
+ illegal_1();
+ call jump 00d6
+
+fdd7 # DB FD
+ illegal_1();
+ call jump 00d7
+
+fdd8 # DB FD
+ illegal_1();
+ call jump 00d8
+
+fdd9 # DB FD
+ illegal_1();
+ call jump 00d9
+
+fdda # DB FD
+ illegal_1();
+ call jump 00da
+
+fddb # DB FD
+ illegal_1();
+ call jump 00db
+
+fddc # DB FD
+ illegal_1();
+ call jump 00dc
+
+fddd # DB FD
+ illegal_1();
+ call jump 00dd
+
+fdde # DB FD
+ illegal_1();
+ call jump 00de
+
+fddf # DB FD
+ illegal_1();
+ call jump 00df
+
+fde0 # DB FD
+ illegal_1();
+ call jump 00e0
+
+fde1 # POP IY
+ call pop
+ IY = TDAT;
+
+fde2 # DB FD
+ illegal_1();
+ call jump 00e2
+
+fde3 # EX (SP),IY
+ TDAT = IY;
+ call ex_sp
+ IY = TDAT;
+
+fde4 # DB FD
+ illegal_1();
+ call jump 00e4
+
+fde5 # PUSH IY
+ TDAT = IY;
+ call push
+
+fde6 # DB FD
+ illegal_1();
+ call jump 00e6
+
+fde7 # DB FD
+ illegal_1();
+ call jump 00e7
+
+fde8 # DB FD
+ illegal_1();
+ call jump 00e8
+
+fde9 # JP (IY)
+ PC = IY;
+
+fdea # DB FD
+ illegal_1();
+ call jump 00ea
+
+fdeb # DB FD
+ illegal_1();
+ call jump 00eb
+
+fdec # DB FD
+ illegal_1();
+ call jump 00ec
+
+fded # DB FD
+ illegal_1();
+ call jump 00ed
+
+fdee # DB FD
+ illegal_1();
+ call jump 00ee
+
+fdef # DB FD
+ illegal_1();
+ call jump 00ef
+
+fdf0 # DB FD
+ illegal_1();
+ call jump 00f0
+
+fdf1 # DB FD
+ illegal_1();
+ call jump 00f1
+
+fdf2 # DB FD
+ illegal_1();
+ call jump 00f2
+
+fdf3 # DB FD
+ illegal_1();
+ call jump 00f3
+
+fdf4 # DB FD
+ illegal_1();
+ call jump 00f4
+
+fdf5 # DB FD
+ illegal_1();
+ call jump 00f5
+
+fdf6 # DB FD
+ illegal_1();
+ call jump 00f6
+
+fdf7 # DB FD
+ illegal_1();
+ call jump 00f7
+
+fdf8 # DB FD
+ illegal_1();
+ call jump 00f8
+
+fdf9 # LD SP,IY
+ call nomreq_ir 2
+ SP = IY;
+
+fdfa # DB FD
+ illegal_1();
+ call jump 00fa
+
+fdfb # DB FD
+ illegal_1();
+ call jump 00fb
+
+fdfc # DB FD
+ illegal_1();
+ call jump 00fc
+
+fdfd # DB FD
+ illegal_1();
+ call jump 00fd
+
+fdfe # DB FD
+ illegal_1();
+ call jump 00fe
+
+fdff # DB FD
+ illegal_1();
+ call jump 00ff
+
+
+##########################################################
+# special opcodes (ED prefix)
+##########################################################
+ed00 # DB ED
+ illegal_2();
+
+ed01 # DB ED
+ illegal_2();
+
+ed02 # DB ED
+ illegal_2();
+
+ed03 # DB ED
+ illegal_2();
+
+ed04 # DB ED
+ illegal_2();
+
+ed05 # DB ED
+ illegal_2();
+
+ed06 # DB ED
+ illegal_2();
+
+ed07 # DB ED
+ illegal_2();
+
+ed08 # DB ED
+ illegal_2();
+
+ed09 # DB ED
+ illegal_2();
+
+ed0a # DB ED
+ illegal_2();
+
+ed0b # DB ED
+ illegal_2();
+
+ed0c # DB ED
+ illegal_2();
+
+ed0d # DB ED
+ illegal_2();
+
+ed0e # DB ED
+ illegal_2();
+
+ed0f # DB ED
+ illegal_2();
+
+ed10 # DB ED
+ illegal_2();
+
+ed11 # DB ED
+ illegal_2();
+
+ed12 # DB ED
+ illegal_2();
+
+ed13 # DB ED
+ illegal_2();
+
+ed14 # DB ED
+ illegal_2();
+
+ed15 # DB ED
+ illegal_2();
+
+ed16 # DB ED
+ illegal_2();
+
+ed17 # DB ED
+ illegal_2();
+
+ed18 # DB ED
+ illegal_2();
+
+ed19 # DB ED
+ illegal_2();
+
+ed1a # DB ED
+ illegal_2();
+
+ed1b # DB ED
+ illegal_2();
+
+ed1c # DB ED
+ illegal_2();
+
+ed1d # DB ED
+ illegal_2();
+
+ed1e # DB ED
+ illegal_2();
+
+ed1f # DB ED
+ illegal_2();
+
+ed20 # DB ED
+ illegal_2();
+
+ed21 # DB ED
+ illegal_2();
+
+ed22 # DB ED
+ illegal_2();
+
+ed23 # DB ED
+ illegal_2();
+
+ed24 # DB ED
+ illegal_2();
+
+ed25 # DB ED
+ illegal_2();
+
+ed26 # DB ED
+ illegal_2();
+
+ed27 # DB ED
+ illegal_2();
+
+ed28 # DB ED
+ illegal_2();
+
+ed29 # DB ED
+ illegal_2();
+
+ed2a # DB ED
+ illegal_2();
+
+ed2b # DB ED
+ illegal_2();
+
+ed2c # DB ED
+ illegal_2();
+
+ed2d # DB ED
+ illegal_2();
+
+ed2e # DB ED
+ illegal_2();
+
+ed2f # DB ED
+ illegal_2();
+
+ed30 # DB ED
+ illegal_2();
+
+ed31 # DB ED
+ illegal_2();
+
+ed32 # DB ED
+ illegal_2();
+
+ed33 # DB ED
+ illegal_2();
+
+ed34 # DB ED
+ illegal_2();
+
+ed35 # DB ED
+ illegal_2();
+
+ed36 # DB ED
+ illegal_2();
+
+ed37 # DB ED
+ illegal_2();
+
+ed38 # DB ED
+ illegal_2();
+
+ed39 # DB ED
+ illegal_2();
+
+ed3a # DB ED
+ illegal_2();
+
+ed3b # DB ED
+ illegal_2();
+
+ed3c # DB ED
+ illegal_2();
+
+ed3d # DB ED
+ illegal_2();
+
+ed3e # DB ED
+ illegal_2();
+
+ed3f # DB ED
+ illegal_2();
+
+ed40 # IN B,(C)
+ TADR = BC;
+ call in
+ B = TDAT8; set_f((F & CF) | SZP[B]); WZ = TADR + 1;
+
+ed41 # OUT (C),B
+ TADR = BC; TDAT8 = B;
+ call out
+ WZ = TADR + 1;
+
+ed42 # SBC HL,BC
+ TDAT = BC;
+ call sbc_hl
+
+ed43 # LD (w),BC
+ call arg16
+ m_ea = TDAT; TADR = m_ea; TDAT = BC;
+ call wm16
+ WZ = m_ea + 1;
+
+ed44 # NEG
+ neg();
+
+ed45 # RETN
+ call retn
+
+ed46 # IM 0
+ m_im = 0;
+
+ed47 # LD i,A
+ call ld_i_a
+
+ed48 # IN C,(C)
+ TADR = BC;
+ call in
+ C = TDAT8; set_f((F & CF) | SZP[C]); WZ = TADR + 1;
+
+ed49 # OUT (C),C
+ TADR = BC; TDAT8 = C;
+ call out
+ WZ = TADR + 1;
+
+ed4a # ADC HL,BC
+ TDAT = BC;
+ call adc_hl
+
+ed4b # LD BC,(w)
+ call arg16
+ m_ea = TDAT; TADR = m_ea;
+ call rm16
+ BC = TDAT; WZ = m_ea + 1;
+
+ed4c # NEG
+ neg();
+
+ed4d # RETI
+ call reti
+
+ed4e # IM 0
+ m_im = 0;
+
+ed4f # LD r,A
+ call ld_r_a
+
+ed50 # IN D,(C)
+ TADR = BC;
+ call in
+ D = TDAT8; set_f((F & CF) | SZP[D]); WZ = TADR + 1;
+
+ed51 # OUT (C),D
+ TADR = BC; TDAT8 = D;
+ call out
+ WZ = TADR + 1;
+
+ed52 # SBC HL,DE
+ TDAT = DE;
+ call sbc_hl
+
+ed53 # LD (w),DE
+ call arg16
+ m_ea = TDAT; TADR = m_ea; TDAT = DE;
+ call wm16
+ WZ = m_ea + 1;
+
+ed54 # NEG
+ neg();
+
+ed55 # RETN
+ call retn
+
+ed56 # IM 1
+ m_im = 1;
+
+ed57 # LD A,i
+ call ld_a_i
+
+ed58 # IN E,(C)
+ TADR = BC;
+ call in
+ E = TDAT8; set_f((F & CF) | SZP[E]); WZ = TADR + 1;
+
+ed59 # OUT (C),E
+ TADR = BC; TDAT8 = E;
+ call out
+ WZ = TADR + 1;
+
+ed5a # ADC HL,DE
+ TDAT = DE;
+ call adc_hl
+
+ed5b # LD DE,(w)
+ call arg16
+ m_ea = TDAT; TADR = m_ea;
+ call rm16
+ DE = TDAT; WZ = m_ea + 1;
+
+ed5c # NEG
+ neg();
+
+ed5d # RETI
+ call reti
+
+ed5e # IM 2
+ m_im = 2;
+
+ed5f # LD A,r
+ call ld_a_r
+
+ed60 # IN H,(C)
+ TADR = BC;
+ call in
+ H = TDAT8; set_f((F & CF) | SZP[H]); WZ = TADR + 1;
+
+ed61 # OUT (C),H
+ TADR = BC; TDAT8 = H;
+ call out
+ WZ = TADR + 1;
+
+ed62 # SBC HL,HL
+ TDAT = HL;
+ call sbc_hl
+
+ed63 # LD (w),HL
+ call arg16
+ m_ea = TDAT; TADR = m_ea; TDAT = HL;
+ call wm16
+ WZ = m_ea + 1;
+
+ed64 # NEG
+ neg();
+
+ed65 # RETN
+ call retn
+
+ed66 # IM 0
+ m_im = 0;
+
+ed67 # RRD (HL)
+ call rrd
+
+ed68 # IN L,(C)
+ TADR = BC;
+ call in
+ L = TDAT8; set_f((F & CF) | SZP[L]); WZ = TADR + 1;
+
+ed69 # OUT (C),L
+ TADR = BC; TDAT8 = L;
+ call out
+ WZ = TADR + 1;
+
+ed6a # ADC HL,HL
+ TDAT = HL;
+ call adc_hl
+
+ed6b # LD HL,(w)
+ call arg16
+ m_ea = TDAT; TADR = m_ea;
+ call rm16
+ HL = TDAT; WZ = m_ea + 1;
+
+ed6c # NEG
+ neg();
+
+ed6d # RETI
+ call reti
+
+ed6e # IM 0
+ m_im = 0;
+
+ed6f # RLD (HL)
+ call rld
+
+ed70 # IN 0,(C)
+ TADR = BC;
+ call in
+ set_f((F & CF) | SZP[TDAT8]); WZ = TADR + 1;
+
+ed71 # OUT (C),0
+ TADR = BC; TDAT8 = 0;
+ call out
+ WZ = TADR + 1;
+
+ed72 # SBC HL,SP
+ TDAT = SP;
+ call sbc_hl
+
+ed73 # LD (w),SP
+ call arg16
+ m_ea = TDAT; TADR = m_ea; TDAT = SP;
+ call wm16
+ WZ = m_ea + 1;
+
+ed74 # NEG
+ neg();
+
+ed75 # RETN
+ call retn
+
+ed76 # IM 1
+ m_im = 1;
+
+ed77 # DB ED,77
+ illegal_2();
+
+ed78 # IN A,(C)
+ TADR = BC;
+ call in
+ A = TDAT8; set_f((F & CF) | SZP[A]); WZ = TADR + 1;
+
+ed79 # OUT (C),A
+ TADR = BC; TDAT8 = A;
+ call out
+ WZ = TADR + 1;
+
+ed7a # ADC HL,SP
+ TDAT = SP;
+ call adc_hl
+
+ed7b # LD SP,(w)
+ call arg16
+ m_ea = TDAT; TADR = m_ea;
+ call rm16
+ SP = TDAT; WZ = m_ea + 1;
+
+ed7c # NEG
+ neg();
+
+ed7d # RETI
+ call reti
+
+ed7e # IM 2
+ m_im = 2;
+
+ed7f # DB ED,7F
+ illegal_2();
+
+ed80 # DB ED
+ illegal_2();
+
+ed81 # DB ED
+ illegal_2();
+
+ed82 # DB ED
+ illegal_2();
+
+ed83 # DB ED
+ illegal_2();
+
+ed84 # DB ED
+ illegal_2();
+
+ed85 # DB ED
+ illegal_2();
+
+ed86 # DB ED
+ illegal_2();
+
+ed87 # DB ED
+ illegal_2();
+
+ed88 # DB ED
+ illegal_2();
+
+ed89 # DB ED
+ illegal_2();
+
+ed8a # DB ED
+ illegal_2();
+
+ed8b # DB ED
+ illegal_2();
+
+ed8c # DB ED
+ illegal_2();
+
+ed8d # DB ED
+ illegal_2();
+
+ed8e # DB ED
+ illegal_2();
+
+ed8f # DB ED
+ illegal_2();
+
+ed90 # DB ED
+ illegal_2();
+
+ed91 # DB ED
+ illegal_2();
+
+ed92 # DB ED
+ illegal_2();
+
+ed93 # DB ED
+ illegal_2();
+
+ed94 # DB ED
+ illegal_2();
+
+ed95 # DB ED
+ illegal_2();
+
+ed96 # DB ED
+ illegal_2();
+
+ed97 # DB ED
+ illegal_2();
+
+ed98 # DB ED
+ illegal_2();
+
+ed99 # DB ED
+ illegal_2();
+
+ed9a # DB ED
+ illegal_2();
+
+ed9b # DB ED
+ illegal_2();
+
+ed9c # DB ED
+ illegal_2();
+
+ed9d # DB ED
+ illegal_2();
+
+ed9e # DB ED
+ illegal_2();
+
+ed9f # DB ED
+ illegal_2();
+
+eda0 # LDI
+ call ldi
+
+eda1 # CPI
+ call cpi
+
+eda2 # INI
+ call ini
+
+eda3 # OUTI
+ call outi
+
+eda4 # DB ED
+ illegal_2();
+
+eda5 # DB ED
+ illegal_2();
+
+eda6 # DB ED
+ illegal_2();
+
+eda7 # DB ED
+ illegal_2();
+
+eda8 # LDD
+ call ldd
+
+eda9 # CPD
+ call cpd
+
+edaa # IND
+ call ind
+
+edab # OUTD
+ call outd
+
+edac # DB ED
+ illegal_2();
+
+edad # DB ED
+ illegal_2();
+
+edae # DB ED
+ illegal_2();
+
+edaf # DB ED
+ illegal_2();
+
+edb0 # LDIR
+ call ldir
+
+edb1 # CPIR
+ call cpir
+
+edb2 # INIR
+ call inir
+
+edb3 # OTIR
+ call otir
+
+edb4 # DB ED
+ illegal_2();
+
+edb5 # DB ED
+ illegal_2();
+
+edb6 # DB ED
+ illegal_2();
+
+edb7 # DB ED
+ illegal_2();
+
+edb8 # LDDR
+ call lddr
+
+edb9 # CPDR
+ call cpdr
+
+edba # INDR
+ call indr
+
+edbb # OTDR
+ call otdr
+
+edbc # DB ED
+ illegal_2();
+
+edbd # DB ED
+ illegal_2();
+
+edbe # DB ED
+ illegal_2();
+
+edbf # DB ED
+ illegal_2();
+
+edc0 # DB ED
+ illegal_2();
+
+edc1 # DB ED
+ illegal_2();
+
+edc2 # DB ED
+ illegal_2();
+
+edc3 # DB ED
+ illegal_2();
+
+edc4 # DB ED
+ illegal_2();
+
+edc5 # DB ED
+ illegal_2();
+
+edc6 # DB ED
+ illegal_2();
+
+edc7 # DB ED
+ illegal_2();
+
+edc8 # DB ED
+ illegal_2();
+
+edc9 # DB ED
+ illegal_2();
+
+edca # DB ED
+ illegal_2();
+
+edcb # DB ED
+ illegal_2();
+
+edcc # DB ED
+ illegal_2();
+
+edcd # DB ED
+ illegal_2();
+
+edce # DB ED
+ illegal_2();
+
+edcf # DB ED
+ illegal_2();
+
+edd0 # DB ED
+ illegal_2();
+
+edd1 # DB ED
+ illegal_2();
+
+edd2 # DB ED
+ illegal_2();
+
+edd3 # DB ED
+ illegal_2();
+
+edd4 # DB ED
+ illegal_2();
+
+edd5 # DB ED
+ illegal_2();
+
+edd6 # DB ED
+ illegal_2();
+
+edd7 # DB ED
+ illegal_2();
+
+edd8 # DB ED
+ illegal_2();
+
+edd9 # DB ED
+ illegal_2();
+
+edda # DB ED
+ illegal_2();
+
+eddb # DB ED
+ illegal_2();
+
+eddc # DB ED
+ illegal_2();
+
+eddd # DB ED
+ illegal_2();
+
+edde # DB ED
+ illegal_2();
+
+eddf # DB ED
+ illegal_2();
+
+ede0 # DB ED
+ illegal_2();
+
+ede1 # DB ED
+ illegal_2();
+
+ede2 # DB ED
+ illegal_2();
+
+ede3 # DB ED
+ illegal_2();
+
+ede4 # DB ED
+ illegal_2();
+
+ede5 # DB ED
+ illegal_2();
+
+ede6 # DB ED
+ illegal_2();
+
+ede7 # DB ED
+ illegal_2();
+
+ede8 # DB ED
+ illegal_2();
+
+ede9 # DB ED
+ illegal_2();
+
+edea # DB ED
+ illegal_2();
+
+edeb # DB ED
+ illegal_2();
+
+edec # DB ED
+ illegal_2();
+
+eded # DB ED
+ illegal_2();
+
+edee # DB ED
+ illegal_2();
+
+edef # DB ED
+ illegal_2();
+
+edf0 # DB ED
+ illegal_2();
+
+edf1 # DB ED
+ illegal_2();
+
+edf2 # DB ED
+ illegal_2();
+
+edf3 # DB ED
+ illegal_2();
+
+edf4 # DB ED
+ illegal_2();
+
+edf5 # DB ED
+ illegal_2();
+
+edf6 # DB ED
+ illegal_2();
+
+edf7 # DB ED
+ illegal_2();
+
+edf8 # DB ED
+ illegal_2();
+
+edf9 # DB ED
+ illegal_2();
+
+edfa # DB ED
+ illegal_2();
+
+edfb # DB ED
+ illegal_2();
+
+edfc # DB ED
+ illegal_2();
+
+edfd # DB ED
+ illegal_2();
+
+edfe # DB ED
+ illegal_2();
+
+edff # DB ED
+ illegal_2();
+
+
+##########################################################
+# main opcodes
+##########################################################
+0000 # NOP
+
+0001 # LD BC,w
+ call arg16
+ BC = TDAT;
+
+0002 # LD (BC),A
+ TADR = BC; TDAT8 = A;
+ call wm
+ WZ_L = (BC + 1) & 0xFF; WZ_H = A;
+
+0003 # INC BC
+ call nomreq_ir 2
+ BC++;
+
+0004 # INC B
+ inc(B);
+
+0005 # DEC B
+ dec(B);
+
+0006 # LD B,n
+ call arg
+ B = TDAT8;
+
+0007 # RLCA
+ rlca();
+
+0008 # EX AF,AF'
+ using std::swap; swap(m_af, m_af2);
+
+0009 # ADD HL,BC
+ TDAT = HL; TDAT2 = BC;
+ call add16
+ HL = TDAT;
+
+000a # LD A,(BC)
+ TADR = BC;
+ call rm
+ A = TDAT8; WZ = BC+1;
+
+000b # DEC BC
+ call nomreq_ir 2
+ BC--;
+
+000c # INC C
+ inc(C);
+
+000d # DEC C
+ dec(C);
+
+000e # LD C,n
+ call arg
+ C = TDAT8;
+
+000f # RRCA
+ rrca();
+
+0010 # DJNZ o
+ call nomreq_ir 1
+ TDAT8 = --B;
+ call jr_cond
+
+0011 # LD DE,w
+ call arg16
+ DE = TDAT;
+
+0012 # LD (DE),A
+ TADR = DE; TDAT8 = A;
+ call wm
+ WZ_L = (DE + 1) & 0xFF; WZ_H = A;
+
+0013 # INC DE
+ call nomreq_ir 2
+ DE++;
+
+0014 # INC D
+ inc(D);
+
+0015 # DEC D
+ dec(D);
+
+0016 # LD D,n
+ call arg
+ D = TDAT8;
+
+0017 # RLA
+ rla();
+
+0018 # JR o
+ call jr
+
+0019 # ADD HL,DE
+ TDAT = HL; TDAT2 = DE;
+ call add16
+ HL = TDAT;
+
+001a # LD A,(DE)
+ TADR = DE;
+ call rm
+ A = TDAT8; WZ = DE + 1;
+
+001b # DEC DE
+ call nomreq_ir 2
+ DE--;
+
+001c # INC E
+ inc(E);
+
+001d # DEC E
+ dec(E);
+
+001e # LD E,n
+ call arg
+ E = TDAT8;
+
+001f # RRA
+ rra();
+
+0020 # JR NZ,o
+ TDAT8 = !(F & ZF);
+ call jr_cond
+
+0021 # LD HL,w
+ call arg16
+ HL = TDAT;
+
+0022 # LD (w),HL
+ call arg16
+ m_ea = TDAT; TADR = TDAT; TDAT = HL;
+ call wm16
+ WZ = m_ea + 1;
+
+0023 # INC HL
+ call nomreq_ir 2
+ HL++;
+
+0024 # INC H
+ inc(H);
+
+0025 # DEC H
+ dec(H);
+
+0026 # LD H,n
+ call arg
+ H = TDAT8;
+
+0027 # DAA
+ daa();
+
+0028 # JR Z,o
+ TDAT8 = F & ZF;
+ call jr_cond
+
+0029 # ADD HL,HL
+ TDAT = HL; TDAT2 = HL;
+ call add16
+ HL = TDAT;
+
+002a # LD HL,(w)
+ call arg16
+ m_ea = TDAT; TADR = TDAT;
+ call rm16
+ HL = TDAT; WZ = m_ea + 1;
+
+002b # DEC HL
+ call nomreq_ir 2
+ HL--;
+
+002c # INC L
+ inc(L);
+
+002d # DEC L
+ dec(L);
+
+002e # LD L,n
+ call arg
+ L = TDAT8;
+
+002f # CPL
+ A ^= 0xff; set_f((F & (SF | ZF | PF | CF)) | HF | NF | (A & (YF | XF)));
+
+0030 # JR NC,o
+ TDAT8 = !(F & CF);
+ call jr_cond
+
+0031 # LD SP,w
+ call arg16
+ SP = TDAT;
+
+0032 # LD (w),A
+ call arg16
+ m_ea = TDAT; TADR = m_ea; TDAT8 = A;
+ call wm
+ WZ_L = (m_ea + 1) & 0xFF; WZ_H = A;
+
+0033 # INC SP
+ call nomreq_ir 2
+ SP++;
+
+0034 # INC (HL)
+ TADR = HL;
+ call rm_reg
+ inc(TDAT8);
+ call wm
+
+0035 # DEC (HL)
+ TADR = HL;
+ call rm_reg
+ dec(TDAT8);
+ call wm
+
+0036 # LD (HL),n
+ call arg
+ TADR = HL;
+ call wm
+
+0037 # SCF
+ set_f((F & (SF | ZF | PF)) | CF | (((F & Q) | A) & (YF | XF)));
+
+0038 # JR C,o
+ TDAT8 = F & CF;
+ call jr_cond
+
+0039 # ADD HL,SP
+ TDAT = HL; TDAT2 = SP;
+ call add16
+ HL = TDAT;
+
+003a # LD A,(w)
+ call arg16
+ m_ea = TDAT; TADR = TDAT;
+ call rm
+ A = TDAT8; WZ = m_ea + 1;
+
+003b # DEC SP
+ call nomreq_ir 2
+ SP--;
+
+003c # INC A
+ inc(A);
+
+003d # DEC A
+ dec(A);
+
+003e # LD A,n
+ call arg
+ A = TDAT8;
+
+003f # CCF
+ set_f(((F & (SF | ZF | PF | CF)) ^ CF) | ((F & CF) << 4) | (((F & Q) | A) & (YF | XF)));
+
+0040 # LD B,B
+
+0041 # LD B,C
+ B = C;
+
+0042 # LD B,D
+ B = D;
+
+0043 # LD B,E
+ B = E;
+
+0044 # LD B,H
+ B = H;
+
+0045 # LD B,L
+ B = L;
+
+0046 # LD B,(HL)
+ TADR = HL;
+ call rm
+ B = TDAT8;
+
+0047 # LD B,A
+ B = A;
+
+0048 # LD C,B
+ C = B;
+
+0049 # LD C,C
+
+004a # LD C,D
+ C = D;
+
+004b # LD C,E
+ C = E;
+
+004c # LD C,H
+ C = H;
+
+004d # LD C,L
+ C = L;
+
+004e # LD C,(HL)
+ TADR = HL;
+ call rm
+ C = TDAT8;
+
+004f # LD C,A
+ C = A;
+
+0050 # LD D,B
+ D = B;
+
+0051 # LD D,C
+ D = C;
+
+0052 # LD D,D
+
+0053 # LD D,E
+ D = E;
+
+0054 # LD D,H
+ D = H;
+
+0055 # LD D,L
+ D = L;
+
+0056 # LD D,(HL)
+ TADR = HL;
+ call rm
+ D = TDAT8;
+
+0057 # LD D,A
+ D = A;
+
+0058 # LD E,B
+ E = B;
+
+0059 # LD E,C
+ E = C;
+
+005a # LD E,D
+ E = D;
+
+005b # LD E,E
+
+005c # LD E,H
+ E = H;
+
+005d # LD E,L
+ E = L;
+
+005e # LD E,(HL)
+ TADR = HL;
+ call rm
+ E = TDAT8;
+
+005f # LD E,A
+ E = A;
+
+0060 # LD H,B
+ H = B;
+
+0061 # LD H,C
+ H = C;
+
+0062 # LD H,D
+ H = D;
+
+0063 # LD H,E
+ H = E;
+
+0064 # LD H,H
+
+0065 # LD H,L
+ H = L;
+
+0066 # LD H,(HL)
+ TADR = HL;
+ call rm
+ H = TDAT8;
+
+0067 # LD H,A
+ H = A;
+
+0068 # LD L,B
+ L = B;
+
+0069 # LD L,C
+ L = C;
+
+006a # LD L,D
+ L = D;
+
+006b # LD L,E
+ L = E;
+
+006c # LD L,H
+ L = H;
+
+006d # LD L,L
+
+006e # LD L,(HL)
+ TADR = HL;
+ call rm
+ L = TDAT8;
+
+006f # LD L,A
+ L = A;
+
+0070 # LD (HL),B
+ TADR = HL; TDAT = B;
+ call wm
+
+0071 # LD (HL),C
+ TADR = HL; TDAT = C;
+ call wm
+
+0072 # LD (HL),D
+ TADR = HL; TDAT = D;
+ call wm
+
+0073 # LD (HL),E
+ TADR = HL; TDAT = E;
+ call wm
+
+0074 # LD (HL),H
+ TADR = HL; TDAT = H;
+ call wm
+
+0075 # LD (HL),L
+ TADR = HL; TDAT = L;
+ call wm
+
+0076 # HALT
+ halt();
+
+0077 # LD (HL),A
+ TADR = HL; TDAT = A;
+ call wm
+
+0078 # LD A,B
+ A = B;
+
+0079 # LD A,C
+ A = C;
+
+007a # LD A,D
+ A = D;
+
+007b # LD A,E
+ A = E;
+
+007c # LD A,H
+ A = H;
+
+007d # LD A,L
+ A = L;
+
+007e # LD A,(HL)
+ TADR = HL;
+ call rm
+ A = TDAT8;
+
+007f # LD A,A
+
+0080 # ADD A,B
+ add_a(B);
+
+0081 # ADD A,C
+ add_a(C);
+
+0082 # ADD A,D
+ add_a(D);
+
+0083 # ADD A,E
+ add_a(E);
+
+0084 # ADD A,H
+ add_a(H);
+
+0085 # ADD A,L
+ add_a(L);
+
+0086 # ADD A,(HL)
+ TADR = HL;
+ call rm
+ add_a(TDAT8);
+
+0087 # ADD A,A
+ add_a(A);
+
+0088 # ADC A,B
+ adc_a(B);
+
+0089 # ADC A,C
+ adc_a(C);
+
+008a # ADC A,D
+ adc_a(D);
+
+008b # ADC A,E
+ adc_a(E);
+
+008c # ADC A,H
+ adc_a(H);
+
+008d # ADC A,L
+ adc_a(L);
+
+008e # ADC A,(HL)
+ TADR = HL;
+ call rm
+ adc_a(TDAT8);
+
+008f # ADC A,A
+ adc_a(A);
+
+0090 # SUB B
+ sub(B);
+
+0091 # SUB C
+ sub(C);
+
+0092 # SUB D
+ sub(D);
+
+0093 # SUB E
+ sub(E);
+
+0094 # SUB H
+ sub(H);
+
+0095 # SUB L
+ sub(L);
+
+0096 # SUB (HL)
+ TADR = HL;
+ call rm
+ sub(TDAT8);
+
+0097 # SUB A
+ sub(A);
+
+0098 # SBC A,B
+ sbc_a(B);
+
+0099 # SBC A,C
+ sbc_a(C);
+
+009a # SBC A,D
+ sbc_a(D);
+
+009b # SBC A,E
+ sbc_a(E);
+
+009c # SBC A,H
+ sbc_a(H);
+
+009d # SBC A,L
+ sbc_a(L);
+
+009e # SBC A,(HL)
+ TADR = HL;
+ call rm
+ sbc_a(TDAT8);
+
+009f # SBC A,A
+ sbc_a(A);
+
+00a0 # AND B
+ and_a(B);
+
+00a1 # AND C
+ and_a(C);
+
+00a2 # AND D
+ and_a(D);
+
+00a3 # AND E
+ and_a(E);
+
+00a4 # AND H
+ and_a(H);
+
+00a5 # AND L
+ and_a(L);
+
+00a6 # AND (HL)
+ TADR = HL;
+ call rm
+ and_a(TDAT8);
+
+00a7 # AND A
+ and_a(A);
+
+00a8 # XOR B
+ xor_a(B);
+
+00a9 # XOR C
+ xor_a(C);
+
+00aa # XOR D
+ xor_a(D);
+
+00ab # XOR E
+ xor_a(E);
+
+00ac # XOR H
+ xor_a(H);
+
+00ad # XOR L
+ xor_a(L);
+
+00ae # XOR (HL)
+ TADR = HL;
+ call rm
+ xor_a(TDAT8);
+
+00af # XOR A
+ xor_a(A);
+
+00b0 # OR B
+ or_a(B);
+
+00b1 # OR C
+ or_a(C);
+
+00b2 # OR D
+ or_a(D);
+
+00b3 # OR E
+ or_a(E);
+
+00b4 # OR H
+ or_a(H);
+
+00b5 # OR L
+ or_a(L);
+
+00b6 # OR (HL)
+ TADR = HL;
+ call rm
+ or_a(TDAT8);
+
+00b7 # OR A
+ or_a(A);
+
+00b8 # CP B
+ cp(B);
+
+00b9 # CP C
+ cp(C);
+
+00ba # CP D
+ cp(D);
+
+00bb # CP E
+ cp(E);
+
+00bc # CP H
+ cp(H);
+
+00bd # CP L
+ cp(L);
+
+00be # CP (HL)
+ TADR = HL;
+ call rm
+ cp(TDAT8);
+
+00bf # CP A
+ cp(A);
+
+00c0 # RET NZ
+ TDAT8 = !(F & ZF);
+ call ret_cond
+
+00c1 # POP BC
+ call pop
+ BC = TDAT;
+
+00c2 # JP NZ,a
+ TDAT8 = !(F & ZF);
+ call jp_cond
+
+00c3 # JP a
+ call jp
+
+00c4 # CALL NZ,a
+ TDAT8 = !(F & ZF);
+ call call_cond
+
+00c5 # PUSH BC
+ TDAT = BC;
+ call push
+
+00c6 # ADD A,n
+ call arg
+ add_a(TDAT8);
+
+00c7 # RST 0
+ call rst 0x00
+
+00c8 # RET Z
+ TDAT8 = (F & ZF);
+ call ret_cond
+
+00c9 # RET
+ call pop
+ PC = TDAT; WZ = PCD;
+
+00ca # JP Z,a
+ TDAT8 = F & ZF;
+ call jp_cond
+
+00cb # **** CB xx
+ call rop
+ call jump_prefixed 0xcb
+
+00cc # CALL Z,a
+ TDAT8 = F & ZF;
+ call call_cond
+
+00cd # CALL a
+ call arg16_call
+
+00ce # ADC A,n
+ call arg
+ adc_a(TDAT8);
+
+00cf # RST 1
+ call rst 0x08
+
+00d0 # RET NC
+ TDAT8 = !(F & CF);
+ call ret_cond
+
+00d1 # POP DE
+ call pop
+ DE = TDAT;
+
+00d2 # JP NC,a
+ TDAT8 = !(F & CF);
+ call jp_cond
+
+00d3 # OUT (n),A
+ call arg
+ TADR = TDAT8 | (A << 8); TDAT = A;
+ call out
+ WZ_L = ((TADR & 0xff) + 1) & 0xff; WZ_H = A;
+
+00d4 # CALL NC,a
+ TDAT8 = !(F & CF);
+ call call_cond
+
+00d5 # PUSH DE
+ TDAT = DE;
+ call push
+
+00d6 # SUB n
+ call arg
+ sub(TDAT8);
+
+00d7 # RST 2
+ call rst 0x10
+
+00d8 # RET C
+ TDAT8 = (F & CF);
+ call ret_cond
+
+00d9 # EXX
+ exx();
+
+00da # JP C,a
+ TDAT8 = F & CF;
+ call jp_cond
+
+00db # IN A,(n)
+ call arg
+ TADR = TDAT8 | (A << 8);
+ call in
+ A = TDAT8; WZ = TADR + 1;
+
+00dc # CALL C,a
+ TDAT8 = F & CF;
+ call call_cond
+
+00dd # **** DD xx
+ call rop
+ call jump_prefixed 0xdd
+
+00de # SBC A,n
+ call arg
+ sbc_a(TDAT8);
+
+00df # RST 3
+ call rst 0x18
+
+00e0 # RET PO
+ TDAT8 = !(F & PF);
+ call ret_cond
+
+00e1 # POP HL
+ call pop
+ HL = TDAT;
+
+00e2 # JP PO,a
+ TDAT8 = !(F & PF);
+ call jp_cond
+
+00e3 # EX HL,(SP)
+ TDAT = HL;
+ call ex_sp
+ HL = TDAT;
+
+00e4 # CALL PO,a
+ TDAT8 = !(F & PF);
+ call call_cond
+
+00e5 # PUSH HL
+ TDAT = HL;
+ call push
+
+00e6 # AND n
+ call arg
+ and_a(TDAT8);
+
+00e7 # RST 4
+ call rst 0x20
+
+00e8 # RET PE
+ TDAT8 = (F & PF);
+ call ret_cond
+
+00e9 # JP (HL)
+ PC = HL;
+
+00ea # JP PE,a
+ TDAT8 = F & PF;
+ call jp_cond
+
+00eb # EX DE,HL
+ using std::swap; swap(DE, HL);
+
+00ec # CALL PE,a
+ TDAT8 = F & PF;
+ call call_cond
+
+00ed # **** ED xx
+ call rop
+ call jump_prefixed 0xed
+
+00ee # XOR n
+ call arg
+ xor_a(TDAT8);
+
+00ef # RST 5
+ call rst 0x28
+
+00f0 # RET P
+ TDAT8 = !(F & SF);
+ call ret_cond
+
+00f1 # POP AF
+ call pop
+ AF = TDAT;
+
+00f2 # JP P,a
+ TDAT8 = !(F & SF);
+ call jp_cond
+
+00f3 # DI
+ m_iff1 = m_iff2 = 0;
+
+00f4 # CALL P,a
+ TDAT8 = !(F & SF);
+ call call_cond
+
+00f5 # PUSH AF
+ TDAT = AF;
+ call push
+
+00f6 # OR n
+ call arg
+ or_a(TDAT8);
+
+00f7 # RST 6
+ call rst 0x30
+
+00f8 # RET M
+ TDAT8 = (F & SF);
+ call ret_cond
+
+00f9 # LD SP,HL
+ call nomreq_ir 2
+ SP = HL;
+
+00fa # JP M,a
+ TDAT8 = F & SF;
+ call jp_cond
+
+00fb # EI
+ ei();
+
+00fc # CALL M,a
+ TDAT8 = F & SF;
+ call call_cond
+
+00fd # **** FD xx
+ call rop
+ call jump_prefixed 0xfd
+
+00fe # CP n
+ call arg
+ cp(TDAT8);
+
+00ff # RST 7
+ call rst 0x38
diff --git a/src/devices/cpu/z80/z80make.py b/src/devices/cpu/z80/z80make.py
new file mode 100644
index 00000000000..41154f736ee
--- /dev/null
+++ b/src/devices/cpu/z80/z80make.py
@@ -0,0 +1,241 @@
+#!/usr/bin/python
+# license:BSD-3-Clause
+# copyright-holders:Andre I. Holub
+from __future__ import print_function
+
+USAGE = """
+Usage:
+%s [type] z80.lst z80.inc
+"""
+import sys
+
+class IndStr:
+ def __init__(self, src, indent = None):
+ self.str = src.strip()
+ self.indent = indent
+ if not indent:
+ self.indent = src[:len(src) - len(src.lstrip())]
+
+ def line(self):
+ return self.str
+
+ def get_indent(self):
+ return self.indent
+
+ def is_comment(self):
+ return self.str.startswith("#") and not self.str.startswith("#if") and not self.str.startswith("#endif")
+
+ def is_blank(self):
+ return not self.str
+
+ def has_indent(self):
+ return self.indent != ''
+
+ def replace(self, new):
+ self.str = new
+
+ def replace(self, old, new):
+ return IndStr(self.str.replace(old, new), self.indent)
+
+ def with_str(self, new_str):
+ return IndStr(new_str, self.indent)
+
+ def split(self):
+ return self.str.split()
+
+ def print(self, str, f):
+ print("\t\t%s%s" % (self.indent, str), file=f)
+
+
+
+class Opcode:
+ def __init__(self, code):
+ self.code = code
+ self.source = []
+
+ def add_source_lines(self, lines):
+ self.source.extend(lines)
+
+ def save_dasm(self, f):
+ code = self.code
+ has_steps = len(self.source) > 1
+ if has_steps:
+ print("\t\tswitch (u8(m_ref))", file=f)
+ print("\t\t{", file=f)
+ print("\t\tcase 0x00:", file=f)
+ step = 0
+ for i in range(0, len(self.source)):
+ il = self.source[i]
+ line = il.line()
+ tokens = line.split()
+ if tokens[0] == '+':
+ il.print("m_icount -= %s;" % (" ".join(tokens[1:])), f)
+ step += 1
+ to_step = "0x%s" % (hex(256 + step)[3:])
+ il.print("if (check_icount(%s, 0, false)) return;" % (to_step), f)
+ print("\t\t[[fallthrough]];", file=f)
+ print("\t\tcase %s:" % (to_step), file=f)
+ elif (len(tokens) > 2 and tokens[1] == "!!"):
+ print("\t\t[[fallthrough]];", file=f)
+ step += 1;
+ print("\t\tcase 0x%s:" % (hex(256 + step)[3:]), file=f)
+ il.print("{", f)
+ il.print("\tconst int icount = m_icount;", f)
+ il.print("\t%s" % " ".join(tokens[2:]), f)
+ il.print("\tm_icount -= %s;" % (tokens[0]), f)
+ step += 1
+ to_step = "0x%s" % (hex(256 + step)[3:])
+ il.print("\tif (check_icount(%s, icount, true)) return;" % (to_step), f)
+ il.print("}", f)
+ print("\t\t[[fallthrough]];", file=f)
+ print("\t\tcase %s:" % (to_step), file=f)
+ else:
+ il.print("%s" % line, f)
+ if has_steps:
+ print("\t\tbreak;\n", file=f)
+ print("\t\t}", file=f)
+
+class Macro:
+ def __init__(self, name, arg_name = None):
+ self.name = name
+ self.source = []
+ self.arg_name = arg_name
+
+ def apply(self, arg):
+ if self.arg_name is not None:
+ return [ r.replace(self.arg_name, arg) for r in self.source ]
+ else:
+ return self.source
+
+ def add_source_lines(self, lines):
+ self.source.extend(lines)
+
+class OpcodeList:
+ def __init__(self, gen, fname):
+ self.gen = gen
+ self.opcode_info = []
+ self.macros = {}
+
+ try:
+ f = open(fname, "r")
+ except Exception:
+ err = sys.exc_info()[1]
+ sys.stderr.write("Cannot read opcodes file %s [%s]\n" % (fname, err))
+ sys.exit(1)
+
+ inf = None
+ for ln in f:
+ line = IndStr(ln)
+ # Skip comments except macros
+ if line.is_comment() or line.is_blank():
+ continue
+ if line.has_indent():
+ if inf is not None:
+ if isinstance(inf, Macro):
+ inf.add_source_lines([line])
+ else:
+ inf.add_source_lines(self.pre_process(line))
+ else:
+ # New opcode
+ tokens = line.split()
+ if tokens[0] == "macro":
+ name = tokens[1]
+ arg_name = None
+ if len(tokens) > 2:
+ arg_name = tokens[2]
+ inf = Macro(name, arg_name)
+ if name in self.macros:
+ sys.stderr.write("Replacing macro: %s\n" % name)
+ self.macros[name] = inf
+ else:
+ ntokens = tokens[0].split(":")
+ if len(ntokens) == 2:
+ inf = Opcode(ntokens[1])
+ if ntokens[0] == self.gen:
+ self.opcode_info.append(inf)
+ else:
+ inf = Opcode(ntokens[0])
+ if None == self.gen:
+ self.opcode_info.append(inf)
+
+ def pre_process(self, iline):
+ out = []
+ line = iline.str
+ line_toc = line.split()
+ times = 1
+ if len(line_toc) > 2 and line_toc[1] == "*":
+ times = int(line_toc[0])
+ line_toc = line_toc[2:]
+ line = " ".join(line_toc)
+ for i in range(times):
+ if line_toc[0] == 'call':
+ name = line_toc[1]
+ arg = None
+ if len(line_toc) > 2:
+ arg = line_toc[2]
+ if name in self.macros:
+ macro = self.macros[name]
+ ([out.extend(self.pre_process(il)) for il in macro.apply(arg)])
+ else:
+ sys.stderr.write("Macro not found %s\n" % name)
+ out.append(iline.with_str("... %s" % name))
+ else:
+ out.append(iline.with_str(line))
+ return out
+
+ def save_exec(self, f):
+ prefix = None
+ print("switch (u8(m_ref >> 16)) // prefix", file=f)
+ print("{", file=f)
+ for opc in self.opcode_info:
+ if (opc.code[:2]) != prefix:
+ if prefix is not None:
+ print("\n\t}", file=f)
+ print("\tbreak;", file=f)
+ print("", file=f)
+ print("}", file=f)
+ print("break; // prefix: 0x%s" % (prefix), file=f)
+ print("", file=f)
+ prefix = opc.code[:2]
+ print("case 0x%s:" % (opc.code[:2]), file=f)
+ print("{", file=f)
+ print("\tswitch (u8(m_ref >> 8)) // opcode", file=f)
+ print("\t{", file=f)
+ print("\tcase 0x%s:" % (opc.code[2:]), file=f)
+ #print("\t{", file=f)
+ opc.save_dasm(f)
+ #print("\t}", file=f)
+ print("\tbreak;", file=f)
+ print("", file=f)
+ print("\t} // switch opcode", file=f)
+ print("}", file=f)
+ print("break; // prefix: 0x%s" % (prefix), file=f)
+ print("", file=f)
+ print("} // switch prefix", file=f)
+
+def main(argv):
+ if len(argv) != 3 and len(argv) != 4:
+ print(USAGE % argv[0])
+ return 1
+
+ fidx = 1
+ gen = None
+ if len(argv) == 4:
+ gen = argv[1]
+ fidx = 2
+
+ opcodes = OpcodeList(gen, argv[fidx])
+
+ try:
+ f = open(argv[fidx + 1], "w")
+ except Exception:
+ err = sys.exc_info()[fidx]
+ sys.stderr.write("cannot write file %s [%s]\n" % (argv[fidx + 1], err))
+ sys.exit(1)
+
+ opcodes.save_exec(f)
+ f.close()
+
+# ======================================================================
+if __name__ == "__main__":
+ sys.exit(main(sys.argv))