diff options
author | Mike Pavone <pavone@retrodev.com> | 2013-05-02 22:28:40 -0700 |
---|---|---|
committer | Mike Pavone <pavone@retrodev.com> | 2013-05-02 22:28:40 -0700 |
commit | 3cf828483b8d9a166d801d0d4950e651caf632c3 (patch) | |
tree | ef0d3e58fc6c1ea9db4cc461231c6a50e7234159 | |
parent | fbf09acd0f2985d26300dd6e173a3c81901cc854 (diff) |
Implement LDD and LDDR
-rw-r--r-- | z80_to_x86.c | 42 |
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: |