mc6809 start disassembler

This commit is contained in:
alyosha-tas 2019-04-06 19:42:07 -05:00
parent 87214c252d
commit 10d1c230f3
6 changed files with 852 additions and 597 deletions

View File

@ -1527,11 +1527,11 @@
<Compile Include="CPUs\MC6809\Execute.cs" />
<Compile Include="CPUs\MC6809\Interrupts.cs" />
<Compile Include="CPUs\MC6809\MC6809.cs" />
<Compile Include="CPUs\MC6809\NewDisassembler.cs" />
<Compile Include="CPUs\MC6809\Disassembler.cs" />
<Compile Include="CPUs\MC6809\Operations.cs" />
<Compile Include="CPUs\MC6809\Registers.cs" />
<Compile Include="CPUs\MC6809\Indexed_Modes.cs" />
<Compile Include="CPUs\MC6809\Tables_Direct.cs" />
<Compile Include="CPUs\MC6809\OP_Tables.cs" />
<Compile Include="CPUs\LR35902\Execute.cs" />
<Compile Include="CPUs\LR35902\Interrupts.cs" />
<Compile Include="CPUs\LR35902\LR35902.cs" />

View File

@ -0,0 +1,850 @@
using System;
using System.Collections.Generic;
using System.Text;
namespace BizHawk.Emulation.Common.Components.MC6809
{
public sealed partial class MC6809
{
static string[] table =
{
"NEG DP,i8", // 00
"???", // 01
"???", // 02
"COM DP,i8", // 03
"LSR DP,i8", // 04
"???", // 05
"ROR DP,i8", // 06
"ASR DP,i8", // 07
"ASL DP,i8", // 08
"ROL DP,i8", // 09
"DEC DP,i8", // 0a
"???", // 0b
"INC DP,i8", // 0c
"TST DP,i8", // 0d
"JMP DP,i8", // 0e
"CLR DP,i8", // 0f
"PAGE 2", // 10
"PAGE 3", // 11
"NOP", // 12
"SYNC", // 13
"???", // 14
"???", // 15
"LBRA i16", // 16
"LBSR i16", // 17
"???", // 18
"DAA", // 19
"ORCC i8", // 1a
"???", // 1b
"ANDCC i8", // 1c
"SEX", // 1d
"EXG i8", // 1e
"TFR i8", // 1f
"BRA i8", // 20
"BRN i8", // 21
"BHI i8", // 22
"BLS i8", // 23
"BHS i8", // 24
"BLO i8", // 25
"BNE i8", // 26
"BEQ i8", // 27
"BVC i8", // 28
"BVS i8", // 29
"BPL i8", // 2a
"BMI i8", // 2b
"BGE i8", // 2c
"BLT i8", // 2d
"BGT i8", // 2e
"BLE i8", // 2f
"LEAX ix16", // 30
"LEAY ix16", // 31
"LEAS ix16", // 32
"LEAU ix16", // 33
"PSHS i8", // 34
"PULS i8", // 35
"PSHU i8", // 36
"PULU i8", // 37
"???", // 38
"RTS", // 39
"ABX", // 3a
"RTI", // 3b
"CWAI", // 3c
"MUL", // 3d
"???", // 3e
"SWI1", // 3f
"NEG A", // 40
"???", // 41
"???", // 42
"COM A", // 43
"LSR A", // 44
"???", // 45
"ROR A", // 46
"ASR A", // 47
"ASL A", // 48
"ROL A", // 49
"DEC A", // 4a
"???", // 4b
"INC A", // 4c
"TST A", // 4d
"???", // 4e
"CLR A", // 4f
"NEG B", // 50
"???", // 51
"???", // 52
"COM B", // 53
"LSR B", // 54
"???", // 55
"ROR B", // 56
"ASR B", // 57
"ASL B", // 58
"ROL B", // 59
"DEC B", // 5a
"???", // 5b
"INC B", // 5c
"TST B", // 5d
"???", // 5e
"CLR B", // 5f
"NEG ix16", // 60
"???", // 61
"???", // 62
"COM ix16", // 63
"LSR ix16", // 64
"???", // 65
"ROR ix16", // 66
"ASR ix16", // 67
"ASL ix16", // 68
"ROL ix16", // 69
"DEC ix16", // 6a
"???", // 6b
"INC ix16", // 6c
"TST ix16", // 6d
"JMP ix16", // 6e
"CLR ix16", // 6f
"NEG ex16", // 70
"???", // 71
"???", // 72
"COM ex16", // 73
"LSR ex16", // 74
"???", // 75
"ROR ex16", // 76
"ASR ex16", // 77
"ASL ex16", // 78
"ROL ex16", // 79
"DEC ex16", // 7a
"???", // 7b
"INC ex16", // 7c
"TST ex16", // 7d
"JMP ex16", // 7e
"CLR ex16", // 7f
"ADD A,B", // 80
"ADD A,C", // 81
"ADD A,D", // 82
"ADD A,E", // 83
"ADD A,H", // 84
"ADD A,L", // 85
"ADD A,(HL)", // 86
"ADD A,A", // 87
"ADC A,B", // 88
"ADC A,C", // 89
"ADC A,D", // 8a
"ADC A,E", // 8b
"ADC A,H", // 8c
"ADC A,L", // 8d
"ADC A,(HL)", // 8e
"ADC A,A", // 8f
"SUB B", // 90
"SUB C", // 91
"SUB D", // 92
"SUB E", // 93
"SUB H", // 94
"SUB L", // 95
"SUB (HL)", // 96
"SUB A", // 97
"SBC A,B", // 98
"SBC A,C", // 99
"SBC A,D", // 9a
"SBC A,E", // 9b
"SBC A,H", // 9c
"SBC A,L", // 9d
"SBC A,(HL)", // 9e
"SBC A,A", // 9f
"AND B", // a0
"AND C", // a1
"AND D", // a2
"AND E", // a3
"AND H", // a4
"AND L", // a5
"AND (HL)", // a6
"AND A", // a7
"XOR B", // a8
"XOR C", // a9
"XOR D", // aa
"XOR E", // ab
"XOR H", // ac
"XOR L", // ad
"XOR (HL)", // ae
"XOR A", // af
"OR B", // b0
"OR C", // b1
"OR D", // b2
"OR E", // b3
"OR H", // b4
"OR L", // b5
"OR (HL)", // b6
"OR A", // b7
"CP B", // b8
"CP C", // b9
"CP D", // ba
"CP E", // bb
"CP H", // bc
"CP L", // bd
"CP (HL)", // be
"CP A", // bf
"RET NZ", // c0
"POP BC", // c1
"JP NZ,a16", // c2
"JP a16", // c3
"CALL NZ,a16", // c4
"PUSH BC", // c5
"ADD A,d8", // c6
"RST 00H", // c7
"RET Z", // c8
"RET", // c9
"JP Z,a16", // ca
"PREFIX CB", // cb
"CALL Z,a16", // cc
"CALL a16", // cd
"ADC A,d8", // ce
"RST 08H", // cf
"RET NC", // d0
"POP DE", // d1
"JP NC,a16", // d2
"???", // d3
"CALL NC,a16", // d4
"PUSH DE", // d5
"SUB d8", // d6
"RST 10H", // d7
"RET C", // d8
"RETI", // d9
"JP C,a16", // da
"???", // db
"CALL C,a16", // dc
"???", // dd
"SBC A,d8", // de
"RST 18H", // df
"LDH (a8),A", // e0
"POP HL", // e1
"LD (C),A", // e2
"???", // e3
"???", // e4
"PUSH HL", // e5
"AND d8", // e6
"RST 20H", // e7
"ADD SP,r8", // e8
"JP (HL)", // e9
"LD (a16),A", // ea
"???", // eb
"???", // ec
"???", // ed
"XOR d8", // ee
"RST 28H", // ef
"LDH A,(a8)", // f0
"POP AF", // f1
"LD A,(C)", // f2
"DI", // f3
"???", // f4
"PUSH AF", // f5
"OR d8", // f6
"RST 30H", // f7
"LD HL,SP+r8", // f8
"LD SP,HL", // f9
"LD A,(a16)", // fa
"EI ", // fb
"???", // fc
"???", // fd
"CP d8", // fe
"RST 38H", // ff
};
static string[] table2 =
{
"???", // 00
"???", // 01
"???", // 02
"???", // 03
"???", // 04
"???", // 05
"???", // 06
"???", // 07
"???", // 08
"???", // 09
"???", // 0a
"???", // 0b
"???", // 0c
"???", // 0d
"???", // 0e
"???", // 0f
"???", // 10
"???", // 11
"???", // 12
"???", // 13
"???", // 14
"???", // 15
"???", // 16
"???", // 17
"???", // 18
"???", // 19
"???", // 1a
"???", // 1b
"???", // 1c
"???", // 1d
"???", // 1e
"???", // 1f
"???", // 20
"LBRN i16", // 21
"LBHI i16", // 22
"LBLS i16", // 23
"LBHS i16", // 24
"LBLO i16", // 25
"LBNE i16", // 26
"LBEQ i16", // 27
"LBVC i16", // 28
"LBVS i16", // 29
"LBPL i16", // 2a
"LBMI i16", // 2b
"LBGE i16", // 2c
"LBLT i16", // 2d
"LBGT i16", // 2e
"LBLE i16", // 2f
"???", // 30
"???", // 31
"???", // 32
"???", // 33
"???", // 34
"???", // 35
"???", // 36
"???", // 37
"???", // 38
"???", // 39
"???", // 3a
"???", // 3b
"???", // 3c
"???", // 3d
"???", // 3e
"SWI2", // 3f
"???", // 40
"???", // 41
"???", // 42
"???", // 43
"???", // 44
"???", // 45
"???", // 46
"???", // 47
"???", // 48
"???", // 49
"???", // 4a
"???", // 4b
"???", // 4c
"???", // 4d
"???", // 4e
"???", // 4f
"???", // 50
"???", // 51
"???", // 52
"???", // 53
"???", // 54
"???", // 55
"???", // 56
"???", // 57
"???", // 58
"???", // 59
"???", // 5a
"???", // 5b
"???", // 5c
"???", // 5d
"???", // 5e
"???", // 5f
"???", // 60
"???", // 61
"???", // 62
"???", // 63
"???", // 64
"???", // 65
"???", // 66
"???", // 67
"???", // 68
"???", // 69
"???", // 6a
"???", // 6b
"???", // 6c
"???", // 6d
"???", // 6e
"???", // 6f
"???", // 70
"???", // 71
"???", // 72
"???", // 73
"???", // 74
"???", // 75
"???", // 76
"???", // 77
"???", // 78
"???", // 79
"???", // 7a
"???", // 7b
"???", // 7c
"???", // 7d
"???", // 7e
"???", // 7f
"???", // 80
"???", // 81
"???", // 82
"CMP D,(i16)", // 83
"???", // 84
"???", // 85
"???", // 86
"???", // 87
"???", // 88
"???", // 89
"???", // 8a
"???", // 8b
"CMP Y,(i16)", // 8c
"???", // 8d
"LD Y,(i16)", // 8e
"???", // 8f
"???", // 90
"???", // 91
"???", // 92
"CMP D,(DP+i8)", // 93
"???", // 94
"???", // 95
"???", // 96
"???", // 97
"???", // 98
"???", // 99
"???", // 9a
"???", // 9b
"CMP Y,(DP+i8)", // 9c
"???", // 9d
"LD Y,(DP+i8)", // 9e
"ST Y,(DP+i8)", // 9f
"???", // a0
"???", // a1
"???", // a2
"AND E", // a3
"???", // a4
"???", // a5
"???", // a6
"???", // a7
"???", // a8
"???", // a9
"???", // aa
"???", // ab
"XOR H", // ac
"???", // ad
"XOR (HL)", // ae
"XOR A", // af
"OR B", // b0
"OR C", // b1
"OR D", // b2
"OR E", // b3
"OR H", // b4
"OR L", // b5
"OR (HL)", // b6
"OR A", // b7
"CP B", // b8
"CP C", // b9
"CP D", // ba
"CP E", // bb
"CP H", // bc
"CP L", // bd
"CP (HL)", // be
"CP A", // bf
"RET NZ", // c0
"POP BC", // c1
"JP NZ,a16", // c2
"JP a16", // c3
"CALL NZ,a16", // c4
"PUSH BC", // c5
"ADD A,d8", // c6
"RST 00H", // c7
"RET Z", // c8
"RET", // c9
"JP Z,a16", // ca
"PREFIX CB", // cb
"CALL Z,a16", // cc
"CALL a16", // cd
"ADC A,d8", // ce
"RST 08H", // cf
"RET NC", // d0
"POP DE", // d1
"JP NC,a16", // d2
"???", // d3
"CALL NC,a16", // d4
"PUSH DE", // d5
"SUB d8", // d6
"RST 10H", // d7
"RET C", // d8
"RETI", // d9
"JP C,a16", // da
"???", // db
"CALL C,a16", // dc
"???", // dd
"SBC A,d8", // de
"RST 18H", // df
"LDH (a8),A", // e0
"POP HL", // e1
"LD (C),A", // e2
"???", // e3
"???", // e4
"PUSH HL", // e5
"AND d8", // e6
"RST 20H", // e7
"ADD SP,r8", // e8
"JP (HL)", // e9
"LD (a16),A", // ea
"???", // eb
"???", // ec
"???", // ed
"XOR d8", // ee
"RST 28H", // ef
"LDH A,(a8)", // f0
"POP AF", // f1
"LD A,(C)", // f2
"DI", // f3
"???", // f4
"PUSH AF", // f5
"OR d8", // f6
"RST 30H", // f7
"LD HL,SP+r8", // f8
"LD SP,HL", // f9
"LD A,(a16)", // fa
"EI ", // fb
"???", // fc
"???", // fd
"CP d8", // fe
"RST 38H", // ff
};
static string[] table3 =
{
"NEG DP,i8", // 00
"???", // 01
"???", // 02
"COM DP,i8", // 03
"LSR DP,i8", // 04
"???", // 05
"ROR DP,i8", // 06
"ASR DP,i8", // 07
"ASL DP,i8", // 08
"ROL DP,i8", // 09
"DEC DP,i8", // 0a
"???", // 0b
"INC DP,i8", // 0c
"TST DP,i8", // 0d
"JMP DP,i8", // 0e
"CLR DP,i8", // 0f
"PAGE 2", // 10
"PAGE 3", // 11
"NOP", // 12
"SYNC", // 13
"???", // 14
"???", // 15
"LBRA i16", // 16
"LBSR i16", // 17
"???", // 18
"DAA", // 19
"ORCC i8", // 1a
"???", // 1b
"ANDCC i8", // 1c
"SEX", // 1d
"EXG i8", // 1e
"TFR i8", // 1f
"BRA i8", // 20
"BRN i8", // 21
"BHI i8", // 22
"BLS i8", // 23
"BHS i8", // 24
"BLO i8", // 25
"BNE i8", // 26
"BEQ i8", // 27
"BVC i8", // 28
"BVS i8", // 29
"BPL i8", // 2a
"BMI i8", // 2b
"BGE i8", // 2c
"BLT i8", // 2d
"BGT i8", // 2e
"BLE i8", // 2f
"LEAX ix16", // 30
"LEAY ix16", // 31
"LEAS ix16", // 32
"LEAU ix16", // 33
"PSHS i8", // 34
"PULS i8", // 35
"PSHU i8", // 36
"PULU i8", // 37
"???", // 38
"RTS", // 39
"ABX", // 3a
"RTI", // 3b
"CWAI", // 3c
"MUL", // 3d
"???", // 3e
"SWI1", // 3f
"NEG A", // 40
"???", // 41
"???", // 42
"COM A", // 43
"LSR A", // 44
"???", // 45
"ROR A", // 46
"ASR A", // 47
"ASL A", // 48
"ROL A", // 49
"DEC A", // 4a
"???", // 4b
"INC A", // 4c
"TST A", // 4d
"???", // 4e
"CLR A", // 4f
"NEG B", // 50
"???", // 51
"???", // 52
"COM B", // 53
"LSR B", // 54
"???", // 55
"ROR B", // 56
"ASR B", // 57
"ASL B", // 58
"ROL B", // 59
"DEC B", // 5a
"???", // 5b
"INC B", // 5c
"TST B", // 5d
"???", // 5e
"CLR B", // 5f
"NEG ix16", // 60
"???", // 61
"???", // 62
"COM ix16", // 63
"LSR ix16", // 64
"???", // 65
"ROR ix16", // 66
"ASR ix16", // 67
"ASL ix16", // 68
"ROL ix16", // 69
"DEC ix16", // 6a
"???", // 6b
"INC ix16", // 6c
"TST ix16", // 6d
"JMP ix16", // 6e
"CLR ix16", // 6f
"NEG ex16", // 70
"???", // 71
"???", // 72
"COM ex16", // 73
"LSR ex16", // 74
"???", // 75
"ROR ex16", // 76
"ASR ex16", // 77
"ASL ex16", // 78
"ROL ex16", // 79
"DEC ex16", // 7a
"???", // 7b
"INC ex16", // 7c
"TST ex16", // 7d
"JMP ex16", // 7e
"CLR ex16", // 7f
"ADD A,B", // 80
"ADD A,C", // 81
"ADD A,D", // 82
"ADD A,E", // 83
"ADD A,H", // 84
"ADD A,L", // 85
"ADD A,(HL)", // 86
"ADD A,A", // 87
"ADC A,B", // 88
"ADC A,C", // 89
"ADC A,D", // 8a
"ADC A,E", // 8b
"ADC A,H", // 8c
"ADC A,L", // 8d
"ADC A,(HL)", // 8e
"ADC A,A", // 8f
"SUB B", // 90
"SUB C", // 91
"SUB D", // 92
"SUB E", // 93
"SUB H", // 94
"SUB L", // 95
"SUB (HL)", // 96
"SUB A", // 97
"SBC A,B", // 98
"SBC A,C", // 99
"SBC A,D", // 9a
"SBC A,E", // 9b
"SBC A,H", // 9c
"SBC A,L", // 9d
"SBC A,(HL)", // 9e
"SBC A,A", // 9f
"AND B", // a0
"AND C", // a1
"AND D", // a2
"AND E", // a3
"AND H", // a4
"AND L", // a5
"AND (HL)", // a6
"AND A", // a7
"XOR B", // a8
"XOR C", // a9
"XOR D", // aa
"XOR E", // ab
"XOR H", // ac
"XOR L", // ad
"XOR (HL)", // ae
"XOR A", // af
"OR B", // b0
"OR C", // b1
"OR D", // b2
"OR E", // b3
"OR H", // b4
"OR L", // b5
"OR (HL)", // b6
"OR A", // b7
"CP B", // b8
"CP C", // b9
"CP D", // ba
"CP E", // bb
"CP H", // bc
"CP L", // bd
"CP (HL)", // be
"CP A", // bf
"RET NZ", // c0
"POP BC", // c1
"JP NZ,a16", // c2
"JP a16", // c3
"CALL NZ,a16", // c4
"PUSH BC", // c5
"ADD A,d8", // c6
"RST 00H", // c7
"RET Z", // c8
"RET", // c9
"JP Z,a16", // ca
"PREFIX CB", // cb
"CALL Z,a16", // cc
"CALL a16", // cd
"ADC A,d8", // ce
"RST 08H", // cf
"RET NC", // d0
"POP DE", // d1
"JP NC,a16", // d2
"???", // d3
"CALL NC,a16", // d4
"PUSH DE", // d5
"SUB d8", // d6
"RST 10H", // d7
"RET C", // d8
"RETI", // d9
"JP C,a16", // da
"???", // db
"CALL C,a16", // dc
"???", // dd
"SBC A,d8", // de
"RST 18H", // df
"LDH (a8),A", // e0
"POP HL", // e1
"LD (C),A", // e2
"???", // e3
"???", // e4
"PUSH HL", // e5
"AND d8", // e6
"RST 20H", // e7
"ADD SP,r8", // e8
"JP (HL)", // e9
"LD (a16),A", // ea
"???", // eb
"???", // ec
"???", // ed
"XOR d8", // ee
"RST 28H", // ef
"LDH A,(a8)", // f0
"POP AF", // f1
"LD A,(C)", // f2
"DI", // f3
"???", // f4
"PUSH AF", // f5
"OR d8", // f6
"RST 30H", // f7
"LD HL,SP+r8", // f8
"LD SP,HL", // f9
"LD A,(a16)", // fa
"EI ", // fb
"???", // fc
"???", // fd
"CP d8", // fe
"RST 38H", // ff
};
public static string Disassemble(ushort addr, Func<ushort, byte> reader, out ushort size)
{
ushort origaddr = addr;
List<byte> bytes = new List<byte>();
bytes.Add(reader(addr++));
string result = table[bytes[0]];
if (bytes[0] == 0xcb)
{
bytes.Add(reader(addr++));
result = table[bytes[1] + 256];
}
if (result.Contains("d8"))
{
byte d = reader(addr++);
bytes.Add(d);
result = result.Replace("d8", string.Format("#{0:X2}h", d));
}
else if (result.Contains("d16"))
{
byte dlo = reader(addr++);
byte dhi = reader(addr++);
bytes.Add(dlo);
bytes.Add(dhi);
result = result.Replace("d16", string.Format("#{0:X2}{1:X2}h", dhi, dlo));
}
else if (result.Contains("a16"))
{
byte dlo = reader(addr++);
byte dhi = reader(addr++);
bytes.Add(dlo);
bytes.Add(dhi);
result = result.Replace("a16", string.Format("#{0:X2}{1:X2}h", dhi, dlo));
}
else if (result.Contains("a8"))
{
byte d = reader(addr++);
bytes.Add(d);
result = result.Replace("a8", string.Format("#FF{0:X2}h", d));
}
else if (result.Contains("r8"))
{
byte d = reader(addr++);
bytes.Add(d);
int offs = d;
if (offs >= 128)
offs -= 256;
result = result.Replace("r8", string.Format("{0:X4}h", (ushort)(addr + offs)));
}
StringBuilder ret = new StringBuilder();
ret.Append(string.Format("{0:X4}: ", origaddr));
foreach (var b in bytes)
ret.Append(string.Format("{0:X2} ", b));
while (ret.Length < 17)
ret.Append(' ');
ret.Append(result);
size = (ushort)(addr - origaddr);
return ret.ToString();
}
}
}

