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