1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
|
DrawSpritesForStage: ; 0x84b7
; Draw sprites (OAM data) for the current stage.
ld a, [wCurrentStage]
call CallInFollowingTable
CallTable_84bd: ; 0x84bd
padded_dab DrawSpritesRedFieldTop ; STAGE_RED_FIELD_TOP
padded_dab DrawSpritesRedFieldBottom ; STAGE_RED_FIELD_BOTTOM
padded_dab Func_18079
padded_dab Func_18084
padded_dab DrawSpritesBlueFieldTop ; STAGE_BLUE_FIELD_TOP
padded_dab DrawSpritesBlueFieldBottom ; STAGE_BLUE_FIELD_BOTTOM
padded_dab DrawSpritesGengarBonus ; STAGE_GENGAR_BONUS
padded_dab DrawSpritesGengarBonus ; STAGE_GENGAR_BONUS
padded_dab DrawSpritesMewtwoBonus ; STAGE_MEWTWO_BONUS
padded_dab DrawSpritesMewtwoBonus ; STAGE_MEWTWO_BONUS
padded_dab DrawSpritesMeowthBonus ; STAGE_MEOWTH_BONUS
padded_dab DrawSpritesMeowthBonus ; STAGE_MEOWTH_BONUS
padded_dab DrawSpritesDiglettBonus ; STAGE_DIGLETT_BONUS
padded_dab DrawSpritesDiglettBonus ; STAGE_DIGLETT_BONUS
padded_dab DrawSpritesSeelBonus ; STAGE_SEEL_BONUS
padded_dab DrawSpritesSeelBonus ; STAGE_SEEL_BONUS
UnusedFunc_84fd:
; unused
ld a, [hGameBoyColorFlag]
and a
jr z, .not_cgb
ld a, $1
ld [rVBK], a
xor a
call .FillAttrsOrBGMap
xor a
ld [rVBK], a
.not_cgb
ld a, $81
call .FillAttrsOrBGMap
ld de, wBottomMessageBuffer + $47
call Func_8524
ret
.FillAttrsOrBGMap: ; 8519 (2:4519)
hlCoord 0, 0, vBGWin
ld b, $20
.loop
ld [hli], a
ld [hli], a
dec b
jr nz, .loop
ret
|
