pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2025-04-09 05:44:44 -07:00
Code Issues Packages Projects Releases Wiki Activity

* make jumps and calls use labels

Browse Source
This commit is contained in:
Mr Wint
2013-10-02 06:53:35 +02:00
parent c5ff1606f0
commit c666d1014a
4 changed files with 1799 additions and 260 deletions
Download Patch File Download Diff File Expand all files Collapse all files

90
engine/credits.asm
View File

@@ -283,8 +283,96 @@ ParseCredits: ; 1099aa
; 109a95
INCBIN "baserom.gbc", $109a95, $109b2c - $109a95
; known jump sources: 1098ac (42:58ac)
Function109a95: ; 109a95 (42:5a95)
xor a
ld [hBGMapMode], a ; $ff00+$d4
ld a, $c
ld [hBGMapAddress], a ; $ff00+$d6
ld a, $28
ld hl, TileMap ; $c4a0 (aliases: SpritesEnd)
ld bc, $168
call ByteFill
ld a, $7f
ld hl, $c4f0
ld bc, $118
call ByteFill
ld hl, $c4f0
ld a, $24
call Function109b1d
ld hl, $c5f4
ld a, $20
call Function109b1d
ld hl, AttrMap ; $cdd9
ld bc, $50
xor a
call ByteFill
ld hl, $ce29
ld bc, $14
ld a, $1
call ByteFill
ld hl, $ce3d
ld bc, $f0
ld a, $2
call ByteFill
ld hl, $cf2d
ld bc, $14
ld a, $1
call ByteFill
call Function3200
xor a
ld [hBGMapMode], a ; $ff00+$d4
ld [hBGMapAddress], a ; $ff00+$d6
ld hl, TileMap ; $c4a0 (aliases: SpritesEnd)
call Function109aff
call Function3200
ret
; known jump sources: 109af8 (42:5af8)
Function109aff: ; 109aff (42:5aff)
ld b, $5
.asm_109b01
push hl
ld de, $11
ld c, $4
xor a
.asm_109b08
ld [hli], a
inc a
ld [hli], a
inc a
ld [hli], a
inc a
ld [hl], a
inc a
add hl, de
dec c
jr nz, .asm_109b08
pop hl
inc hl
inc hl
inc hl
inc hl
dec b
jr nz, .asm_109b01
ret
; known jump sources: 109ab7 (42:5ab7), 109abf (42:5abf)
Function109b1d: ; 109b1d (42:5b1d)
ld c, $5
.asm_109b1f
push af
ld [hli], a
inc a
ld [hli], a
inc a
ld [hli], a
inc a
ld [hli], a
pop af
dec c
jr nz, .asm_109b1f
ret
GetCreditsPalette: ; 109b2c
call .GetPalAddress