mirror of
https://github.com/jscrane/r65emu.git
synced 2024-12-21 12:29:51 +00:00
1526 lines
35 KiB
C++
1526 lines
35 KiB
C++
#include <stdio.h>
|
|
#include <Stream.h>
|
|
|
|
#include "memory.h"
|
|
#include "ports.h"
|
|
#include "CPU.h"
|
|
#include "z80.h"
|
|
|
|
char *z80::status(char *buf, size_t n, bool hdr) {
|
|
uint8_t op = _mem[PC];
|
|
snprintf(buf, n,
|
|
"%s%04x %02x %04x %04x %04x %04x %04x %04x %04x %04x %04x %d%d%d "
|
|
"%04x %d%d%d%d%d%d%d%d",
|
|
hdr? "_pc_ op _af_ _bc_ _de_ _hl_ _af' _bc' _de' _hl' _ir_ imff _sp_ sz5h3pnc\r\n": "",
|
|
PC, op, AF, BC, DE, HL, AF_, BC_, DE_, HL_, IR, _im, _iff1, _iff2,
|
|
SP, flags.S, flags.Z, flags._5, flags.H, flags._3, flags.P, flags.N, flags.C);
|
|
return buf;
|
|
}
|
|
|
|
void z80::checkpoint(Stream &s) {
|
|
s.write(AF);
|
|
s.write(BC);
|
|
s.write(DE);
|
|
s.write(HL);
|
|
s.write(PC);
|
|
s.write(SP);
|
|
s.write(AF_);
|
|
s.write(BC_);
|
|
s.write(DE_);
|
|
s.write(HL_);
|
|
s.write(IX);
|
|
s.write(IY);
|
|
s.write(IR);
|
|
s.write(_im);
|
|
s.write(_iff1);
|
|
s.write(_iff2);
|
|
s.write(_ts);
|
|
s.write(_halted);
|
|
s.write(_irq_pending);
|
|
}
|
|
|
|
void z80::restore(Stream &s) {
|
|
AF = s.read();
|
|
BC = s.read();
|
|
DE = s.read();
|
|
HL = s.read();
|
|
PC = s.read();
|
|
SP = s.read();
|
|
AF_= s.read();
|
|
BC_= s.read();
|
|
DE_= s.read();
|
|
HL_= s.read();
|
|
IX = s.read();
|
|
IY = s.read();
|
|
IR = s.read();
|
|
_im = s.read();
|
|
_iff1 = s.read();
|
|
_iff2 = s.read();
|
|
_ts = s.read();
|
|
_halted = s.read();
|
|
_irq_pending = s.read();
|
|
}
|
|
|
|
uint8_t z80::_fetch_op() {
|
|
_mc(PC, 4);
|
|
uint8_t op = _mem[PC];
|
|
#if defined(CPU_DEBUG)
|
|
printf("%5ld MR %04x %02x\n", _ts, PC, op);
|
|
#endif
|
|
PC++;
|
|
R++;
|
|
return op;
|
|
}
|
|
|
|
void z80::run(unsigned clocks) {
|
|
while (clocks--) {
|
|
if (_irq_pending)
|
|
_handle_interrupt();
|
|
step();
|
|
if (_halted)
|
|
break;
|
|
}
|
|
}
|
|
|
|
void z80::reset() {
|
|
AF = BC = DE = HL = PC = SP = 0;
|
|
AF_ = BC_ = DE_ = HL_ = IX = IY = 0;
|
|
I = R = 0;
|
|
_im = 0;
|
|
_iff1 = _iff2 = false;
|
|
_irq_pending = 0;
|
|
_ts = 0;
|
|
_halted = false;
|
|
}
|
|
|
|
void z80::_handle_interrupt() {
|
|
if (_irq_pending < 0 || _iff1) {
|
|
if (_halted) {
|
|
_halted = false;
|
|
PC++;
|
|
}
|
|
_push(PC);
|
|
if (_irq_pending < 0) { // NMI
|
|
_iff2 = _iff1;
|
|
PC = 0x0066;
|
|
ts(11);
|
|
} else {
|
|
_iff1 = _iff2 = false;
|
|
R++;
|
|
if (_im == 0 || _im == 1)
|
|
PC = 0x0038;
|
|
else if (_im == 2)
|
|
PC = _rw(_irq_pending + (0x100 * I));
|
|
ts(7);
|
|
}
|
|
}
|
|
_irq_pending = 0;
|
|
}
|
|
|
|
void z80::daa() {
|
|
uint8_t c = flags.C, a = 0, lo = A & 0x0f;
|
|
if (flags.H || lo > 9)
|
|
a = 0x06;
|
|
if (c || A > 0x99) {
|
|
a |= 0x60;
|
|
c = 1;
|
|
}
|
|
if (flags.N)
|
|
_sub(a);
|
|
else
|
|
_add(a);
|
|
flags.C = c;
|
|
flags.P = parity_table[A];
|
|
}
|
|
|
|
void z80::_step_idx(OP_IDX ops[]) {
|
|
|
|
_mc(PC, 3);
|
|
uint8_t off = _mem[PC];
|
|
#if defined(CPU_DEBUG)
|
|
printf("%5ld MR %04x %02x\n", _ts, PC, off);
|
|
#endif
|
|
PC++;
|
|
|
|
_mc(PC, 3);
|
|
uint8_t op = _mem[PC];
|
|
#if defined(CPU_DEBUG)
|
|
printf("%5ld MR %04x %02x\n", _ts, PC, op);
|
|
#endif
|
|
_mc(PC, 1);
|
|
_mc(PC, 1);
|
|
PC++;
|
|
(this->*ops[op])(off);
|
|
}
|
|
|
|
void z80::_ddfd(uint16_t &ix, uint8_t &ixL, uint8_t &ixH, OP_IDX ops[]) {
|
|
switch (_fetch_op()) {
|
|
case 0x09:
|
|
_add16(ix, BC);
|
|
break;
|
|
case 0x19:
|
|
_add16(ix, DE);
|
|
break;
|
|
case 0x21:
|
|
ix = _rwpc();
|
|
break;
|
|
case 0x22:
|
|
_swPC(ix);
|
|
break;
|
|
case 0x23:
|
|
ix++;
|
|
_mc(IR, 1); _mc(IR, 1);
|
|
break;
|
|
case 0x24:
|
|
_inc(ixH);
|
|
break;
|
|
case 0x25:
|
|
_dec(ixH);
|
|
break;
|
|
case 0x26:
|
|
ixH = _rb(PC++);
|
|
break;
|
|
case 0x29:
|
|
_add16(ix, ix);
|
|
break;
|
|
case 0x2a:
|
|
ix = _rw(_rw(PC)); PC += 2;
|
|
break;
|
|
case 0x2b:
|
|
ix--;
|
|
_mc(IR, 1); _mc(IR, 1);
|
|
break;
|
|
case 0x2c:
|
|
_inc(ixL);
|
|
break;
|
|
case 0x2d:
|
|
_dec(ixL);
|
|
break;
|
|
case 0x2e:
|
|
ixL = _rb(PC++);
|
|
break;
|
|
case 0x34:
|
|
_incO(ix);
|
|
break;
|
|
case 0x35:
|
|
_decO(ix);
|
|
break;
|
|
case 0x36:
|
|
_sbO(ix);
|
|
break;
|
|
case 0x39:
|
|
_add16(ix, SP);
|
|
break;
|
|
case 0x44:
|
|
B = ixH;
|
|
break;
|
|
case 0x45:
|
|
B = ixL;
|
|
break;
|
|
case 0x46:
|
|
B = _rbO(ix);
|
|
break;
|
|
case 0x4c:
|
|
C = ixH;
|
|
break;
|
|
case 0x4d:
|
|
C = ixL;
|
|
break;
|
|
case 0x4e:
|
|
C = _rbO(ix);
|
|
break;
|
|
case 0x54:
|
|
D = ixH;
|
|
break;
|
|
case 0x55:
|
|
D = ixL;
|
|
break;
|
|
case 0x56:
|
|
D = _rbO(ix);
|
|
break;
|
|
case 0x5c:
|
|
E = ixH;
|
|
break;
|
|
case 0x5d:
|
|
E = ixL;
|
|
break;
|
|
case 0x5e:
|
|
E = _rbO(ix);
|
|
break;
|
|
case 0x60:
|
|
ixH = B;
|
|
break;
|
|
case 0x61:
|
|
ixH = C;
|
|
break;
|
|
case 0x62:
|
|
ixH = D;
|
|
break;
|
|
case 0x63:
|
|
ixH = E;
|
|
break;
|
|
case 0x64:
|
|
break;
|
|
case 0x65:
|
|
ixH = ixL;
|
|
break;
|
|
case 0x66:
|
|
H = _rbO(ix);
|
|
break;
|
|
case 0x67:
|
|
ixH = A;
|
|
break;
|
|
case 0x68:
|
|
ixL = B;
|
|
break;
|
|
case 0x69:
|
|
ixL = C;
|
|
break;
|
|
case 0x6a:
|
|
ixL = D;
|
|
break;
|
|
case 0x6b:
|
|
ixL = E;
|
|
break;
|
|
case 0x6c:
|
|
ixL = ixH;
|
|
break;
|
|
case 0x6d:
|
|
break;
|
|
case 0x6e:
|
|
L = _rbO(ix);
|
|
break;
|
|
case 0x6f:
|
|
ixL = A;
|
|
break;
|
|
case 0x70:
|
|
_sbO(ix, B);
|
|
break;
|
|
case 0x71:
|
|
_sbO(ix, C);
|
|
break;
|
|
case 0x72:
|
|
_sbO(ix, D);
|
|
break;
|
|
case 0x73:
|
|
_sbO(ix, E);
|
|
break;
|
|
case 0x74:
|
|
_sbO(ix, H);
|
|
break;
|
|
case 0x75:
|
|
_sbO(ix, L);
|
|
break;
|
|
case 0x77:
|
|
_sbO(ix, A);
|
|
break;
|
|
case 0x7c:
|
|
A = ixH;
|
|
break;
|
|
case 0x7d:
|
|
A = ixL;
|
|
break;
|
|
case 0x7e:
|
|
A = _rbO(ix);
|
|
break;
|
|
case 0x84:
|
|
_add(ixH);
|
|
break;
|
|
case 0x85:
|
|
_add(ixL);
|
|
break;
|
|
case 0x86:
|
|
_add(_rbO(ix));
|
|
break;
|
|
case 0x8c:
|
|
_adc(ixH);
|
|
break;
|
|
case 0x8d:
|
|
_adc(ixL);
|
|
break;
|
|
case 0x8e:
|
|
_adc(_rbO(ix));
|
|
break;
|
|
case 0x94:
|
|
_sub(ixH);
|
|
break;
|
|
case 0x95:
|
|
_sub(ixL);
|
|
break;
|
|
case 0x96:
|
|
_sub(_rbO(ix));
|
|
break;
|
|
case 0x9c:
|
|
_sbc(ixH);
|
|
break;
|
|
case 0x9d:
|
|
_sbc(ixL);
|
|
break;
|
|
case 0x9e:
|
|
_sbc(_rbO(ix));
|
|
break;
|
|
case 0xa4:
|
|
_and(ixH);
|
|
break;
|
|
case 0xa5:
|
|
_and(ixL);
|
|
break;
|
|
case 0xa6:
|
|
_and(_rbO(ix));
|
|
break;
|
|
case 0xac:
|
|
_xor(ixH);
|
|
break;
|
|
case 0xad:
|
|
_xor(ixL);
|
|
break;
|
|
case 0xae:
|
|
_xor(_rbO(ix));
|
|
break;
|
|
case 0xb4:
|
|
_or(ixH);
|
|
break;
|
|
case 0xb5:
|
|
_or(ixL);
|
|
break;
|
|
case 0xb6:
|
|
_or(_rbO(ix));
|
|
break;
|
|
case 0xbc:
|
|
_cmp(ixH);
|
|
break;
|
|
case 0xbd:
|
|
_cmp(ixL);
|
|
break;
|
|
case 0xbe:
|
|
_cmp(_rbO(ix));
|
|
break;
|
|
case 0xcb:
|
|
_step_idx(ops);
|
|
break;
|
|
case 0xe1:
|
|
ix = _pop();
|
|
break;
|
|
case 0xe3:
|
|
_exSP(ix);
|
|
break;
|
|
case 0xe5:
|
|
_mc(IR, 1);
|
|
_push(ix);
|
|
break;
|
|
case 0xe9:
|
|
PC = ix;
|
|
break;
|
|
case 0xf9:
|
|
_mc(IR, 1); _mc(IR, 1);
|
|
SP = ix;
|
|
break;
|
|
}
|
|
}
|
|
|
|
void z80::ed() {
|
|
uint8_t b, c, f;
|
|
switch (_fetch_op()) {
|
|
case 0x40:
|
|
B = _inr(BC);
|
|
break;
|
|
case 0x41:
|
|
_outr(BC, B);
|
|
break;
|
|
case 0x42:
|
|
_sbc16(BC);
|
|
break;
|
|
case 0x43:
|
|
_swPC(BC);
|
|
break;
|
|
case 0x44:
|
|
case 0x54:
|
|
case 0x64:
|
|
case 0x74:
|
|
case 0x4c:
|
|
case 0x5c:
|
|
case 0x6c:
|
|
case 0x7c:
|
|
b = A;
|
|
A = 0;
|
|
_sub(b);
|
|
break;
|
|
case 0x45:
|
|
case 0x4d:
|
|
case 0x55:
|
|
case 0x5d:
|
|
case 0x65:
|
|
case 0x6d:
|
|
case 0x75:
|
|
case 0x7d:
|
|
_iff1 = _iff2;
|
|
ret();
|
|
break;
|
|
case 0x46:
|
|
case 0x4e:
|
|
case 0x66:
|
|
case 0x6e:
|
|
_im = 0;
|
|
break;
|
|
case 0x47:
|
|
_mc(IR, 1);
|
|
I = A;
|
|
break;
|
|
case 0x48:
|
|
C = _inr(BC);
|
|
break;
|
|
case 0x49:
|
|
_outr(BC, C);
|
|
break;
|
|
case 0x4a:
|
|
_adc16(BC);
|
|
break;
|
|
case 0x4b:
|
|
BC = _rwPC();
|
|
break;
|
|
case 0x4f:
|
|
_mc(IR, 1);
|
|
R = A;
|
|
// FIXME?
|
|
break;
|
|
case 0x50:
|
|
D = _inr(BC);
|
|
break;
|
|
case 0x51:
|
|
_outr(BC, D);
|
|
break;
|
|
case 0x52:
|
|
_sbc16(DE);
|
|
break;
|
|
case 0x53:
|
|
_swPC(DE);
|
|
break;
|
|
case 0x56:
|
|
case 0x76:
|
|
_im = 1;
|
|
break;
|
|
case 0x57:
|
|
_mc(IR, 1);
|
|
A = I;
|
|
_sz35(A);
|
|
flags.P = _iff2;
|
|
flags.H = flags.N = 0;
|
|
break;
|
|
case 0x58:
|
|
E = _inr(BC);
|
|
break;
|
|
case 0x59:
|
|
_outr(BC, E);
|
|
break;
|
|
case 0x5a:
|
|
_adc16(DE);
|
|
break;
|
|
case 0x5b:
|
|
DE = _rwPC();
|
|
break;
|
|
case 0x5e:
|
|
case 0x7e:
|
|
_im = 2;
|
|
break;
|
|
case 0x5f:
|
|
_mc(IR, 1);
|
|
A = R;
|
|
_sz35(A);
|
|
flags.P = _iff2;
|
|
flags.H = flags.N = 0;
|
|
break;
|
|
case 0x60:
|
|
H = _inr(BC);
|
|
break;
|
|
case 0x61:
|
|
_outr(BC, H);
|
|
break;
|
|
case 0x62:
|
|
_sbc16(HL);
|
|
break;
|
|
case 0x63:
|
|
_swPC(HL);
|
|
break;
|
|
case 0x67:
|
|
b = _rb(HL);
|
|
_mc(HL, 1); _mc(HL, 1);
|
|
_mc(HL, 1); _mc(HL, 1);
|
|
_sb(HL, (A << 4) | (b >> 4));
|
|
A = (A & 0xf0) | (b & 0x0f);
|
|
_szp35(A);
|
|
flags.H = flags.N = 0;
|
|
break;
|
|
case 0x68:
|
|
L = _inr(BC);
|
|
break;
|
|
case 0x69:
|
|
_outr(BC, L);
|
|
break;
|
|
case 0x6a:
|
|
_adc16(HL);
|
|
break;
|
|
case 0x6b:
|
|
HL = _rwPC();
|
|
break;
|
|
case 0x6f:
|
|
b = _rb(HL);
|
|
_mc(HL, 1); _mc(HL, 1);
|
|
_mc(HL, 1); _mc(HL, 1);
|
|
_sb(HL, (A & 0x0f) | (b << 4));
|
|
A = (A & 0xf0) | (b >> 4);
|
|
_szp35(A);
|
|
flags.N = flags.H = 0;
|
|
break;
|
|
case 0x70:
|
|
_inr(BC);
|
|
break;
|
|
case 0x71:
|
|
_outr(BC, 0);
|
|
break;
|
|
case 0x72:
|
|
_sbc16(SP);
|
|
break;
|
|
case 0x73:
|
|
_swPC(SP);
|
|
break;
|
|
case 0x78:
|
|
A = _inr(BC);
|
|
break;
|
|
case 0x79:
|
|
_outr(BC, A);
|
|
break;
|
|
case 0x7a:
|
|
_adc16(SP);
|
|
break;
|
|
case 0x7b:
|
|
SP = _rwPC();
|
|
break;
|
|
case 0xa0:
|
|
b = _rb(HL);
|
|
BC--;
|
|
_sb(DE, b);
|
|
_mc(DE, 1);
|
|
_mc(DE, 1);
|
|
DE++;
|
|
HL++;
|
|
b += A;
|
|
flags.P = (BC != 0);
|
|
flags._3 = (b & 0x08) != 0;
|
|
flags._5 = (b & 0x02) != 0;
|
|
flags.N = flags.H = 0;
|
|
break;
|
|
case 0xa1:
|
|
b = _rb(HL);
|
|
_mc(HL, 1); _mc(HL, 1); _mc(HL, 1);
|
|
_mc(HL, 1); _mc(HL, 1);
|
|
c = A;
|
|
f = (flags.C != 0);
|
|
_sub(b);
|
|
HL++;
|
|
BC--;
|
|
b = A;
|
|
A = c;
|
|
if (flags.H) b--;
|
|
flags.C = f;
|
|
flags.P = (BC != 0);
|
|
flags._3 = (b & 0x08) != 0;
|
|
flags._5 = (b & 0x02) != 0;
|
|
break;
|
|
case 0xa2:
|
|
_mc(IR, 1);
|
|
b = _inr(BC);
|
|
_sb(HL, b);
|
|
B--;
|
|
HL++;
|
|
c = b + C + 1;
|
|
flags.N = (b & 0x80) != 0;
|
|
flags.C = flags.H = (c < b);
|
|
flags.P = parity_table[(c & 0x07) ^ B];
|
|
_sz35(B);
|
|
break;
|
|
case 0xa3:
|
|
_mc(IR, 1);
|
|
b = _rb(HL);
|
|
B--;
|
|
_outr(BC, b);
|
|
HL++;
|
|
c = b + L;
|
|
flags.N = (b & 0x80) != 0;
|
|
flags.C = flags.H = (c < b);
|
|
flags.P = parity_table[(c & 0x07) ^ B];
|
|
_sz35(B);
|
|
break;
|
|
case 0xa8:
|
|
b = _rb(HL);
|
|
BC--;
|
|
_sb(DE, b);
|
|
_mc(DE, 1);
|
|
_mc(DE, 1);
|
|
DE--;
|
|
HL--;
|
|
b += A;
|
|
flags.P = (BC != 0);
|
|
flags._3 = (b & 0x08) != 0;
|
|
flags._5 = (b & 0x02) != 0;
|
|
flags.N = flags.H = 0;
|
|
break;
|
|
case 0xa9:
|
|
b = _rb(HL);
|
|
c = A - b;
|
|
_mc(HL, 1); _mc(HL, 1); _mc(HL, 1);
|
|
_mc(HL, 1); _mc(HL, 1);
|
|
HL--;
|
|
BC--;
|
|
flags.N = 1;
|
|
flags.P = (BC != 0);
|
|
flags.Z = (c == 0);
|
|
flags.S = (c & 0x80) != 0;
|
|
flags._3 = (c & 0x08) != 0;
|
|
flags._5 = (c & 0x02) != 0;
|
|
// FIXME: flags 3, 5, H
|
|
break;
|
|
case 0xaa:
|
|
_mc(IR, 1);
|
|
b = _inr(BC);
|
|
_sb(HL, b);
|
|
B--;
|
|
HL--;
|
|
c = b + C - 1;
|
|
flags.N = (b & 0x80) != 0;
|
|
flags.C = flags.H = (c < b);
|
|
flags.P = parity_table[(c & 0x07) ^ B];
|
|
_sz35(B);
|
|
break;
|
|
case 0xab:
|
|
_mc(IR, 1);
|
|
b = _rb(HL);
|
|
B--;
|
|
_outr(BC, b);
|
|
HL--;
|
|
c = b + L;
|
|
flags.N = (b & 0x80) != 0;
|
|
flags.C = flags.H = (c < b);
|
|
flags.P = parity_table[(c & 0x07) ^ B];
|
|
_sz35(B);
|
|
break;
|
|
case 0xb0:
|
|
b = _rb(HL);
|
|
BC--;
|
|
_sb(DE, b);
|
|
_mc(DE, 1);
|
|
_mc(DE, 1);
|
|
b += A;
|
|
flags.P = (BC != 0);
|
|
flags._3 = (b & 0x08) != 0;
|
|
flags._5 = (b & 0x02) != 0;
|
|
flags.N = flags.H = 0;
|
|
if (BC) {
|
|
_mc(DE, 1); _mc(DE, 1); _mc(DE, 1);
|
|
_mc(DE, 1); _mc(DE, 1);
|
|
PC -= 2;
|
|
}
|
|
DE++;
|
|
HL++;
|
|
break;
|
|
case 0xb1:
|
|
b = _rb(HL);
|
|
_mc(HL, 1); _mc(HL, 1); _mc(HL, 1);
|
|
_mc(HL, 1); _mc(HL, 1);
|
|
c = A;
|
|
f = (flags.C != 0);
|
|
_sub(b);
|
|
BC--;
|
|
b = A;
|
|
A = c;
|
|
flags.C = f;
|
|
flags.P = (BC != 0);
|
|
if (flags.H) b--;
|
|
flags._3 = (b & 0x08) != 0;
|
|
flags._5 = (b & 0x02) != 0;
|
|
if (!flags.Z) {
|
|
_mc(HL, 1); _mc(HL, 1); _mc(HL, 1);
|
|
_mc(HL, 1); _mc(HL, 1);
|
|
PC -= 2;
|
|
}
|
|
HL++;
|
|
break;
|
|
case 0xb2:
|
|
_mc(IR, 1);
|
|
b = _inr(BC);
|
|
_sb(HL, b);
|
|
B--;
|
|
c = b + flags.C + 1;
|
|
flags.N = (c & 0x80) != 0;
|
|
flags.C = flags.H = (c < b);
|
|
flags.P = parity_table[(c & 0x07) ^ B];
|
|
_sz35(B);
|
|
if (B) {
|
|
_mc(HL, 1); _mc(HL, 1); _mc(HL, 1);
|
|
_mc(HL, 1); _mc(HL, 1);
|
|
PC -= 2;
|
|
}
|
|
HL++;
|
|
break;
|
|
case 0xb3:
|
|
_mc(IR, 1);
|
|
b = _rb(HL);
|
|
B--;
|
|
_outr(BC, b);
|
|
HL++;
|
|
c = b + L;
|
|
flags.N = (b & 0x80) != 0;
|
|
flags.C = flags.H = (c < b);
|
|
flags.P = parity_table[(c & 0x07) ^ B];
|
|
_sz35(B);
|
|
if (B) {
|
|
_mc(BC, 1); _mc(BC, 1); _mc(BC, 1);
|
|
_mc(BC, 1); _mc(BC, 1);
|
|
PC -= 2;
|
|
}
|
|
break;
|
|
case 0xb8:
|
|
b = _rb(HL);
|
|
BC--;
|
|
_sb(DE, b);
|
|
_mc(DE, 1);
|
|
_mc(DE, 1);
|
|
b += A;
|
|
flags.P = (BC != 0);
|
|
flags._3 = (b & 0x08) != 0;
|
|
flags._5 = (b & 0x02) != 0;
|
|
flags.N = flags.H = 0;
|
|
if (BC) {
|
|
_mc(DE, 1); _mc(DE, 1); _mc(DE, 1);
|
|
_mc(DE, 1); _mc(DE, 1);
|
|
PC -= 2;
|
|
}
|
|
DE--;
|
|
HL--;
|
|
break;
|
|
case 0xb9:
|
|
b = _rb(HL);
|
|
c = A - b;
|
|
_mc(HL, 1); _mc(HL, 1); _mc(HL, 1);
|
|
_mc(HL, 1); _mc(HL, 1);
|
|
BC--;
|
|
flags.N = 1;
|
|
flags.P = (BC != 0);
|
|
flags.Z = (c == 0);
|
|
flags.S = (c & 0x80) != 0;
|
|
// FIXME: flags 3, 5, H
|
|
if (BC) {
|
|
_mc(HL, 1); _mc(HL, 1); _mc(HL, 1);
|
|
_mc(HL, 1); _mc(HL, 1);
|
|
PC -= 2;
|
|
}
|
|
HL--;
|
|
break;
|
|
case 0xba:
|
|
_mc(IR, 1);
|
|
b = _inr(BC);
|
|
_sb(HL, b);
|
|
B--;
|
|
c = b + flags.C + 1;
|
|
flags.N = (c & 0x80) != 0;
|
|
flags.C = flags.H = (c < b);
|
|
flags.P = parity_table[(c & 0x07) ^ B];
|
|
_sz35(B);
|
|
if (B) {
|
|
_mc(HL, 1); _mc(HL, 1); _mc(HL, 1);
|
|
_mc(HL, 1); _mc(HL, 1);
|
|
PC -= 2;
|
|
}
|
|
HL--;
|
|
break;
|
|
case 0xbb:
|
|
_mc(IR, 1);
|
|
b = _rb(HL);
|
|
B--;
|
|
_outr(BC, b);
|
|
HL--;
|
|
c = b + L;
|
|
flags.N = (b & 0x80) != 0;
|
|
flags.C = flags.H = (c < b);
|
|
flags.P = parity_table[(c & 0x07) ^ B];
|
|
_sz35(B);
|
|
if (B) {
|
|
_mc(BC, 1); _mc(BC, 1); _mc(BC, 1);
|
|
_mc(BC, 1); _mc(BC, 1);
|
|
PC -= 2;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
int z80::parity_table[] = {
|
|
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
|
|
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
|
|
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
|
|
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
|
|
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
|
|
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
|
|
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
|
|
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
|
|
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
|
|
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
|
|
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
|
|
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
|
|
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
|
|
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
|
|
0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 0,
|
|
1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1,
|
|
};
|
|
|
|
z80::z80(Memory &m, PortDevice<z80> &ports): CPU(m)
|
|
{
|
|
_ports = &ports;
|
|
|
|
OP *p = _ops;
|
|
|
|
// 0x00
|
|
*p++ = &z80::nop; *p++ = &z80::ldbcpc;
|
|
*p++ = &z80::ldBCa; *p++ = &z80::incbc;
|
|
*p++ = &z80::incb; *p++ = &z80::decb;
|
|
*p++ = &z80::ldb; *p++ = &z80::rlca;
|
|
*p++ = &z80::exaf; *p++ = &z80::addhlbc;
|
|
*p++ = &z80::ldaBC; *p++ = &z80::decbc;
|
|
*p++ = &z80::incc; *p++ = &z80::decc;
|
|
*p++ = &z80::ldc; *p++ = &z80::rrca;
|
|
|
|
// 0x10
|
|
*p++ = &z80::djnz; *p++ = &z80::lddepc;
|
|
*p++ = &z80::ldDEa; *p++ = &z80::incde;
|
|
*p++ = &z80::incd; *p++ = &z80::decd;
|
|
*p++ = &z80::ldd; *p++ = &z80::rla;
|
|
*p++ = &z80::jr; *p++ = &z80::addhlde;
|
|
*p++ = &z80::ldaDE; *p++ = &z80::decde;
|
|
*p++ = &z80::ince; *p++ = &z80::dece;
|
|
*p++ = &z80::lde; *p++ = &z80::rra;
|
|
|
|
// 0x20
|
|
*p++ = &z80::jrnz; *p++ = &z80::ldhlpc;
|
|
*p++ = &z80::ldPChl; *p++ = &z80::inchl;
|
|
*p++ = &z80::inch; *p++ = &z80::dech;
|
|
*p++ = &z80::ldh; *p++ = &z80::daa;
|
|
*p++ = &z80::jrz; *p++ = &z80::addhlhl;
|
|
*p++ = &z80::ldhlPC; *p++ = &z80::dechl;
|
|
*p++ = &z80::incl; *p++ = &z80::decl;
|
|
*p++ = &z80::ldl; *p++ = &z80::cpl;
|
|
|
|
// 0x30
|
|
*p++ = &z80::jrnc; *p++ = &z80::ldsppc;
|
|
*p++ = &z80::ldPCa; *p++ = &z80::incsp;
|
|
*p++ = &z80::incHL; *p++ = &z80::decHL;
|
|
*p++ = &z80::ldHL; *p++ = &z80::scf;
|
|
*p++ = &z80::jrc; *p++ = &z80::addhlsp;
|
|
*p++ = &z80::ldaPC; *p++ = &z80::decsp;
|
|
*p++ = &z80::inca; *p++ = &z80::deca;
|
|
*p++ = &z80::lda; *p++ = &z80::ccf;
|
|
|
|
// 0x40
|
|
*p++ = &z80::ldbb; *p++ = &z80::ldbc;
|
|
*p++ = &z80::ldbd; *p++ = &z80::ldbe;
|
|
*p++ = &z80::ldbh; *p++ = &z80::ldbl;
|
|
*p++ = &z80::ldbHL; *p++ = &z80::ldba;
|
|
*p++ = &z80::ldcb; *p++ = &z80::ldcc;
|
|
*p++ = &z80::ldcd; *p++ = &z80::ldce;
|
|
*p++ = &z80::ldch; *p++ = &z80::ldcl;
|
|
*p++ = &z80::ldcHL; *p++ = &z80::ldca;
|
|
|
|
// 0x50
|
|
*p++ = &z80::lddb; *p++ = &z80::lddc;
|
|
*p++ = &z80::lddd; *p++ = &z80::ldde;
|
|
*p++ = &z80::lddh; *p++ = &z80::lddl;
|
|
*p++ = &z80::lddHL; *p++ = &z80::ldda;
|
|
*p++ = &z80::ldeb; *p++ = &z80::ldec;
|
|
*p++ = &z80::lded; *p++ = &z80::ldee;
|
|
*p++ = &z80::ldeh; *p++ = &z80::ldel;
|
|
*p++ = &z80::ldeHL; *p++ = &z80::ldea;
|
|
|
|
// 0x60
|
|
*p++ = &z80::ldhb; *p++ = &z80::ldhc;
|
|
*p++ = &z80::ldhd; *p++ = &z80::ldhe;
|
|
*p++ = &z80::ldhh; *p++ = &z80::ldhl;
|
|
*p++ = &z80::ldhHL; *p++ = &z80::ldha;
|
|
*p++ = &z80::ldlb; *p++ = &z80::ldlc;
|
|
*p++ = &z80::ldld; *p++ = &z80::ldle;
|
|
*p++ = &z80::ldlh; *p++ = &z80::ldll;
|
|
*p++ = &z80::ldlHL; *p++ = &z80::ldla;
|
|
|
|
// 0x70
|
|
*p++ = &z80::ldHLb; *p++ = &z80::ldHLc;
|
|
*p++ = &z80::ldHLd; *p++ = &z80::ldHLe;
|
|
*p++ = &z80::ldHLh; *p++ = &z80::ldHLl;
|
|
*p++ = &z80::halt; *p++ = &z80::ldHLa;
|
|
*p++ = &z80::ldab; *p++ = &z80::ldac;
|
|
*p++ = &z80::ldad; *p++ = &z80::ldae;
|
|
*p++ = &z80::ldah; *p++ = &z80::ldal;
|
|
*p++ = &z80::ldaHL; *p++ = &z80::ldaa;
|
|
|
|
// 0x80
|
|
*p++ = &z80::addab; *p++ = &z80::addac;
|
|
*p++ = &z80::addad; *p++ = &z80::addae;
|
|
*p++ = &z80::addah; *p++ = &z80::addal;
|
|
*p++ = &z80::addaHL; *p++ = &z80::addaa;
|
|
*p++ = &z80::adcab; *p++ = &z80::adcac;
|
|
*p++ = &z80::adcad; *p++ = &z80::adcae;
|
|
*p++ = &z80::adcah; *p++ = &z80::adcal;
|
|
*p++ = &z80::adcaHL; *p++ = &z80::adcaa;
|
|
|
|
// 0x90
|
|
*p++ = &z80::subab; *p++ = &z80::subac;
|
|
*p++ = &z80::subad; *p++ = &z80::subae;
|
|
*p++ = &z80::subah; *p++ = &z80::subal;
|
|
*p++ = &z80::subaHL; *p++ = &z80::subaa;
|
|
*p++ = &z80::sbcab; *p++ = &z80::sbcac;
|
|
*p++ = &z80::sbcad; *p++ = &z80::sbcae;
|
|
*p++ = &z80::sbcah; *p++ = &z80::sbcal;
|
|
*p++ = &z80::sbcaHL; *p++ = &z80::sbcaa;
|
|
|
|
// 0xa0
|
|
*p++ = &z80::andb; *p++ = &z80::andc;
|
|
*p++ = &z80::andd; *p++ = &z80::ande;
|
|
*p++ = &z80::andh; *p++ = &z80::andl;
|
|
*p++ = &z80::andHL; *p++ = &z80::anda;
|
|
*p++ = &z80::xorb; *p++ = &z80::xorc;
|
|
*p++ = &z80::xord; *p++ = &z80::xore;
|
|
*p++ = &z80::xorh; *p++ = &z80::xorl;
|
|
*p++ = &z80::xorHL; *p++ = &z80::xora;
|
|
|
|
// 0xb0
|
|
*p++ = &z80::orb; *p++ = &z80::orc;
|
|
*p++ = &z80::ord; *p++ = &z80::ore;
|
|
*p++ = &z80::orh; *p++ = &z80::orl;
|
|
*p++ = &z80::orHL; *p++ = &z80::ora;
|
|
*p++ = &z80::cpb; *p++ = &z80::cpc;
|
|
*p++ = &z80::cpd; *p++ = &z80::cpe;
|
|
*p++ = &z80::cph; *p++ = &z80::cpL;
|
|
*p++ = &z80::cpHL; *p++ = &z80::cpa;
|
|
|
|
// 0xc0
|
|
*p++ = &z80::retnz; *p++ = &z80::popbc;
|
|
*p++ = &z80::jpnz; *p++ = &z80::jp;
|
|
*p++ = &z80::callnz; *p++ = &z80::pushbc;
|
|
*p++ = &z80::adda; *p++ = &z80::rst00;
|
|
*p++ = &z80::retz; *p++ = &z80::ret;
|
|
*p++ = &z80::jpz; *p++ = &z80::cb;
|
|
*p++ = &z80::callz; *p++ = &z80::call;
|
|
*p++ = &z80::adca; *p++ = &z80::rst08;
|
|
|
|
// 0xd0
|
|
*p++ = &z80::retnc; *p++ = &z80::popde;
|
|
*p++ = &z80::jpnc; *p++ = &z80::outa;
|
|
*p++ = &z80::callnc; *p++ = &z80::pushde;
|
|
*p++ = &z80::suba; *p++ = &z80::rst10;
|
|
*p++ = &z80::retc; *p++ = &z80::exx;
|
|
*p++ = &z80::jpc; *p++ = &z80::ina;
|
|
*p++ = &z80::callc; *p++ = &z80::dd;
|
|
*p++ = &z80::sbca; *p++ = &z80::rst18;
|
|
|
|
// 0xe0
|
|
*p++ = &z80::retpo; *p++ = &z80::pophl;
|
|
*p++ = &z80::jppo; *p++ = &z80::exSPhl;
|
|
*p++ = &z80::callpo; *p++ = &z80::pushhl;
|
|
*p++ = &z80::and_; *p++ = &z80::rst20;
|
|
*p++ = &z80::retpe; *p++ = &z80::jphl;
|
|
*p++ = &z80::jppe; *p++ = &z80::exdehl;
|
|
*p++ = &z80::callpe; *p++ = &z80::ed;
|
|
*p++ = &z80::xor_; *p++ = &z80::rst28;
|
|
|
|
// 0xf0
|
|
*p++ = &z80::retp; *p++ = &z80::popaf;
|
|
*p++ = &z80::jpp; *p++ = &z80::di;
|
|
*p++ = &z80::callp; *p++ = &z80::pushaf;
|
|
*p++ = &z80::or_; *p++ = &z80::rst30;
|
|
*p++ = &z80::retm; *p++ = &z80::ldsphl;
|
|
*p++ = &z80::jpm; *p++ = &z80::ei;
|
|
*p++ = &z80::callm; *p++ = &z80::fd;
|
|
*p++ = &z80::cp; *p++ = &z80::rst38;
|
|
|
|
OP *c = _cb;
|
|
|
|
// 0x00
|
|
*c++ = &z80::rlcB; *c++ = &z80::rlcC;
|
|
*c++ = &z80::rlcD; *c++ = &z80::rlcE;
|
|
*c++ = &z80::rlcH; *c++ = &z80::rlcL;
|
|
*c++ = &z80::rlcHL; *c++ = &z80::rlcA;
|
|
*c++ = &z80::rrcB; *c++ = &z80::rrcC;
|
|
*c++ = &z80::rrcD; *c++ = &z80::rrcE;
|
|
*c++ = &z80::rrcH; *c++ = &z80::rrcL;
|
|
*c++ = &z80::rrcHL; *c++ = &z80::rrcA;
|
|
|
|
// 0x10
|
|
*c++ = &z80::rlB; *c++ = &z80::rlC;
|
|
*c++ = &z80::rlD; *c++ = &z80::rlE;
|
|
*c++ = &z80::rlH; *c++ = &z80::rlL;
|
|
*c++ = &z80::rlHL; *c++ = &z80::rlA;
|
|
*c++ = &z80::rrB; *c++ = &z80::rrC;
|
|
*c++ = &z80::rrD; *c++ = &z80::rrE;
|
|
*c++ = &z80::rrH; *c++ = &z80::rrL;
|
|
*c++ = &z80::rrHL; *c++ = &z80::rrA;
|
|
|
|
// 0x20
|
|
*c++ = &z80::slab; *c++ = &z80::slac;
|
|
*c++ = &z80::slad; *c++ = &z80::slae;
|
|
*c++ = &z80::slah; *c++ = &z80::slal;
|
|
*c++ = &z80::slaHL; *c++ = &z80::slaa;
|
|
*c++ = &z80::srab; *c++ = &z80::srac;
|
|
*c++ = &z80::srad; *c++ = &z80::srae;
|
|
*c++ = &z80::srah; *c++ = &z80::sral;
|
|
*c++ = &z80::sraHL; *c++ = &z80::sraa;
|
|
|
|
// 0x30
|
|
*c++ = &z80::sllb; *c++ = &z80::sllc;
|
|
*c++ = &z80::slld; *c++ = &z80::slle;
|
|
*c++ = &z80::sllh; *c++ = &z80::slll;
|
|
*c++ = &z80::sllHL; *c++ = &z80::slla;
|
|
*c++ = &z80::srlb; *c++ = &z80::srlc;
|
|
*c++ = &z80::srld; *c++ = &z80::srle;
|
|
*c++ = &z80::srlh; *c++ = &z80::srll;
|
|
*c++ = &z80::srlHL; *c++ = &z80::srla;
|
|
|
|
// 0x40
|
|
*c++ = &z80::bit0b; *c++ = &z80::bit0c;
|
|
*c++ = &z80::bit0d; *c++ = &z80::bit0e;
|
|
*c++ = &z80::bit0h; *c++ = &z80::bit0l;
|
|
*c++ = &z80::bit0HL; *c++ = &z80::bit0a;
|
|
*c++ = &z80::bit1b; *c++ = &z80::bit1c;
|
|
*c++ = &z80::bit1d; *c++ = &z80::bit1e;
|
|
*c++ = &z80::bit1h; *c++ = &z80::bit1l;
|
|
*c++ = &z80::bit1HL; *c++ = &z80::bit1a;
|
|
|
|
// 0x50
|
|
*c++ = &z80::bit2b; *c++ = &z80::bit2c;
|
|
*c++ = &z80::bit2d; *c++ = &z80::bit2e;
|
|
*c++ = &z80::bit2h; *c++ = &z80::bit2l;
|
|
*c++ = &z80::bit2HL; *c++ = &z80::bit2a;
|
|
*c++ = &z80::bit3b; *c++ = &z80::bit3c;
|
|
*c++ = &z80::bit3d; *c++ = &z80::bit3e;
|
|
*c++ = &z80::bit3h; *c++ = &z80::bit3l;
|
|
*c++ = &z80::bit3HL; *c++ = &z80::bit3a;
|
|
|
|
// 0x60
|
|
*c++ = &z80::bit4b; *c++ = &z80::bit4c;
|
|
*c++ = &z80::bit4d; *c++ = &z80::bit4e;
|
|
*c++ = &z80::bit4h; *c++ = &z80::bit4l;
|
|
*c++ = &z80::bit4HL; *c++ = &z80::bit4a;
|
|
*c++ = &z80::bit5b; *c++ = &z80::bit5c;
|
|
*c++ = &z80::bit5d; *c++ = &z80::bit5e;
|
|
*c++ = &z80::bit5h; *c++ = &z80::bit5l;
|
|
*c++ = &z80::bit5HL; *c++ = &z80::bit5a;
|
|
|
|
// 0x70
|
|
*c++ = &z80::bit6b; *c++ = &z80::bit6c;
|
|
*c++ = &z80::bit6d; *c++ = &z80::bit6e;
|
|
*c++ = &z80::bit6h; *c++ = &z80::bit6l;
|
|
*c++ = &z80::bit6HL; *c++ = &z80::bit6a;
|
|
*c++ = &z80::bit7b; *c++ = &z80::bit7c;
|
|
*c++ = &z80::bit7d; *c++ = &z80::bit7e;
|
|
*c++ = &z80::bit7h; *c++ = &z80::bit7l;
|
|
*c++ = &z80::bit7HL; *c++ = &z80::bit7a;
|
|
|
|
// 0x80
|
|
*c++ = &z80::res0b; *c++ = &z80::res0c;
|
|
*c++ = &z80::res0d; *c++ = &z80::res0e;
|
|
*c++ = &z80::res0h; *c++ = &z80::res0l;
|
|
*c++ = &z80::res0HL; *c++ = &z80::res0a;
|
|
*c++ = &z80::res1b; *c++ = &z80::res1c;
|
|
*c++ = &z80::res1d; *c++ = &z80::res1e;
|
|
*c++ = &z80::res1h; *c++ = &z80::res1l;
|
|
*c++ = &z80::res1HL; *c++ = &z80::res1a;
|
|
|
|
// 0x90
|
|
*c++ = &z80::res2b; *c++ = &z80::res2c;
|
|
*c++ = &z80::res2d; *c++ = &z80::res2e;
|
|
*c++ = &z80::res2h; *c++ = &z80::res2l;
|
|
*c++ = &z80::res2HL; *c++ = &z80::res2a;
|
|
*c++ = &z80::res3b; *c++ = &z80::res3c;
|
|
*c++ = &z80::res3d; *c++ = &z80::res3e;
|
|
*c++ = &z80::res3h; *c++ = &z80::res3l;
|
|
*c++ = &z80::res3HL; *c++ = &z80::res3a;
|
|
|
|
// 0xa0
|
|
*c++ = &z80::res4b; *c++ = &z80::res4c;
|
|
*c++ = &z80::res4d; *c++ = &z80::res4e;
|
|
*c++ = &z80::res4h; *c++ = &z80::res4l;
|
|
*c++ = &z80::res4HL; *c++ = &z80::res4a;
|
|
*c++ = &z80::res5b; *c++ = &z80::res5c;
|
|
*c++ = &z80::res5d; *c++ = &z80::res5e;
|
|
*c++ = &z80::res5h; *c++ = &z80::res5l;
|
|
*c++ = &z80::res5HL; *c++ = &z80::res5a;
|
|
|
|
// 0xb0
|
|
*c++ = &z80::res6b; *c++ = &z80::res6c;
|
|
*c++ = &z80::res6d; *c++ = &z80::res6e;
|
|
*c++ = &z80::res6h; *c++ = &z80::res6l;
|
|
*c++ = &z80::res6HL; *c++ = &z80::res6a;
|
|
*c++ = &z80::res7b; *c++ = &z80::res7c;
|
|
*c++ = &z80::res7d; *c++ = &z80::res7e;
|
|
*c++ = &z80::res7h; *c++ = &z80::res7l;
|
|
*c++ = &z80::res7HL; *c++ = &z80::res7a;
|
|
|
|
// 0xc0
|
|
*c++ = &z80::set0b; *c++ = &z80::set0c;
|
|
*c++ = &z80::set0d; *c++ = &z80::set0e;
|
|
*c++ = &z80::set0h; *c++ = &z80::set0l;
|
|
*c++ = &z80::set0HL; *c++ = &z80::set0a;
|
|
*c++ = &z80::set1b; *c++ = &z80::set1c;
|
|
*c++ = &z80::set1d; *c++ = &z80::set1e;
|
|
*c++ = &z80::set1h; *c++ = &z80::set1l;
|
|
*c++ = &z80::set1HL; *c++ = &z80::set1a;
|
|
|
|
// 0xd0
|
|
*c++ = &z80::set2b; *c++ = &z80::set2c;
|
|
*c++ = &z80::set2d; *c++ = &z80::set2e;
|
|
*c++ = &z80::set2h; *c++ = &z80::set2l;
|
|
*c++ = &z80::set2HL; *c++ = &z80::set2a;
|
|
*c++ = &z80::set3b; *c++ = &z80::set3c;
|
|
*c++ = &z80::set3d; *c++ = &z80::set3e;
|
|
*c++ = &z80::set3h; *c++ = &z80::set3l;
|
|
*c++ = &z80::set3HL; *c++ = &z80::set3a;
|
|
|
|
// 0xe0
|
|
*c++ = &z80::set4b; *c++ = &z80::set4c;
|
|
*c++ = &z80::set4d; *c++ = &z80::set4e;
|
|
*c++ = &z80::set4h; *c++ = &z80::set4l;
|
|
*c++ = &z80::set4HL; *c++ = &z80::set4a;
|
|
*c++ = &z80::set5b; *c++ = &z80::set5c;
|
|
*c++ = &z80::set5d; *c++ = &z80::set5e;
|
|
*c++ = &z80::set5h; *c++ = &z80::set5l;
|
|
*c++ = &z80::set5HL; *c++ = &z80::set5a;
|
|
|
|
// 0xf0
|
|
*c++ = &z80::set6b; *c++ = &z80::set6c;
|
|
*c++ = &z80::set6d; *c++ = &z80::set6e;
|
|
*c++ = &z80::set6h; *c++ = &z80::set6l;
|
|
*c++ = &z80::set6HL; *c++ = &z80::set6a;
|
|
*c++ = &z80::set7b; *c++ = &z80::set7c;
|
|
*c++ = &z80::set7d; *c++ = &z80::set7e;
|
|
*c++ = &z80::set7h; *c++ = &z80::set7l;
|
|
*c++ = &z80::set7HL; *c++ = &z80::set7a;
|
|
|
|
OP_IDX *d = _ddcb;
|
|
|
|
// 0x00
|
|
*d++ = &z80::rlcIXB; *d++ = &z80::rlcIXC;
|
|
*d++ = &z80::rlcIXD; *d++ = &z80::rlcIXE;
|
|
*d++ = &z80::rlcIXH; *d++ = &z80::rlcIXL;
|
|
*d++ = &z80::rlcIX; *d++ = &z80::rlcIXA;
|
|
*d++ = &z80::rrcIXB; *d++ = &z80::rrcIXC;
|
|
*d++ = &z80::rrcIXD; *d++ = &z80::rrcIXE;
|
|
*d++ = &z80::rrcIXH; *d++ = &z80::rrcIXL;
|
|
*d++ = &z80::rrcIX; *d++ = &z80::rrcIXA;
|
|
|
|
// 0x10
|
|
*d++ = &z80::rlIXB; *d++ = &z80::rlIXC;
|
|
*d++ = &z80::rlIXD; *d++ = &z80::rlIXE;
|
|
*d++ = &z80::rlIXH; *d++ = &z80::rlIXL;
|
|
*d++ = &z80::rlIX; *d++ = &z80::rlIXA;
|
|
*d++ = &z80::rrIXB; *d++ = &z80::rrIXC;
|
|
*d++ = &z80::rrIXD; *d++ = &z80::rrIXE;
|
|
*d++ = &z80::rrIXH; *d++ = &z80::rrIXL;
|
|
*d++ = &z80::rrIX; *d++ = &z80::rrIXA;
|
|
|
|
// 0x20
|
|
*d++ = &z80::slaIXB; *d++ = &z80::slaIXC;
|
|
*d++ = &z80::slaIXD; *d++ = &z80::slaIXE;
|
|
*d++ = &z80::slaIXH; *d++ = &z80::slaIXL;
|
|
*d++ = &z80::slaIX; *d++ = &z80::slaIXA;
|
|
*d++ = &z80::sraIXB; *d++ = &z80::sraIXC;
|
|
*d++ = &z80::sraIXD; *d++ = &z80::sraIXE;
|
|
*d++ = &z80::sraIXH; *d++ = &z80::sraIXL;
|
|
*d++ = &z80::sraIX; *d++ = &z80::sraIXA;
|
|
|
|
// 0x30
|
|
*d++ = &z80::sllIXB; *d++ = &z80::sllIXC;
|
|
*d++ = &z80::sllIXD; *d++ = &z80::sllIXE;
|
|
*d++ = &z80::sllIXH; *d++ = &z80::sllIXL;
|
|
*d++ = &z80::sllIX; *d++ = &z80::sllIXA;
|
|
*d++ = &z80::srlIXB; *d++ = &z80::srlIXC;
|
|
*d++ = &z80::srlIXD; *d++ = &z80::srlIXE;
|
|
*d++ = &z80::srlIXH; *d++ = &z80::srlIXL;
|
|
*d++ = &z80::srlIX; *d++ = &z80::srlIXA;
|
|
|
|
// 0x40
|
|
*d++ = &z80::bit0IX; *d++ = &z80::bit0IX;
|
|
*d++ = &z80::bit0IX; *d++ = &z80::bit0IX;
|
|
*d++ = &z80::bit0IX; *d++ = &z80::bit0IX;
|
|
*d++ = &z80::bit0IX; *d++ = &z80::bit0IX;
|
|
*d++ = &z80::bit1IX; *d++ = &z80::bit1IX;
|
|
*d++ = &z80::bit1IX; *d++ = &z80::bit1IX;
|
|
*d++ = &z80::bit1IX; *d++ = &z80::bit1IX;
|
|
*d++ = &z80::bit1IX; *d++ = &z80::bit1IX;
|
|
|
|
// 0x50
|
|
*d++ = &z80::bit2IX; *d++ = &z80::bit2IX;
|
|
*d++ = &z80::bit2IX; *d++ = &z80::bit2IX;
|
|
*d++ = &z80::bit2IX; *d++ = &z80::bit2IX;
|
|
*d++ = &z80::bit2IX; *d++ = &z80::bit2IX;
|
|
*d++ = &z80::bit3IX; *d++ = &z80::bit3IX;
|
|
*d++ = &z80::bit3IX; *d++ = &z80::bit3IX;
|
|
*d++ = &z80::bit3IX; *d++ = &z80::bit3IX;
|
|
*d++ = &z80::bit3IX; *d++ = &z80::bit3IX;
|
|
|
|
// 0x60
|
|
*d++ = &z80::bit4IX; *d++ = &z80::bit4IX;
|
|
*d++ = &z80::bit4IX; *d++ = &z80::bit4IX;
|
|
*d++ = &z80::bit4IX; *d++ = &z80::bit4IX;
|
|
*d++ = &z80::bit4IX; *d++ = &z80::bit4IX;
|
|
*d++ = &z80::bit5IX; *d++ = &z80::bit5IX;
|
|
*d++ = &z80::bit5IX; *d++ = &z80::bit5IX;
|
|
*d++ = &z80::bit5IX; *d++ = &z80::bit5IX;
|
|
*d++ = &z80::bit5IX; *d++ = &z80::bit5IX;
|
|
|
|
// 0x70
|
|
*d++ = &z80::bit6IX; *d++ = &z80::bit6IX;
|
|
*d++ = &z80::bit6IX; *d++ = &z80::bit6IX;
|
|
*d++ = &z80::bit6IX; *d++ = &z80::bit6IX;
|
|
*d++ = &z80::bit6IX; *d++ = &z80::bit6IX;
|
|
*d++ = &z80::bit7IX; *d++ = &z80::bit7IX;
|
|
*d++ = &z80::bit7IX; *d++ = &z80::bit7IX;
|
|
*d++ = &z80::bit7IX; *d++ = &z80::bit7IX;
|
|
*d++ = &z80::bit7IX; *d++ = &z80::bit7IX;
|
|
|
|
// 0x80
|
|
*d++ = &z80::res0IXB; *d++ = &z80::res0IXC;
|
|
*d++ = &z80::res0IXD; *d++ = &z80::res0IXE;
|
|
*d++ = &z80::res0IXH; *d++ = &z80::res0IXL;
|
|
*d++ = &z80::res0IX; *d++ = &z80::res0IXA;
|
|
*d++ = &z80::res1IXB; *d++ = &z80::res1IXC;
|
|
*d++ = &z80::res1IXD; *d++ = &z80::res1IXE;
|
|
*d++ = &z80::res1IXH; *d++ = &z80::res1IXL;
|
|
*d++ = &z80::res1IX; *d++ = &z80::res1IXA;
|
|
|
|
// 0x90
|
|
*d++ = &z80::res2IXB; *d++ = &z80::res2IXC;
|
|
*d++ = &z80::res2IXD; *d++ = &z80::res2IXE;
|
|
*d++ = &z80::res2IXH; *d++ = &z80::res2IXL;
|
|
*d++ = &z80::res2IX; *d++ = &z80::res2IXA;
|
|
*d++ = &z80::res3IXB; *d++ = &z80::res3IXC;
|
|
*d++ = &z80::res3IXD; *d++ = &z80::res3IXE;
|
|
*d++ = &z80::res3IXH; *d++ = &z80::res3IXL;
|
|
*d++ = &z80::res3IX; *d++ = &z80::res3IXA;
|
|
|
|
// 0xa0
|
|
*d++ = &z80::res4IXB; *d++ = &z80::res4IXC;
|
|
*d++ = &z80::res4IXD; *d++ = &z80::res4IXE;
|
|
*d++ = &z80::res4IXH; *d++ = &z80::res4IXL;
|
|
*d++ = &z80::res4IX; *d++ = &z80::res4IXA;
|
|
*d++ = &z80::res5IXB; *d++ = &z80::res5IXC;
|
|
*d++ = &z80::res5IXD; *d++ = &z80::res5IXE;
|
|
*d++ = &z80::res5IXH; *d++ = &z80::res5IXL;
|
|
*d++ = &z80::res5IX; *d++ = &z80::res5IXA;
|
|
|
|
// 0xb0
|
|
*d++ = &z80::res6IXB; *d++ = &z80::res6IXC;
|
|
*d++ = &z80::res6IXD; *d++ = &z80::res6IXE;
|
|
*d++ = &z80::res6IXH; *d++ = &z80::res6IXL;
|
|
*d++ = &z80::res6IX; *d++ = &z80::res6IXA;
|
|
*d++ = &z80::res7IXB; *d++ = &z80::res7IXC;
|
|
*d++ = &z80::res7IXD; *d++ = &z80::res7IXE;
|
|
*d++ = &z80::res7IXH; *d++ = &z80::res7IXL;
|
|
*d++ = &z80::res7IX; *d++ = &z80::res7IXA;
|
|
|
|
// 0xc0
|
|
*d++ = &z80::set0IXB; *d++ = &z80::set0IXC;
|
|
*d++ = &z80::set0IXD; *d++ = &z80::set0IXE;
|
|
*d++ = &z80::set0IXH; *d++ = &z80::set0IXL;
|
|
*d++ = &z80::set0IX; *d++ = &z80::set0IXA;
|
|
*d++ = &z80::set1IXB; *d++ = &z80::set1IXC;
|
|
*d++ = &z80::set1IXD; *d++ = &z80::set1IXE;
|
|
*d++ = &z80::set1IXH; *d++ = &z80::set1IXL;
|
|
*d++ = &z80::set1IX; *d++ = &z80::set1IXA;
|
|
|
|
// 0xd0
|
|
*d++ = &z80::set2IXB; *d++ = &z80::set2IXC;
|
|
*d++ = &z80::set2IXD; *d++ = &z80::set2IXE;
|
|
*d++ = &z80::set2IXH; *d++ = &z80::set2IXL;
|
|
*d++ = &z80::set2IX; *d++ = &z80::set2IXA;
|
|
*d++ = &z80::set3IXB; *d++ = &z80::set3IXC;
|
|
*d++ = &z80::set3IXD; *d++ = &z80::set3IXE;
|
|
*d++ = &z80::set3IXH; *d++ = &z80::set3IXL;
|
|
*d++ = &z80::set3IX; *d++ = &z80::set3IXA;
|
|
|
|
// 0xe0
|
|
*d++ = &z80::set4IXB; *d++ = &z80::set4IXC;
|
|
*d++ = &z80::set4IXD; *d++ = &z80::set4IXE;
|
|
*d++ = &z80::set4IXH; *d++ = &z80::set4IXL;
|
|
*d++ = &z80::set4IX; *d++ = &z80::set4IXA;
|
|
*d++ = &z80::set5IXB; *d++ = &z80::set5IXC;
|
|
*d++ = &z80::set5IXD; *d++ = &z80::set5IXE;
|
|
*d++ = &z80::set5IXH; *d++ = &z80::set5IXL;
|
|
*d++ = &z80::set5IX; *d++ = &z80::set5IXA;
|
|
|
|
// 0xf0
|
|
*d++ = &z80::set6IXB; *d++ = &z80::set6IXC;
|
|
*d++ = &z80::set6IXD; *d++ = &z80::set6IXE;
|
|
*d++ = &z80::set6IXH; *d++ = &z80::set6IXL;
|
|
*d++ = &z80::set6IX; *d++ = &z80::set6IXA;
|
|
*d++ = &z80::set7IXB; *d++ = &z80::set7IXC;
|
|
*d++ = &z80::set7IXD; *d++ = &z80::set7IXE;
|
|
*d++ = &z80::set7IXH; *d++ = &z80::set7IXL;
|
|
*d++ = &z80::set7IX; *d++ = &z80::set7IXA;
|
|
|
|
d = _fdcb;
|
|
|
|
// 0x00
|
|
*d++ = &z80::rlcIYB; *d++ = &z80::rlcIYC;
|
|
*d++ = &z80::rlcIYD; *d++ = &z80::rlcIYE;
|
|
*d++ = &z80::rlcIYH; *d++ = &z80::rlcIYL;
|
|
*d++ = &z80::rlcIY; *d++ = &z80::rlcIYA;
|
|
*d++ = &z80::rrcIYB; *d++ = &z80::rrcIYC;
|
|
*d++ = &z80::rrcIYD; *d++ = &z80::rrcIYE;
|
|
*d++ = &z80::rrcIYH; *d++ = &z80::rrcIYL;
|
|
*d++ = &z80::rrcIY; *d++ = &z80::rrcIYA;
|
|
|
|
// 0x10
|
|
*d++ = &z80::rlIYB; *d++ = &z80::rlIYC;
|
|
*d++ = &z80::rlIYD; *d++ = &z80::rlIYE;
|
|
*d++ = &z80::rlIYH; *d++ = &z80::rlIYL;
|
|
*d++ = &z80::rlIY; *d++ = &z80::rlIYA;
|
|
*d++ = &z80::rrIYB; *d++ = &z80::rrIYC;
|
|
*d++ = &z80::rrIYD; *d++ = &z80::rrIYE;
|
|
*d++ = &z80::rrIYH; *d++ = &z80::rrIYL;
|
|
*d++ = &z80::rrIY; *d++ = &z80::rrIYA;
|
|
|
|
// 0x20
|
|
*d++ = &z80::slaIYB; *d++ = &z80::slaIYC;
|
|
*d++ = &z80::slaIYD; *d++ = &z80::slaIYE;
|
|
*d++ = &z80::slaIYH; *d++ = &z80::slaIYL;
|
|
*d++ = &z80::slaIY; *d++ = &z80::slaIYA;
|
|
*d++ = &z80::sraIYB; *d++ = &z80::sraIYC;
|
|
*d++ = &z80::sraIYD; *d++ = &z80::sraIYE;
|
|
*d++ = &z80::sraIYH; *d++ = &z80::sraIYL;
|
|
*d++ = &z80::sraIY; *d++ = &z80::sraIYA;
|
|
|
|
// 0x30
|
|
*d++ = &z80::sllIYB; *d++ = &z80::sllIYC;
|
|
*d++ = &z80::sllIYD; *d++ = &z80::sllIYE;
|
|
*d++ = &z80::sllIYH; *d++ = &z80::sllIYL;
|
|
*d++ = &z80::sllIY; *d++ = &z80::sllIYA;
|
|
*d++ = &z80::srlIYB; *d++ = &z80::srlIYC;
|
|
*d++ = &z80::srlIYD; *d++ = &z80::srlIYE;
|
|
*d++ = &z80::srlIYH; *d++ = &z80::srlIYL;
|
|
*d++ = &z80::srlIY; *d++ = &z80::srlIYA;
|
|
|
|
// 0x40
|
|
*d++ = &z80::bit0IY; *d++ = &z80::bit0IY;
|
|
*d++ = &z80::bit0IY; *d++ = &z80::bit0IY;
|
|
*d++ = &z80::bit0IY; *d++ = &z80::bit0IY;
|
|
*d++ = &z80::bit0IY; *d++ = &z80::bit0IY;
|
|
*d++ = &z80::bit1IY; *d++ = &z80::bit1IY;
|
|
*d++ = &z80::bit1IY; *d++ = &z80::bit1IY;
|
|
*d++ = &z80::bit1IY; *d++ = &z80::bit1IY;
|
|
*d++ = &z80::bit1IY; *d++ = &z80::bit1IY;
|
|
|
|
// 0x50
|
|
*d++ = &z80::bit2IY; *d++ = &z80::bit2IY;
|
|
*d++ = &z80::bit2IY; *d++ = &z80::bit2IY;
|
|
*d++ = &z80::bit2IY; *d++ = &z80::bit2IY;
|
|
*d++ = &z80::bit2IY; *d++ = &z80::bit2IY;
|
|
*d++ = &z80::bit3IY; *d++ = &z80::bit3IY;
|
|
*d++ = &z80::bit3IY; *d++ = &z80::bit3IY;
|
|
*d++ = &z80::bit3IY; *d++ = &z80::bit3IY;
|
|
*d++ = &z80::bit3IY; *d++ = &z80::bit3IY;
|
|
|
|
// 0x60
|
|
*d++ = &z80::bit4IY; *d++ = &z80::bit4IY;
|
|
*d++ = &z80::bit4IY; *d++ = &z80::bit4IY;
|
|
*d++ = &z80::bit4IY; *d++ = &z80::bit4IY;
|
|
*d++ = &z80::bit4IY; *d++ = &z80::bit4IY;
|
|
*d++ = &z80::bit5IY; *d++ = &z80::bit5IY;
|
|
*d++ = &z80::bit5IY; *d++ = &z80::bit5IY;
|
|
*d++ = &z80::bit5IY; *d++ = &z80::bit5IY;
|
|
*d++ = &z80::bit5IY; *d++ = &z80::bit5IY;
|
|
|
|
// 0x70
|
|
*d++ = &z80::bit6IY; *d++ = &z80::bit6IY;
|
|
*d++ = &z80::bit6IY; *d++ = &z80::bit6IY;
|
|
*d++ = &z80::bit6IY; *d++ = &z80::bit6IY;
|
|
*d++ = &z80::bit6IY; *d++ = &z80::bit6IY;
|
|
*d++ = &z80::bit7IY; *d++ = &z80::bit7IY;
|
|
*d++ = &z80::bit7IY; *d++ = &z80::bit7IY;
|
|
*d++ = &z80::bit7IY; *d++ = &z80::bit7IY;
|
|
*d++ = &z80::bit7IY; *d++ = &z80::bit7IY;
|
|
|
|
// 0x80
|
|
*d++ = &z80::res0IYB; *d++ = &z80::res0IYC;
|
|
*d++ = &z80::res0IYD; *d++ = &z80::res0IYE;
|
|
*d++ = &z80::res0IYH; *d++ = &z80::res0IYL;
|
|
*d++ = &z80::res0IY; *d++ = &z80::res0IYA;
|
|
*d++ = &z80::res1IYB; *d++ = &z80::res1IYC;
|
|
*d++ = &z80::res1IYD; *d++ = &z80::res1IYE;
|
|
*d++ = &z80::res1IYH; *d++ = &z80::res1IYL;
|
|
*d++ = &z80::res1IY; *d++ = &z80::res1IYA;
|
|
|
|
// 0x90
|
|
*d++ = &z80::res2IYB; *d++ = &z80::res2IYC;
|
|
*d++ = &z80::res2IYD; *d++ = &z80::res2IYE;
|
|
*d++ = &z80::res2IYH; *d++ = &z80::res2IYL;
|
|
*d++ = &z80::res2IY; *d++ = &z80::res2IYA;
|
|
*d++ = &z80::res3IYB; *d++ = &z80::res3IYC;
|
|
*d++ = &z80::res3IYD; *d++ = &z80::res3IYE;
|
|
*d++ = &z80::res3IYH; *d++ = &z80::res3IYL;
|
|
*d++ = &z80::res3IY; *d++ = &z80::res3IYA;
|
|
|
|
// 0xa0
|
|
*d++ = &z80::res4IYB; *d++ = &z80::res4IYC;
|
|
*d++ = &z80::res4IYD; *d++ = &z80::res4IYE;
|
|
*d++ = &z80::res4IYH; *d++ = &z80::res4IYL;
|
|
*d++ = &z80::res4IY; *d++ = &z80::res4IYA;
|
|
*d++ = &z80::res5IYB; *d++ = &z80::res5IYC;
|
|
*d++ = &z80::res5IYD; *d++ = &z80::res5IYE;
|
|
*d++ = &z80::res5IYH; *d++ = &z80::res5IYL;
|
|
*d++ = &z80::res5IY; *d++ = &z80::res5IYA;
|
|
|
|
// 0xb0
|
|
*d++ = &z80::res6IYB; *d++ = &z80::res6IYC;
|
|
*d++ = &z80::res6IYD; *d++ = &z80::res6IYE;
|
|
*d++ = &z80::res6IYH; *d++ = &z80::res6IYL;
|
|
*d++ = &z80::res6IY; *d++ = &z80::res6IYA;
|
|
*d++ = &z80::res7IYB; *d++ = &z80::res7IYC;
|
|
*d++ = &z80::res7IYD; *d++ = &z80::res7IYE;
|
|
*d++ = &z80::res7IYH; *d++ = &z80::res7IYL;
|
|
*d++ = &z80::res7IY; *d++ = &z80::res7IYA;
|
|
|
|
// 0xc0
|
|
*d++ = &z80::set0IYB; *d++ = &z80::set0IYC;
|
|
*d++ = &z80::set0IYD; *d++ = &z80::set0IYE;
|
|
*d++ = &z80::set0IYH; *d++ = &z80::set0IYL;
|
|
*d++ = &z80::set0IY; *d++ = &z80::set0IYA;
|
|
*d++ = &z80::set1IYB; *d++ = &z80::set1IYC;
|
|
*d++ = &z80::set1IYD; *d++ = &z80::set1IYE;
|
|
*d++ = &z80::set1IYH; *d++ = &z80::set1IYL;
|
|
*d++ = &z80::set1IY; *d++ = &z80::set1IYA;
|
|
|
|
// 0xd0
|
|
*d++ = &z80::set2IYB; *d++ = &z80::set2IYC;
|
|
*d++ = &z80::set2IYD; *d++ = &z80::set2IYE;
|
|
*d++ = &z80::set2IYH; *d++ = &z80::set2IYL;
|
|
*d++ = &z80::set2IY; *d++ = &z80::set2IYA;
|
|
*d++ = &z80::set3IYB; *d++ = &z80::set3IYC;
|
|
*d++ = &z80::set3IYD; *d++ = &z80::set3IYE;
|
|
*d++ = &z80::set3IYH; *d++ = &z80::set3IYL;
|
|
*d++ = &z80::set3IY; *d++ = &z80::set3IYA;
|
|
|
|
// 0xe0
|
|
*d++ = &z80::set4IYB; *d++ = &z80::set4IYC;
|
|
*d++ = &z80::set4IYD; *d++ = &z80::set4IYE;
|
|
*d++ = &z80::set4IYH; *d++ = &z80::set4IYL;
|
|
*d++ = &z80::set4IY; *d++ = &z80::set4IYA;
|
|
*d++ = &z80::set5IYB; *d++ = &z80::set5IYC;
|
|
*d++ = &z80::set5IYD; *d++ = &z80::set5IYE;
|
|
*d++ = &z80::set5IYH; *d++ = &z80::set5IYL;
|
|
*d++ = &z80::set5IY; *d++ = &z80::set5IYA;
|
|
|
|
// 0xf0
|
|
*d++ = &z80::set6IYB; *d++ = &z80::set6IYC;
|
|
*d++ = &z80::set6IYD; *d++ = &z80::set6IYE;
|
|
*d++ = &z80::set6IYH; *d++ = &z80::set6IYL;
|
|
*d++ = &z80::set6IY; *d++ = &z80::set6IYA;
|
|
*d++ = &z80::set7IYB; *d++ = &z80::set7IYC;
|
|
*d++ = &z80::set7IYD; *d++ = &z80::set7IYE;
|
|
*d++ = &z80::set7IYH; *d++ = &z80::set7IYL;
|
|
*d++ = &z80::set7IY; *d++ = &z80::set7IYA;
|
|
}
|