View File

@ -19,18 +19,13 @@ namespace BizHawk.Emulation.Common.Components.MC6809
public ushort int_src;
public int stop_time;
public bool stop_check;
public bool is_GBC; // GBC automatically adds a NOP to avoid the HALT bug (according to Sinimas)
public bool I_use; // in halt mode, the I flag is checked earlier then when deicision to IRQ is taken
public bool skip_once;
public bool Halt_bug_2;
public bool Halt_bug_3;
private void ResetInterrupts()
{
I_use = false;
skip_once = false;
Halt_bug_2 = false;
Halt_bug_3 = false;
}
}
}

View File

@ -517,15 +517,12 @@ namespace BizHawk.Emulation.Common.Components.MC6809
ser.Sync("IRQ", ref interrupts_enabled);
ser.Sync("I_use", ref I_use);
ser.Sync("skip_once", ref skip_once);
ser.Sync("Halt_bug_2", ref Halt_bug_2);
ser.Sync("Halt_bug_3", ref Halt_bug_3);
ser.Sync("Halted", ref halted);
ser.Sync("TotalExecutedCycles", ref TotalExecutedCycles);
ser.Sync("EI_pending", ref EI_pending);
ser.Sync("int_src", ref int_src);
ser.Sync("stop_time", ref stop_time);
ser.Sync("stop_check", ref stop_check);
ser.Sync("is_GBC", ref is_GBC);
ser.Sync("instr_pntr", ref instr_pntr);
ser.Sync("cur_instr", ref cur_instr, false);

