mirror of
https://github.com/pret/pokered.git
synced 2024-10-23 06:58:24 +00:00
36 lines
565 B
NASM
36 lines
565 B
NASM
PrintSafariZoneBattleText:
|
|
ld hl, wSafariBaitFactor
|
|
ld a, [hl]
|
|
and a
|
|
jr z, .no_bait
|
|
dec [hl]
|
|
ld hl, SafariZoneEatingText
|
|
jr .done
|
|
.no_bait
|
|
dec hl
|
|
ld a, [hl]
|
|
and a
|
|
ret z
|
|
dec [hl]
|
|
ld hl, SafariZoneAngryText
|
|
jr nz, .done
|
|
push hl
|
|
ld a, [wEnemyMonSpecies]
|
|
ld [wd0b5], a
|
|
call GetMonHeader
|
|
ld a, [wMonHCatchRate]
|
|
ld [wEnemyMonActualCatchRate], a
|
|
pop hl
|
|
.done
|
|
push hl
|
|
call LoadScreenTilesFromBuffer1
|
|
pop hl
|
|
jp PrintText
|
|
|
|
SafariZoneEatingText:
|
|
text_far _SafariZoneEatingText
|
|
text_end
|
|
|
|
SafariZoneAngryText:
|
|
text_far _SafariZoneAngryText
|
|
text_end
|