summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMike Pavone <pavone@retrodev.com>2013-05-02 22:28:40 -0700
committerMike Pavone <pavone@retrodev.com>2013-05-02 22:28:40 -0700
commit3cf828483b8d9a166d801d0d4950e651caf632c3 (patch)
treeef0d3e58fc6c1ea9db4cc461231c6a50e7234159
parentfbf09acd0f2985d26300dd6e173a3c81901cc854 (diff)
Implement LDD and LDDR
-rw-r--r--z80_to_x86.c42
1 files changed, 39 insertions, 3 deletions
diff --git a/z80_to_x86.c b/z80_to_x86.c
index daf7f05..f72124f 100644
--- a/z80_to_x86.c
+++ b/z80_to_x86.c
@@ -545,9 +545,45 @@ uint8_t * translate_z80inst(z80inst * inst, uint8_t * dst, z80_context * context
dst = mov_irdisp8(dst, 0, CONTEXT, zf_off(ZF_PV), SZ_B);
break;
}
- /*case Z80_LDD:
- case Z80_LDDR:
- case Z80_CPI:
+ case Z80_LDD: {
+ dst = zcycles(dst, 8);
+ dst = mov_rr(dst, opts->regs[Z80_HL], SCRATCH1, SZ_W);
+ dst = call(dst, (uint8_t *)z80_read_byte);
+ dst = mov_rr(dst, opts->regs[Z80_DE], SCRATCH2, SZ_W);
+ dst = call(dst, (uint8_t *)z80_read_byte);
+ dst = zcycles(dst, 2);
+ dst = sub_ir(dst, 1, opts->regs[Z80_DE], SZ_W);
+ dst = sub_ir(dst, 1, opts->regs[Z80_HL], SZ_W);
+ dst = sub_ir(dst, 1, opts->regs[Z80_BC], SZ_W);
+ //TODO: Implement half-carry
+ dst = mov_irdisp8(dst, 0, CONTEXT, zf_off(ZF_N), SZ_B);
+ dst = setcc_rdisp8(dst, CC_NZ, CONTEXT, zf_off(ZF_PV));
+ break;
+ }
+ case Z80_LDDR: {
+ dst = zcycles(dst, 8);
+ dst = mov_rr(dst, opts->regs[Z80_HL], SCRATCH1, SZ_W);
+ dst = call(dst, (uint8_t *)z80_read_byte);
+ dst = mov_rr(dst, opts->regs[Z80_DE], SCRATCH2, SZ_W);
+ dst = call(dst, (uint8_t *)z80_read_byte);
+ dst = sub_ir(dst, 1, opts->regs[Z80_DE], SZ_W);
+ dst = sub_ir(dst, 1, opts->regs[Z80_HL], SZ_W);
+
+ dst = sub_ir(dst, 1, opts->regs[Z80_BC], SZ_W);
+ uint8_t * cont = dst+1;
+ dst = jcc(dst, CC_Z, dst+2);
+ dst = zcycles(dst, 7);
+ //TODO: Figure out what the flag state should be here
+ //TODO: Figure out whether an interrupt can interrupt this
+ dst = jmp(dst, start);
+ *cont = dst - (cont + 1);
+ dst = zcycles(dst, 2);
+ //TODO: Implement half-carry
+ dst = mov_irdisp8(dst, 0, CONTEXT, zf_off(ZF_N), SZ_B);
+ dst = mov_irdisp8(dst, 0, CONTEXT, zf_off(ZF_PV), SZ_B);
+ break;
+ }
+ /*case Z80_CPI:
case Z80_CPIR:
case Z80_CPD:
case Z80_CPDR: