/********************************************************************************/ /* */ /* CZ80 CB opcode include source file */ /* C Z80 emulator version 0.91 */ /* Copyright 2004-2005 Stephane Dallongeville */ /* */ /********************************************************************************/ #if CZ80_USE_JUMPTABLE goto *JumpTableCB[Opcode]; #else switch (Opcode) { #endif OPCB(0x00): // RLC B OPCB(0x01): // RLC C OPCB(0x02): // RLC D OPCB(0x03): // RLC E OPCB(0x04): // RLC H OPCB(0x05): // RLC L OPCB(0x07): // RLC A { uint8_t src = zR8(Opcode); zR8(Opcode) = (src << 1) | (src >> 7); zF = SZXYP[zR8(Opcode)] | (src >> 7); RET(4 + 4) } OPCB(0x06): // RLC (HL) { uint16_t adr; uint8_t src; uint8_t res; PRE_IO adr = zHL; READ_BYTE(adr, src) res = ((src << 1) | (src >> 7)) & 0xFF; zF = SZXYP[res] | (src >> 7); WRITE_BYTE(adr, res) POST_IO RET(11 + 4) } OPCB(0x08): // RRC B OPCB(0x09): // RRC C OPCB(0x0a): // RRC D OPCB(0x0b): // RRC E OPCB(0x0c): // RRC H OPCB(0x0d): // RRC L OPCB(0x0f): // RRC A { uint8_t src = zR8(Opcode & 7); zR8(Opcode & 7) = (src >> 1) | (src << 7); zF = SZXYP[zR8(Opcode & 7)] | (src & CZ80_CF); RET(4 + 4) } OPCB(0x0e): // RRC (HL) { uint16_t adr; uint8_t src; uint8_t res; PRE_IO adr = zHL; READ_BYTE(adr, src) res = ((src >> 1) | (src << 7)) & 0xFF; zF = SZXYP[res] | (src & CZ80_CF); WRITE_BYTE(adr, res) POST_IO RET(11 + 4) } OPCB(0x10): // RL B OPCB(0x11): // RL C OPCB(0x12): // RL D OPCB(0x13): // RL E OPCB(0x14): // RL H OPCB(0x15): // RL L OPCB(0x17): // RL A { uint8_t src = zR8(Opcode & 7); zR8(Opcode & 7) = (src << 1) | (zF & CZ80_CF); zF = SZXYP[zR8(Opcode & 7)] | (src >> 7); } RET(4 + 4) OPCB(0x16): // RL (HL) { uint16_t adr; uint8_t src; uint8_t res; PRE_IO adr = zHL; READ_BYTE(adr, src) res = ((src << 1) | (zF & CZ80_CF)) & 0xFF; zF = SZXYP[res] | (src >> 7); WRITE_BYTE(adr, res) POST_IO RET(11 + 4) } OPCB(0x18): // RR B OPCB(0x19): // RR C OPCB(0x1a): // RR D OPCB(0x1b): // RR E OPCB(0x1c): // RR H OPCB(0x1d): // RR L OPCB(0x1f): // RR A { uint8_t src = zR8(Opcode & 7); zR8(Opcode & 7) = (src >> 1) | (zF << 7); zF = SZXYP[zR8(Opcode & 7)] | (src & CZ80_CF); } RET(4 + 4) OPCB(0x1e): // RR (HL) { uint16_t adr; uint8_t src; uint8_t res; PRE_IO adr = zHL; READ_BYTE(adr, src) res = ((src >> 1) | (zF << 7)) & 0xFF; zF = SZXYP[res] | (src & CZ80_CF); WRITE_BYTE(adr, res) POST_IO RET(11 + 4) } OPCB(0x20): // SLA B OPCB(0x21): // SLA C OPCB(0x22): // SLA D OPCB(0x23): // SLA E OPCB(0x24): // SLA H OPCB(0x25): // SLA L OPCB(0x27): // SLA A { uint8_t src = zR8(Opcode & 7); zR8(Opcode & 7) = src << 1; zF = SZXYP[zR8(Opcode & 7)] | (src >> 7); } RET(4 + 4) OPCB(0x26): // SLA (HL) { uint16_t adr; uint8_t src; uint8_t res; PRE_IO adr = zHL; READ_BYTE(adr, src) res = (src << 1) & 0xFF; zF = SZXYP[res] | (src >> 7); WRITE_BYTE(adr, res) POST_IO RET(11 + 4) } OPCB(0x28): // SRA B OPCB(0x29): // SRA C OPCB(0x2a): // SRA D OPCB(0x2b): // SRA E OPCB(0x2c): // SRA H OPCB(0x2d): // SRA L OPCB(0x2f): // SRA A { int8_t src = zR8(Opcode & 7); zR8(Opcode & 7) = src >> 1; zF = SZXYP[zR8(Opcode & 7)] | (src & CZ80_CF); } RET(4 + 4) OPCB(0x2e): // SRA (HL) { uint16_t adr; uint8_t src; uint8_t res; PRE_IO adr = zHL; READ_BYTE(adr, src) res = (uint8_t)(((int8_t)(src)) >> 1); zF = SZXYP[res] | (src & CZ80_CF); WRITE_BYTE(adr, res) POST_IO RET(11 + 4) } OPCB(0x30): // SLL B OPCB(0x31): // SLL C OPCB(0x32): // SLL D OPCB(0x33): // SLL E OPCB(0x34): // SLL H OPCB(0x35): // SLL L OPCB(0x37): // SLL A { uint8_t src = zR8(Opcode & 7); zR8(Opcode & 7) = (src << 1) | 1; zF = SZXYP[zR8(Opcode & 7)] | (src >> 7); } RET(4 + 4) OPCB(0x36): // SLL (HL) { uint16_t adr; uint8_t src; uint8_t res; PRE_IO adr = zHL; READ_BYTE(adr, src) res = ((src << 1) | 1) & 0xFF; zF = SZXYP[res] | (src >> 7); WRITE_BYTE(adr, res) POST_IO RET(11 + 4) } OPCB(0x38): // SRL B OPCB(0x39): // SRL C OPCB(0x3a): // SRL D OPCB(0x3b): // SRL E OPCB(0x3c): // SRL H OPCB(0x3d): // SRL L OPCB(0x3f): // SRL A { uint8_t src = zR8(Opcode & 7); zR8(Opcode & 7) = src >> 1; zF = SZXYP[zR8(Opcode & 7)] | (src & CZ80_CF); } RET(4 + 4) OPCB(0x3e): // SRL (HL) { uint16_t adr; uint8_t src; uint8_t res; PRE_IO adr = zHL; READ_BYTE(adr, src) res = src >> 1; zF = SZXYP[res] | (src & CZ80_CF); WRITE_BYTE(adr, res) POST_IO RET(11 + 4) } OPCB(0x40): // BIT 0,B OPCB(0x41): // BIT 0,C OPCB(0x42): // BIT 0,D OPCB(0x43): // BIT 0,E OPCB(0x44): // BIT 0,H OPCB(0x45): // BIT 0,L OPCB(0x47): // BIT 0,A OPCB(0x48): // BIT 1,B OPCB(0x49): // BIT 1,C OPCB(0x4a): // BIT 1,D OPCB(0x4b): // BIT 1,E OPCB(0x4c): // BIT 1,H OPCB(0x4d): // BIT 1,L OPCB(0x4f): // BIT 1,A OPCB(0x50): // BIT 2,B OPCB(0x51): // BIT 2,C OPCB(0x52): // BIT 2,D OPCB(0x53): // BIT 2,E OPCB(0x54): // BIT 2,H OPCB(0x55): // BIT 2,L OPCB(0x57): // BIT 2,A OPCB(0x58): // BIT 3,B OPCB(0x59): // BIT 3,C OPCB(0x5a): // BIT 3,D OPCB(0x5b): // BIT 3,E OPCB(0x5c): // BIT 3,H OPCB(0x5d): // BIT 3,L OPCB(0x5f): // BIT 3,A OPCB(0x60): // BIT 4,B OPCB(0x61): // BIT 4,C OPCB(0x62): // BIT 4,D OPCB(0x63): // BIT 4,E OPCB(0x64): // BIT 4,H OPCB(0x65): // BIT 4,L OPCB(0x67): // BIT 4,A OPCB(0x68): // BIT 5,B OPCB(0x69): // BIT 5,C OPCB(0x6a): // BIT 5,D OPCB(0x6b): // BIT 5,E OPCB(0x6c): // BIT 5,H OPCB(0x6d): // BIT 5,L OPCB(0x6f): // BIT 5,A OPCB(0x70): // BIT 6,B OPCB(0x71): // BIT 6,C OPCB(0x72): // BIT 6,D OPCB(0x73): // BIT 6,E OPCB(0x74): // BIT 6,H OPCB(0x75): // BIT 6,L OPCB(0x77): // BIT 6,A OPCB(0x78): // BIT 7,B OPCB(0x79): // BIT 7,C OPCB(0x7a): // BIT 7,D OPCB(0x7b): // BIT 7,E OPCB(0x7c): // BIT 7,H OPCB(0x7d): // BIT 7,L OPCB(0x7f): // BIT 7,A { zF = (zF & CZ80_CF) | CZ80_HF | SZXY_BIT[zR8(Opcode & 7) & (1 << ((Opcode >> 3) & 7))]; } RET(4 + 4) OPCB(0x46): // BIT 0,(HL) OPCB(0x4e): // BIT 1,(HL) OPCB(0x56): // BIT 2,(HL) OPCB(0x5e): // BIT 3,(HL) OPCB(0x66): // BIT 4,(HL) OPCB(0x6e): // BIT 5,(HL) OPCB(0x76): // BIT 6,(HL) OPCB(0x7e): // BIT 7,(HL) { uint8_t src; uint8_t bitm; PRE_IO bitm = 1 << ((Opcode >> 3) & 7); READ_BYTE(zHL, src) zF = (zF & CZ80_CF) | CZ80_HF | SZXY_BIT[src & bitm]; POST_IO RET(8 + 4) } OPCB(0x80): // RES 0,B OPCB(0x81): // RES 0,C OPCB(0x82): // RES 0,D OPCB(0x83): // RES 0,E OPCB(0x84): // RES 0,H OPCB(0x85): // RES 0,L OPCB(0x87): // RES 0,A OPCB(0x88): // RES 1,B OPCB(0x89): // RES 1,C OPCB(0x8a): // RES 1,D OPCB(0x8b): // RES 1,E OPCB(0x8c): // RES 1,H OPCB(0x8d): // RES 1,L OPCB(0x8f): // RES 1,A OPCB(0x90): // RES 2,B OPCB(0x91): // RES 2,C OPCB(0x92): // RES 2,D OPCB(0x93): // RES 2,E OPCB(0x94): // RES 2,H OPCB(0x95): // RES 2,L OPCB(0x97): // RES 2,A OPCB(0x98): // RES 3,B OPCB(0x99): // RES 3,C OPCB(0x9a): // RES 3,D OPCB(0x9b): // RES 3,E OPCB(0x9c): // RES 3,H OPCB(0x9d): // RES 3,L OPCB(0x9f): // RES 3,A OPCB(0xa0): // RES 4,B OPCB(0xa1): // RES 4,C OPCB(0xa2): // RES 4,D OPCB(0xa3): // RES 4,E OPCB(0xa4): // RES 4,H OPCB(0xa5): // RES 4,L OPCB(0xa7): // RES 4,A OPCB(0xa8): // RES 5,B OPCB(0xa9): // RES 5,C OPCB(0xaa): // RES 5,D OPCB(0xab): // RES 5,E OPCB(0xac): // RES 5,H OPCB(0xad): // RES 5,L OPCB(0xaf): // RES 5,A OPCB(0xb0): // RES 6,B OPCB(0xb1): // RES 6,C OPCB(0xb2): // RES 6,D OPCB(0xb3): // RES 6,E OPCB(0xb4): // RES 6,H OPCB(0xb5): // RES 6,L OPCB(0xb7): // RES 6,A OPCB(0xb8): // RES 7,B OPCB(0xb9): // RES 7,C OPCB(0xba): // RES 7,D OPCB(0xbb): // RES 7,E OPCB(0xbc): // RES 7,H OPCB(0xbd): // RES 7,L OPCB(0xbf): // RES 7,A { zR8(Opcode & 7) &= ~(1 << ((Opcode >> 3) & 7)); } RET(4 + 4) OPCB(0x86): // RES 0,(HL) OPCB(0x8e): // RES 1,(HL) OPCB(0x96): // RES 2,(HL) OPCB(0x9e): // RES 3,(HL) OPCB(0xa6): // RES 4,(HL) OPCB(0xae): // RES 5,(HL) OPCB(0xb6): // RES 6,(HL) OPCB(0xbe): // RES 7,(HL) { uint16_t adr; uint8_t res; uint8_t bitm; PRE_IO adr = zHL; bitm = ~(1 << ((Opcode >> 3) & 7)); READ_BYTE(adr, res) res &= bitm; WRITE_BYTE(adr, res) POST_IO RET(11 + 4) } OPCB(0xc0): // SET 0,B OPCB(0xc1): // SET 0,C OPCB(0xc2): // SET 0,D OPCB(0xc3): // SET 0,E OPCB(0xc4): // SET 0,H OPCB(0xc5): // SET 0,L OPCB(0xc7): // SET 0,A OPCB(0xc8): // SET 1,B OPCB(0xc9): // SET 1,C OPCB(0xca): // SET 1,D OPCB(0xcb): // SET 1,E OPCB(0xcc): // SET 1,H OPCB(0xcd): // SET 1,L OPCB(0xcf): // SET 1,A OPCB(0xd0): // SET 2,B OPCB(0xd1): // SET 2,C OPCB(0xd2): // SET 2,D OPCB(0xd3): // SET 2,E OPCB(0xd4): // SET 2,H OPCB(0xd5): // SET 2,L OPCB(0xd7): // SET 2,A OPCB(0xd8): // SET 3,B OPCB(0xd9): // SET 3,C OPCB(0xda): // SET 3,D OPCB(0xdb): // SET 3,E OPCB(0xdc): // SET 3,H OPCB(0xdd): // SET 3,L OPCB(0xdf): // SET 3,A OPCB(0xe0): // SET 4,B OPCB(0xe1): // SET 4,C OPCB(0xe2): // SET 4,D OPCB(0xe3): // SET 4,E OPCB(0xe4): // SET 4,H OPCB(0xe5): // SET 4,L OPCB(0xe7): // SET 4,A OPCB(0xe8): // SET 5,B OPCB(0xe9): // SET 5,C OPCB(0xea): // SET 5,D OPCB(0xeb): // SET 5,E OPCB(0xec): // SET 5,H OPCB(0xed): // SET 5,L OPCB(0xef): // SET 5,A OPCB(0xf0): // SET 6,B OPCB(0xf1): // SET 6,C OPCB(0xf2): // SET 6,D OPCB(0xf3): // SET 6,E OPCB(0xf4): // SET 6,H OPCB(0xf5): // SET 6,L OPCB(0xf7): // SET 6,A OPCB(0xf8): // SET 7,B OPCB(0xf9): // SET 7,C OPCB(0xfa): // SET 7,D OPCB(0xfb): // SET 7,E OPCB(0xfc): // SET 7,H OPCB(0xfd): // SET 7,L OPCB(0xff): // SET 7,A { zR8(Opcode & 7) |= 1 << ((Opcode >> 3) & 7); } RET(4 + 4) OPCB(0xc6): // SET 0,(HL) OPCB(0xce): // SET 1,(HL) OPCB(0xd6): // SET 2,(HL) OPCB(0xde): // SET 3,(HL) OPCB(0xe6): // SET 4,(HL) OPCB(0xee): // SET 5,(HL) OPCB(0xf6): // SET 6,(HL) OPCB(0xfe): // SET 7,(HL) { uint16_t adr; uint8_t res; uint8_t bitm; PRE_IO adr = zHL; bitm = 1 << ((Opcode >> 3) & 7); READ_BYTE(adr, res) res |= bitm; WRITE_BYTE(adr, res) POST_IO RET(11 + 4) } #if CZ80_USE_JUMPTABLE #else } #endif