blob: 426e391e33bdbc791ba5225722cb0f0e8cf6feb7 (
plain)
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
|
PrintSafariZoneBattleText: ; 4277 (1:4277)
ld hl, $cce9
ld a, [hl]
and a
jr z, .asm_4284
dec [hl]
ld hl, SafariZoneEatingText
jr .asm_429f
.asm_4284
dec hl
ld a, [hl]
and a
ret z
dec [hl]
ld hl, SafariZoneAngryText
jr nz, .asm_429f
push hl
ld a, [$cfe5]
ld [$d0b5], a
call GetMonHeader
ld a, [W_MONHCATCHRATE]
ld [$d007], a
pop hl
.asm_429f
push hl
call LoadScreenTilesFromBuffer1
pop hl
jp PrintText
SafariZoneEatingText: ; 42a7 (1:42a7)
TX_FAR _SafariZoneEatingText
db "@"
SafariZoneAngryText: ; 42ac (1:42ac)
TX_FAR _SafariZoneAngryText
db "@"
|
