call skipbl\r
jr z,l0c30h\r
call sub_0363h\r
- ld b,h\r
- ld c,l\r
- pop af\r
+ ex de,hl\r
+ pop bc\r
pop hl\r
- ld (hl),c\r
- bit 0,a\r
+ ld (hl),e\r
+ bit 0,c\r
ret z\r
inc hl\r
- ld (hl),b\r
+ ld (hl),d\r
ret\r
l0c30h:\r
pop af\r
ret\r
\r
l0c33h:\r
- ld b,c\r
call pstr\r
call pstr_inl\r
dc '='\r
ld a,(de)\r
- bit 0,b\r
+ bit 0,c\r
jp z,out_hex\r
ld l,a\r
inc de\r
ld a,(de)\r
dec de\r
ld h,a\r
- bit 1,b\r
+ bit 1,c\r
jp z,out_hl\r
jp out.hl.@\r
\r
\r
ld c,16\r
call p_fill_space\r
+ call p_offset\r
+ ld a,80h\r
+ jp p_sym_space\r
\r
p_offset:\r
ld de,(var.@)\r
and a\r
sbc hl,de\r
call out_hl\r
+ add hl,de\r
jp out_rparen\r
\r
p_disas_instr:\r
inc hl\r
jr sub_1a72h\r
l1a7fh:\r
+ ld de,l1c97h\r
inc hl\r
ld c,(hl)\r
- ld hl,t_MNEMONICS\r
- ld b,0\r
- add hl,bc\r
- ld de,l1c97h\r
- scf\r
- ret\r
+ jr get_mnemonic\r
+\r
\r
test_DDFD:\r
ld a,(hl)\r
and a\r
jr nz,lookup_opc\r
ret\r
+\r
l1aa8h:\r
inc hl\r
ld c,(hl)\r
ld e,(hl)\r
inc hl\r
ld d,(hl)\r
+get_mnemonic:\r
ld hl,t_MNEMONICS\r
- ld b,000h\r
+ ld b,0\r
add hl,bc\r
scf\r
ret\r
db 0ffh\r
\r
\r
-; 1 byte opcodes\r
+; 1 byte opcodes\r
; Format: db mask, match, t_MNEMONICS-index\r
; dw argument formating fuction\r
b_1ad1_start:\r
dw l1ce5h\r
db 0\r
\r
-; 2 byte opdodes\r
+; 2 byte opdodes\r
b_1b54_start:\r
db 0c7h,006h,056h ;ld r,nn\r
dw l1cfah\r
dw l1d29h\r
db 0\r
\r
-; 3 byte opcodes\r
+; 3 byte opcodes\r
b_1b9b_start:\r
db 0c7h,0c2h,052h ;jp cc,mn\r
dw p_arg_cc_mn\r
ret\r
cmd_C:\r
ld hl,cmd_C\r
- ld a,001h\r
+ ld a,1\r
jr l2122h\r
cmd_T:\r
xor a\r