pokefirered/data/scripts/surf.inc

25 lines
636 B
PHP

EventScript_UseSurf::
goto_if_questlog EventScript_UseSurfEnd
checkfieldmoveusable FIELD_MOVE_SURF
goto_if_eq VAR_RESULT, FALSE, EventScript_UseSurfEnd
playse SE_SELECT
lockall
msgbox Text_WantToSurf, MSGBOX_YESNO
goto_if_eq VAR_RESULT, NO, EventScript_UseSurfRelease
msgbox Text_UsedSurf
dofieldeffect FLDEFF_USE_SURF
EventScript_UseSurfRelease:
releaseall
EventScript_UseSurfEnd:
end
EventScript_CurrentTooFast::
lockall
checkfieldmoveusable FIELD_MOVE_SURF
goto_if_eq VAR_RESULT, FALSE, EventScript_CurrentTooFastEndMsg
playse SE_SELECT
msgbox Text_CurrentTooFast
EventScript_CurrentTooFastEndMsg::
releaseall
end