add ClearScreen function

hg-commit-id: 4f32cac305e9
This commit is contained in:
IIMarckus 2010-11-19 23:30:32 -07:00
parent 46337960bf
commit da200058da

View file

@ -337,7 +337,24 @@ incbin "baserom.gbc",$39E,$1627 - $39E
.GotBank\@
jp $24FD
INCBIN "baserom.gbc",$1665,$20AF - $1665
INCBIN "baserom.gbc",$1665,$190F - $1665
ClearScreen: ; 190F
; clears all tiles in the tilemap,
; then (writes 1 to $FFD3, waits for it to become 0) three times (XXX why?)
ld bc,$0168 ; tilemap size
inc b
ld hl,$C3A0 ; TILEMAP_START
ld a,$7F ; $7F is blank tile
.loop\@
ld [hli],a
dec c
jr nz,.loop\@
dec b
jr nz,.loop\@
jp Delay3
INCBIN "baserom.gbc",$1922,$20AF - $1922
ConserveBattery: ; 20AF
; loads 1 into $FFD6 and returns when $FFD6 == 0