mirror of
https://github.com/pret/pokered.git
synced 2024-10-24 23:37:09 +00:00
57 lines
1.1 KiB
NASM
57 lines
1.1 KiB
NASM
PrintStrengthTxt:
|
|
ld hl, wd728
|
|
set 0, [hl]
|
|
ld hl, UsedStrengthText
|
|
call PrintText
|
|
ld hl, CanMoveBouldersText
|
|
jp PrintText
|
|
|
|
UsedStrengthText:
|
|
TX_FAR _UsedStrengthText
|
|
TX_ASM
|
|
ld a, [wcf91]
|
|
call PlayCry
|
|
call Delay3
|
|
jp TextScriptEnd
|
|
|
|
CanMoveBouldersText:
|
|
TX_FAR _CanMoveBouldersText
|
|
db "@"
|
|
|
|
IsSurfingAllowed:
|
|
; Returns whether surfing is allowed in bit 1 of wd728.
|
|
; Surfing isn't allowed on the Cycling Road or in the lowest level of the
|
|
; Seafoam Islands before the current has been slowed with boulders.
|
|
ld hl, wd728
|
|
set 1, [hl]
|
|
ld a, [wd732]
|
|
bit 5, a
|
|
jr nz, .forcedToRideBike
|
|
ld a, [wCurMap]
|
|
cp SEAFOAM_ISLANDS_5
|
|
ret nz
|
|
CheckBothEventsSet EVENT_SEAFOAM4_BOULDER1_DOWN_HOLE, EVENT_SEAFOAM4_BOULDER2_DOWN_HOLE
|
|
ret z
|
|
ld hl, CoordsData_cdf7
|
|
call ArePlayerCoordsInArray
|
|
ret nc
|
|
ld hl, wd728
|
|
res 1, [hl]
|
|
ld hl, CurrentTooFastText
|
|
jp PrintText
|
|
.forcedToRideBike
|
|
ld hl, wd728
|
|
res 1, [hl]
|
|
ld hl, CyclingIsFunText
|
|
jp PrintText
|
|
|
|
CoordsData_cdf7:
|
|
db $0B,$07,$FF
|
|
|
|
CurrentTooFastText:
|
|
TX_FAR _CurrentTooFastText
|
|
db "@"
|
|
|
|
CyclingIsFunText:
|
|
TX_FAR _CyclingIsFunText
|
|
db "@"
|