mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-11-16 11:27:33 -08:00
commit
9ea77b0ad8
16
main.asm
16
main.asm
@ -1,6 +1,20 @@
|
||||
SECTION "bank0",HOME
|
||||
|
||||
INCBIN "baserom.gbc",$0,$304d
|
||||
INCBIN "baserom.gbc",$0,$3041
|
||||
|
||||
ByteFill: ; 0x3041
|
||||
; fill BC bytes with the value of A, starting at HL
|
||||
inc b ; we bail *when* b hits 0, so include the last run
|
||||
inc c ; same thing; include last byte
|
||||
jr .HandleLoop
|
||||
.PutByte
|
||||
ld [hli], a
|
||||
.HandleLoop
|
||||
dec c
|
||||
jr nz, .PutByte
|
||||
dec b
|
||||
jr nz, .PutByte
|
||||
ret
|
||||
|
||||
GetFarByte: ; 0x304d
|
||||
; retrieve a single byte from a:hl, and return it in a.
|
||||
|
Loading…
Reference in New Issue
Block a user