View File

@ -1,587 +0,0 @@
using System;
using System.Collections.Generic;
using System.Text;
namespace BizHawk.Emulation.Common.Components.MC6809
{
// adapted from the information at http://www.pastraiser.com/cpu/gameboy/gameboy_opcodes.html
public sealed partial class MC6809
{
static string[] table =
{
"NOP", // 00
"LD BC,d16", // 01
"LD (BC),A", // 02
"INC BC", // 03
"INC B", // 04
"DEC B", // 05
"LD B,d8", // 06
"RLCA", // 07
"LD (a16),SP", // 08
"ADD HL,BC", // 09
"LD A,(BC)", // 0a
"DEC BC", // 0b
"INC C", // 0c
"DEC C", // 0d
"LD C,d8", // 0e
"RRCA", // 0f
"STOP 0", // 10
"LD DE,d16", // 11
"LD (DE),A", // 12
"INC DE", // 13
"INC D", // 14
"DEC D", // 15
"LD D,d8", // 16
"RLA", // 17
"JR r8", // 18
"ADD HL,DE", // 19
"LD A,(DE)", // 1a
"DEC DE", // 1b
"INC E", // 1c
"DEC E", // 1d
"LD E,d8", // 1e
"RRA", // 1f
"JR NZ,r8", // 20
"LD HL,d16", // 21
"LD (HL+),A", // 22
"INC HL", // 23
"INC H", // 24
"DEC H", // 25
"LD H,d8", // 26
"DAA", // 27
"JR Z,r8", // 28
"ADD HL,HL", // 29
"LD A,(HL+)", // 2a
"DEC HL", // 2b
"INC L", // 2c
"DEC L", // 2d
"LD L,d8", // 2e
"CPL", // 2f
"JR NC,r8", // 30
"LD SP,d16", // 31
"LD (HL-),A", // 32
"INC SP", // 33
"INC (HL)", // 34
"DEC (HL)", // 35
"LD (HL),d8", // 36
"SCF", // 37
"JR C,r8", // 38
"ADD HL,SP", // 39
"LD A,(HL-)", // 3a
"DEC SP", // 3b
"INC A", // 3c
"DEC A", // 3d
"LD A,d8", // 3e
"CCF", // 3f
"LD B,B", // 40
"LD B,C", // 41
"LD B,D", // 42
"LD B,E", // 43
"LD B,H", // 44
"LD B,L", // 45
"LD B,(HL)", // 46
"LD B,A", // 47
"LD C,B", // 48
"LD C,C", // 49
"LD C,D", // 4a
"LD C,E", // 4b
"LD C,H", // 4c
"LD C,L", // 4d
"LD C,(HL)", // 4e
"LD C,A", // 4f
"LD D,B", // 50
"LD D,C", // 51
"LD D,D", // 52
"LD D,E", // 53
"LD D,H", // 54
"LD D,L", // 55
"LD D,(HL)", // 56
"LD D,A", // 57
"LD E,B", // 58
"LD E,C", // 59
"LD E,D", // 5a
"LD E,E", // 5b
"LD E,H", // 5c
"LD E,L", // 5d
"LD E,(HL)", // 5e
"LD E,A", // 5f
"LD H,B", // 60
"LD H,C", // 61
"LD H,D", // 62
"LD H,E", // 63
"LD H,H", // 64
"LD H,L", // 65
"LD H,(HL)", // 66
"LD H,A", // 67
"LD L,B", // 68
"LD L,C", // 69
"LD L,D", // 6a
"LD L,E", // 6b
"LD L,H", // 6c
"LD L,L", // 6d
"LD L,(HL)", // 6e
"LD L,A", // 6f
"LD (HL),B", // 70
"LD (HL),C", // 71
"LD (HL),D", // 72
"LD (HL),E", // 73
"LD (HL),H", // 74
"LD (HL),L", // 75
"HALT", // 76
"LD (HL),A", // 77
"LD A,B", // 78
"LD A,C", // 79
"LD A,D", // 7a
"LD A,E", // 7b
"LD A,H", // 7c
"LD A,L", // 7d
"LD A,(HL)", // 7e
"LD A,A", // 7f
"ADD A,B", // 80
"ADD A,C", // 81
"ADD A,D", // 82
"ADD A,E", // 83
"ADD A,H", // 84
"ADD A,L", // 85
"ADD A,(HL)", // 86
"ADD A,A", // 87
"ADC A,B", // 88
"ADC A,C", // 89
"ADC A,D", // 8a
"ADC A,E", // 8b
"ADC A,H", // 8c
"ADC A,L", // 8d
"ADC A,(HL)", // 8e
"ADC A,A", // 8f
"SUB B", // 90
"SUB C", // 91
"SUB D", // 92
"SUB E", // 93
"SUB H", // 94
"SUB L", // 95
"SUB (HL)", // 96
"SUB A", // 97
"SBC A,B", // 98
"SBC A,C", // 99
"SBC A,D", // 9a
"SBC A,E", // 9b
"SBC A,H", // 9c
"SBC A,L", // 9d
"SBC A,(HL)", // 9e
"SBC A,A", // 9f
"AND B", // a0
"AND C", // a1
"AND D", // a2
"AND E", // a3
"AND H", // a4
"AND L", // a5
"AND (HL)", // a6
"AND A", // a7
"XOR B", // a8
"XOR C", // a9
"XOR D", // aa
"XOR E", // ab
"XOR H", // ac
"XOR L", // ad
"XOR (HL)", // ae
"XOR A", // af
"OR B", // b0
"OR C", // b1
"OR D", // b2
"OR E", // b3
"OR H", // b4
"OR L", // b5
"OR (HL)", // b6
"OR A", // b7
"CP B", // b8
"CP C", // b9
"CP D", // ba
"CP E", // bb
"CP H", // bc
"CP L", // bd
"CP (HL)", // be
"CP A", // bf
"RET NZ", // c0
"POP BC", // c1
"JP NZ,a16", // c2
"JP a16", // c3
"CALL NZ,a16", // c4
"PUSH BC", // c5
"ADD A,d8", // c6
"RST 00H", // c7
"RET Z", // c8
"RET", // c9
"JP Z,a16", // ca
"PREFIX CB", // cb
"CALL Z,a16", // cc
"CALL a16", // cd
"ADC A,d8", // ce
"RST 08H", // cf
"RET NC", // d0
"POP DE", // d1
"JP NC,a16", // d2
"???", // d3
"CALL NC,a16", // d4
"PUSH DE", // d5
"SUB d8", // d6
"RST 10H", // d7
"RET C", // d8
"RETI", // d9
"JP C,a16", // da
"???", // db
"CALL C,a16", // dc
"???", // dd
"SBC A,d8", // de
"RST 18H", // df
"LDH (a8),A", // e0
"POP HL", // e1
"LD (C),A", // e2
"???", // e3
"???", // e4
"PUSH HL", // e5
"AND d8", // e6
"RST 20H", // e7
"ADD SP,r8", // e8
"JP (HL)", // e9
"LD (a16),A", // ea
"???", // eb
"???", // ec
"???", // ed
"XOR d8", // ee
"RST 28H", // ef
"LDH A,(a8)", // f0
"POP AF", // f1
"LD A,(C)", // f2
"DI", // f3
"???", // f4
"PUSH AF", // f5
"OR d8", // f6
"RST 30H", // f7
"LD HL,SP+r8", // f8
"LD SP,HL", // f9
"LD A,(a16)", // fa
"EI ", // fb
"???", // fc
"???", // fd
"CP d8", // fe
"RST 38H", // ff
"RLC B", // 00
"RLC C", // 01
"RLC D", // 02
"RLC E", // 03
"RLC H", // 04
"RLC L", // 05
"RLC (HL)", // 06
"RLC A", // 07
"RRC B", // 08
"RRC C", // 09
"RRC D", // 0a
"RRC E", // 0b
"RRC H", // 0c
"RRC L", // 0d
"RRC (HL)", // 0e
"RRC A", // 0f
"RL B", // 10
"RL C", // 11
"RL D", // 12
"RL E", // 13
"RL H", // 14
"RL L", // 15
"RL (HL)", // 16
"RL A", // 17
"RR B", // 18
"RR C", // 19
"RR D", // 1a
"RR E", // 1b
"RR H", // 1c
"RR L", // 1d
"RR (HL)", // 1e
"RR A", // 1f
"SLA B", // 20
"SLA C", // 21
"SLA D", // 22
"SLA E", // 23
"SLA H", // 24
"SLA L", // 25
"SLA (HL)", // 26
"SLA A", // 27
"SRA B", // 28
"SRA C", // 29
"SRA D", // 2a
"SRA E", // 2b
"SRA H", // 2c
"SRA L", // 2d
"SRA (HL)", // 2e
"SRA A", // 2f
"SWAP B", // 30
"SWAP C", // 31
"SWAP D", // 32
"SWAP E", // 33
"SWAP H", // 34
"SWAP L", // 35
"SWAP (HL)", // 36
"SWAP A", // 37
"SRL B", // 38
"SRL C", // 39
"SRL D", // 3a
"SRL E", // 3b
"SRL H", // 3c
"SRL L", // 3d
"SRL (HL)", // 3e
"SRL A", // 3f
"BIT 0,B", // 40
"BIT 0,C", // 41
"BIT 0,D", // 42
"BIT 0,E", // 43
"BIT 0,H", // 44
"BIT 0,L", // 45
"BIT 0,(HL)", // 46
"BIT 0,A", // 47
"BIT 1,B", // 48
"BIT 1,C", // 49
"BIT 1,D", // 4a
"BIT 1,E", // 4b
"BIT 1,H", // 4c
"BIT 1,L", // 4d
"BIT 1,(HL)", // 4e
"BIT 1,A", // 4f
"BIT 2,B", // 50
"BIT 2,C", // 51
"BIT 2,D", // 52
"BIT 2,E", // 53
"BIT 2,H", // 54
"BIT 2,L", // 55
"BIT 2,(HL)", // 56
"BIT 2,A", // 57
"BIT 3,B", // 58
"BIT 3,C", // 59
"BIT 3,D", // 5a
"BIT 3,E", // 5b
"BIT 3,H", // 5c
"BIT 3,L", // 5d
"BIT 3,(HL)", // 5e
"BIT 3,A", // 5f
"BIT 4,B", // 60
"BIT 4,C", // 61
"BIT 4,D", // 62
"BIT 4,E", // 63
"BIT 4,H", // 64
"BIT 4,L", // 65
"BIT 4,(HL)", // 66
"BIT 4,A", // 67
"BIT 5,B", // 68
"BIT 5,C", // 69
"BIT 5,D", // 6a
"BIT 5,E", // 6b
"BIT 5,H", // 6c
"BIT 5,L", // 6d
"BIT 5,(HL)", // 6e
"BIT 5,A", // 6f
"BIT 6,B", // 70
"BIT 6,C", // 71
"BIT 6,D", // 72
"BIT 6,E", // 73
"BIT 6,H", // 74
"BIT 6,L", // 75
"BIT 6,(HL)", // 76
"BIT 6,A", // 77
"BIT 7,B", // 78
"BIT 7,C", // 79
"BIT 7,D", // 7a
"BIT 7,E", // 7b
"BIT 7,H", // 7c
"BIT 7,L", // 7d
"BIT 7,(HL)", // 7e
"BIT 7,A", // 7f
"RES 0,B", // 80
"RES 0,C", // 81
"RES 0,D", // 82
"RES 0,E", // 83
"RES 0,H", // 84
"RES 0,L", // 85
"RES 0,(HL)", // 86
"RES 0,A", // 87
"RES 1,B", // 88
"RES 1,C", // 89
"RES 1,D", // 8a
"RES 1,E", // 8b
"RES 1,H", // 8c
"RES 1,L", // 8d
"RES 1,(HL)", // 8e
"RES 1,A", // 8f
"RES 2,B", // 90
"RES 2,C", // 91
"RES 2,D", // 92
"RES 2,E", // 93
"RES 2,H", // 94
"RES 2,L", // 95
"RES 2,(HL)", // 96
"RES 2,A", // 97
"RES 3,B", // 98
"RES 3,C", // 99
"RES 3,D", // 9a
"RES 3,E", // 9b
"RES 3,H", // 9c
"RES 3,L", // 9d
"RES 3,(HL)", // 9e
"RES 3,A", // 9f
"RES 4,B", // a0
"RES 4,C", // a1
"RES 4,D", // a2
"RES 4,E", // a3
"RES 4,H", // a4
"RES 4,L", // a5
"RES 4,(HL)", // a6
"RES 4,A", // a7
"RES 5,B", // a8
"RES 5,C", // a9
"RES 5,D", // aa
"RES 5,E", // ab
"RES 5,H", // ac
"RES 5,L", // ad
"RES 5,(HL)", // ae
"RES 5,A", // af
"RES 6,B", // b0
"RES 6,C", // b1
"RES 6,D", // b2
"RES 6,E", // b3
"RES 6,H", // b4
"RES 6,L", // b5
"RES 6,(HL)", // b6
"RES 6,A", // b7
"RES 7,B", // b8
"RES 7,C", // b9
"RES 7,D", // ba
"RES 7,E", // bb
"RES 7,H", // bc
"RES 7,L", // bd
"RES 7,(HL)", // be
"RES 7,A", // bf
"SET 0,B", // c0
"SET 0,C", // c1
"SET 0,D", // c2
"SET 0,E", // c3
"SET 0,H", // c4
"SET 0,L", // c5
"SET 0,(HL)", // c6
"SET 0,A", // c7
"SET 1,B", // c8
"SET 1,C", // c9
"SET 1,D", // ca
"SET 1,E", // cb
"SET 1,H", // cc
"SET 1,L", // cd
"SET 1,(HL)", // ce
"SET 1,A", // cf
"SET 2,B", // d0
"SET 2,C", // d1
"SET 2,D", // d2
"SET 2,E", // d3
"SET 2,H", // d4
"SET 2,L", // d5
"SET 2,(HL)", // d6
"SET 2,A", // d7
"SET 3,B", // d8
"SET 3,C", // d9
"SET 3,D", // da
"SET 3,E", // db
"SET 3,H", // dc
"SET 3,L", // dd
"SET 3,(HL)", // de
"SET 3,A", // df
"SET 4,B", // e0
"SET 4,C", // e1
"SET 4,D", // e2
"SET 4,E", // e3
"SET 4,H", // e4
"SET 4,L", // e5
"SET 4,(HL)", // e6
"SET 4,A", // e7
"SET 5,B", // e8
"SET 5,C", // e9
"SET 5,D", // ea
"SET 5,E", // eb
"SET 5,H", // ec
"SET 5,L", // ed
"SET 5,(HL)", // ee
"SET 5,A", // ef
"SET 6,B", // f0
"SET 6,C", // f1
"SET 6,D", // f2
"SET 6,E", // f3
"SET 6,H", // f4
"SET 6,L", // f5
"SET 6,(HL)", // f6
"SET 6,A", // f7
"SET 7,B", // f8
"SET 7,C", // f9
"SET 7,D", // fa
"SET 7,E", // fb
"SET 7,H", // fc
"SET 7,L", // fd
"SET 7,(HL)", // fe
"SET 7,A", // ff
};
public static string Disassemble(ushort addr, Func<ushort, byte> reader, out ushort size)
{
ushort origaddr = addr;
List<byte> bytes = new List<byte>();
bytes.Add(reader(addr++));
string result = table[bytes[0]];
if (bytes[0] == 0xcb)
{
bytes.Add(reader(addr++));
result = table[bytes[1] + 256];
}
if (result.Contains("d8"))
{
byte d = reader(addr++);
bytes.Add(d);
result = result.Replace("d8", string.Format("#{0:X2}h", d));
}
else if (result.Contains("d16"))
{
byte dlo = reader(addr++);
byte dhi = reader(addr++);
bytes.Add(dlo);
bytes.Add(dhi);
result = result.Replace("d16", string.Format("#{0:X2}{1:X2}h", dhi, dlo));
}
else if (result.Contains("a16"))
{
byte dlo = reader(addr++);
byte dhi = reader(addr++);
bytes.Add(dlo);
bytes.Add(dhi);
result = result.Replace("a16", string.Format("#{0:X2}{1:X2}h", dhi, dlo));
}
else if (result.Contains("a8"))
{
byte d = reader(addr++);
bytes.Add(d);
result = result.Replace("a8", string.Format("#FF{0:X2}h", d));
}
else if (result.Contains("r8"))
{
byte d = reader(addr++);
bytes.Add(d);
int offs = d;
if (offs >= 128)
offs -= 256;
result = result.Replace("r8", string.Format("{0:X4}h", (ushort)(addr + offs)));
}
StringBuilder ret = new StringBuilder();
ret.Append(string.Format("{0:X4}: ", origaddr));
foreach (var b in bytes)
ret.Append(string.Format("{0:X2} ", b));
while (ret.Length < 17)
ret.Append(' ');
ret.Append(result);
size = (ushort)(addr - origaddr);
return ret.ToString();
}
}
}