mirror of https://github.com/pret/pokecrystal.git
A couple more general functions
This commit is contained in:
parent
73c374a366
commit
71bc143687
34
main.asm
34
main.asm
|
@ -2686,7 +2686,39 @@ CopyData: ; 0x9a52
|
||||||
ret
|
ret
|
||||||
; 0x9a5b
|
; 0x9a5b
|
||||||
|
|
||||||
INCBIN "baserom.gbc",$9a5b,$c000 - $9a5b
|
ClearBytes: ; 0x9a5b
|
||||||
|
; clear bc bytes of data starting from de
|
||||||
|
xor a
|
||||||
|
ld [de], a
|
||||||
|
inc de
|
||||||
|
dec bc
|
||||||
|
ld a, c
|
||||||
|
or b
|
||||||
|
jr nz, ClearBytes
|
||||||
|
ret
|
||||||
|
; 0x9a64
|
||||||
|
|
||||||
|
DrawDefaultTiles: ; 0x9a64
|
||||||
|
; Draw 240 tiles (2/3 of the screen) from tiles in VRAM
|
||||||
|
ld hl, $9800 ; BG Map 0
|
||||||
|
ld de, 32 - 20
|
||||||
|
ld a, $80 ; starting tile
|
||||||
|
ld c, 12 + 1
|
||||||
|
.line
|
||||||
|
ld b, 20
|
||||||
|
.tile
|
||||||
|
ld [hli], a
|
||||||
|
inc a
|
||||||
|
dec b
|
||||||
|
jr nz, .tile
|
||||||
|
; next line
|
||||||
|
add hl, de
|
||||||
|
dec c
|
||||||
|
jr nz, .line
|
||||||
|
ret
|
||||||
|
; 0x9a7a
|
||||||
|
|
||||||
|
INCBIN "baserom.gbc",$9a7a,$c000 - $9a7a
|
||||||
|
|
||||||
SECTION "bank3",DATA,BANK[$3]
|
SECTION "bank3",DATA,BANK[$3]
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue