mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-11-16 11:27:33 -08:00
Disasm FarCopyBytes and FarCopyBytesDouble.
This commit is contained in:
parent
b76ffb99ab
commit
7bf2c3d758
49
main.asm
49
main.asm
@ -77,7 +77,54 @@ EnableLCD: ; 58a
|
|||||||
ret
|
ret
|
||||||
; 0x591
|
; 0x591
|
||||||
|
|
||||||
INCBIN "baserom.gbc",$591,$ff1 - $591
|
INCBIN "baserom.gbc",$591,$e8d - $591
|
||||||
|
|
||||||
|
; copy bc bytes from a:hl to de
|
||||||
|
FarCopyBytes:
|
||||||
|
ld [$ff00+$8b], a
|
||||||
|
ld a, [$ff00+$9d] ; save old bank
|
||||||
|
push af
|
||||||
|
ld a, [$ff00+$8b]
|
||||||
|
rst $10
|
||||||
|
call CopyBytes
|
||||||
|
pop af
|
||||||
|
rst $10
|
||||||
|
ret
|
||||||
|
; 0xe9b
|
||||||
|
|
||||||
|
; copy bc*2 source bytes from a:hl to de, doubling each byte in process
|
||||||
|
FarCopyBytesDouble: ; e9b
|
||||||
|
ld [$ff00+$8b], a
|
||||||
|
ld a, [$ff00+$9d] ; save current bank
|
||||||
|
push af
|
||||||
|
ld a, [$ff00+$8b]
|
||||||
|
rst $10 ; bankswitch
|
||||||
|
ld a, h ; switcheroo, de <> hl
|
||||||
|
ld h, d
|
||||||
|
ld d, a
|
||||||
|
ld a, l
|
||||||
|
ld l, e
|
||||||
|
ld e, a
|
||||||
|
inc b
|
||||||
|
inc c
|
||||||
|
jr .dec ; 0xeab $4
|
||||||
|
.loop
|
||||||
|
ld a, [de]
|
||||||
|
inc de
|
||||||
|
ld [hli], a ; write twice
|
||||||
|
ld [hli], a
|
||||||
|
.dec
|
||||||
|
dec c
|
||||||
|
jr nz, .loop
|
||||||
|
dec b
|
||||||
|
jr nz, .loop
|
||||||
|
pop af
|
||||||
|
rst $10
|
||||||
|
ret
|
||||||
|
; 0xeba
|
||||||
|
|
||||||
|
|
||||||
|
INCBIN "baserom.gbc",$eba,$ff1 - $eba
|
||||||
|
|
||||||
TextBoxBorder: ; ff1
|
TextBoxBorder: ; ff1
|
||||||
; draw a text box
|
; draw a text box
|
||||||
|
Loading…
Reference in New Issue
Block a user