mirror of
https://github.com/pret/pokeruby.git
synced 2026-08-07 18:14:00 -05:00
301 lines
6.5 KiB
PHP
Vendored
301 lines
6.5 KiB
PHP
Vendored
S_CuttableTree:: @ 81B0DCC
|
||
lockall
|
||
goto_if_unset FLAG_BADGE01_GET, CannotUseCut
|
||
checkpartymove MOVE_CUT
|
||
compare RESULT, 6
|
||
goto_if_eq CannotUseCut
|
||
setfieldeffectargument 0, RESULT
|
||
bufferpartymonnick 0, RESULT
|
||
buffermovename 1, MOVE_CUT
|
||
msgbox UseCutPromptText, MSGBOX_YESNO
|
||
compare RESULT, NO
|
||
goto_if_eq Cut_ChoseNo
|
||
msgbox UsedCutRockSmashText, 4
|
||
closemessage
|
||
dofieldeffect 2
|
||
waitstate
|
||
goto DoTreeCutMovement
|
||
end
|
||
|
||
S_UseCut:: @ 81B0E16
|
||
lockall
|
||
dofieldeffect 2
|
||
waitstate
|
||
goto DoTreeCutMovement
|
||
end
|
||
|
||
DoTreeCutMovement: @ 81B0E21
|
||
applymovement LAST_TALKED, TreeCutMovement @ tree cut animation
|
||
waitmovement 0
|
||
removeobject LAST_TALKED @ tree disappears
|
||
releaseall
|
||
end
|
||
|
||
TreeCutMovement: @ 81B0E30
|
||
step_5b
|
||
step_end
|
||
|
||
CannotUseCut: @ 81B0E32
|
||
msgbox CannotUseCutText, 3
|
||
releaseall
|
||
end
|
||
|
||
Cut_ChoseNo: @ 81B0E3C
|
||
closemessage
|
||
releaseall
|
||
end
|
||
|
||
UseCutPromptText: @ 81B0E3F
|
||
.string "This tree looks like it can be CUT down.\p"
|
||
.string "Would you like to CUT it?$"
|
||
|
||
UsedCutRockSmashText: @ 81B0E82
|
||
.string "{STR_VAR_1} used {STR_VAR_2}.$"
|
||
|
||
CannotUseCutText: @ 81B0E8E
|
||
.string "This tree looks like it can be CUT down.$"
|
||
|
||
S_BreakableRock:: @ 81B0EB7
|
||
lockall
|
||
goto_if_unset FLAG_BADGE03_GET, CannotUseRockSmash
|
||
checkpartymove MOVE_ROCK_SMASH
|
||
compare RESULT, 6
|
||
goto_if_eq CannotUseRockSmash
|
||
setfieldeffectargument 0, RESULT
|
||
bufferpartymonnick 0, RESULT
|
||
buffermovename 1, MOVE_ROCK_SMASH
|
||
msgbox UseRockSmashPromptText, MSGBOX_YESNO
|
||
compare RESULT, NO
|
||
goto_if_eq RockSmash_ChoseNo
|
||
msgbox UsedCutRockSmashText, 4
|
||
closemessage
|
||
dofieldeffect 37
|
||
waitstate
|
||
goto DoRockSmashMovement
|
||
end
|
||
|
||
S_UseRockSmash:: @ 81B0F01
|
||
lockall
|
||
dofieldeffect 37
|
||
waitstate
|
||
goto DoRockSmashMovement
|
||
end
|
||
|
||
DoRockSmashMovement: @ 81B0F0C
|
||
applymovement LAST_TALKED, RockSmashMovement
|
||
waitmovement 0
|
||
removeobject LAST_TALKED
|
||
specialvar RESULT, TryUpdateRusturfTunnelState
|
||
compare RESULT, 1
|
||
goto_if_eq DoRockSmashMovement_Done
|
||
special ScrSpecial_RockSmashWildEncounter
|
||
compare RESULT, 0
|
||
goto_if_eq DoRockSmashMovement_Done
|
||
waitstate
|
||
releaseall
|
||
end
|
||
|
||
DoRockSmashMovement_Done: @ 81B0F3A
|
||
releaseall
|
||
end
|
||
|
||
RockSmashMovement: @ 81B0F3C
|
||
step_5a
|
||
step_end
|
||
|
||
CannotUseRockSmash: @ 81B0F3E
|
||
msgbox CannotUseRockSmashText, 3
|
||
releaseall
|
||
end
|
||
|
||
RockSmash_ChoseNo: @ 81B0F48
|
||
closemessage
|
||
releaseall
|
||
end
|
||
|
||
UseRockSmashPromptText: @ 81B0F4B
|
||
.string "This rock appears to be breakable.\n"
|
||
.string "Would you like to use ROCK SMASH?$"
|
||
|
||
CannotUseRockSmashText: @ 81B0F90
|
||
.string "It’s a rugged rock, but a POKéMON\n"
|
||
.string "may be able to smash it.$"
|
||
|
||
S_PushableBoulder:: @ 81B0FCB
|
||
lockall
|
||
goto_if_unset FLAG_BADGE04_GET, CannotUseStrength
|
||
goto_if_set FLAG_SYS_USE_STRENGTH, AlreadyUsedStrength
|
||
checkpartymove 70
|
||
compare RESULT, 6
|
||
goto_if_eq CannotUseStrength
|
||
setfieldeffectargument 0, RESULT
|
||
msgbox UseStrengthPromptText, MSGBOX_YESNO
|
||
compare RESULT, NO
|
||
goto_if_eq Strength_ChoseNo
|
||
closemessage
|
||
dofieldeffect 40
|
||
waitstate
|
||
goto UsedStrength
|
||
end
|
||
|
||
S_UseStrength:: @ 81B100E
|
||
lockall
|
||
dofieldeffect 40
|
||
waitstate
|
||
goto UsedStrength
|
||
end
|
||
|
||
UsedStrength: @ 81B1019
|
||
setflag FLAG_SYS_USE_STRENGTH
|
||
msgbox UsedStrengthText, 3
|
||
releaseall
|
||
end
|
||
|
||
CannotUseStrength: @ 81B1026
|
||
msgbox CannotUseStrengthText, 3
|
||
releaseall
|
||
end
|
||
|
||
AlreadyUsedStrength: @ 81B1030
|
||
msgbox AlreadyUsedStrengthText, 3
|
||
releaseall
|
||
end
|
||
|
||
Strength_ChoseNo: @ 81B103A
|
||
closemessage
|
||
releaseall
|
||
end
|
||
|
||
UseStrengthPromptText: @ 81B103D
|
||
.string "It’s a big boulder, but a POKéMON\n"
|
||
.string "may be able to push it aside.\p"
|
||
.string "Would you like to use STRENGTH?$"
|
||
|
||
UsedStrengthText: @ 81B109D
|
||
.string "{STR_VAR_1} used STRENGTH.\p"
|
||
.string "{STR_VAR_1}’s STRENGTH made it possible\n"
|
||
.string "to move boulders around.$"
|
||
|
||
CannotUseStrengthText: @ 81B10E7
|
||
.string "It’s a big boulder, but a POKéMON\n"
|
||
.string "may be able to push it aside.$"
|
||
|
||
AlreadyUsedStrengthText: @ 81B1127
|
||
.string "STRENGTH made it possible to move\n"
|
||
.string "boulders around.$"
|
||
|
||
S_UseWaterfall:: @ 81B115A
|
||
lockall
|
||
checkpartymove MOVE_WATERFALL
|
||
compare RESULT, 6
|
||
goto_if_eq Waterfall_NoMonKnows
|
||
bufferpartymonnick 0, RESULT
|
||
setfieldeffectargument 0, RESULT
|
||
msgbox UseWaterfallPromptText, MSGBOX_YESNO
|
||
compare RESULT, NO
|
||
goto_if_eq Waterfall_Done
|
||
msgbox UsedWaterfallText, 4
|
||
dofieldeffect 43
|
||
goto Waterfall_Done
|
||
|
||
S_CannotUseWaterfall:: @ 81B1194
|
||
lockall
|
||
Waterfall_NoMonKnows: @ 81B1195
|
||
msgbox CannotUseWaterfallText, 4
|
||
Waterfall_Done: @ 81B119D
|
||
releaseall
|
||
end
|
||
|
||
CannotUseWaterfallText: @ 81B119F
|
||
.string "A wall of water is crashing down with\n"
|
||
.string "a mighty roar.$"
|
||
|
||
UseWaterfallPromptText: @ 81B11D4
|
||
.string "It’s a large waterfall.\n"
|
||
.string "Would you like to use WATERFALL?$"
|
||
|
||
UsedWaterfallText: @ 81B120D
|
||
.string "{STR_VAR_1} used WATERFALL.$"
|
||
|
||
UseDiveScript:: @ 81B1220
|
||
lockall
|
||
checkpartymove MOVE_DIVE
|
||
compare RESULT, 6
|
||
goto_if_eq CannotUseDive
|
||
bufferpartymonnick 0, RESULT
|
||
setfieldeffectargument 0, RESULT
|
||
setfieldeffectargument 1, 1
|
||
msgbox UseDivePromptText, MSGBOX_YESNO
|
||
compare RESULT, NO
|
||
goto_if_eq Dive_Done
|
||
msgbox UsedDiveText, 4
|
||
dofieldeffect 44
|
||
goto Dive_Done
|
||
lockall
|
||
|
||
CannotUseDive: @ 81B125F
|
||
msgbox CannotUseDiveText, 4
|
||
|
||
Dive_Done: @ 81B1267
|
||
releaseall
|
||
end
|
||
|
||
S_UseDiveUnderwater:: @ 81B1269
|
||
lockall
|
||
checkpartymove MOVE_DIVE
|
||
compare RESULT, 6
|
||
goto_if_eq UnderwaterCannotUseDive
|
||
bufferpartymonnick 0, RESULT
|
||
setfieldeffectargument 0, RESULT
|
||
setfieldeffectargument 1, 1
|
||
msgbox UnderwaterUseDivePromptText, MSGBOX_YESNO
|
||
compare RESULT, NO
|
||
goto_if_eq UnderwaterDive_Done
|
||
msgbox UsedDiveText, 4
|
||
dofieldeffect 44
|
||
goto UnderwaterDive_Done
|
||
|
||
UnderwaterCannotUseDive: @ 81B12A7
|
||
lockall
|
||
msgbox UnderwaterCannotUseDiveText, 4
|
||
goto UnderwaterDive_Done
|
||
|
||
@ not used
|
||
SurfacingBlocked: @ 81B12B5
|
||
lockall
|
||
msgbox SurfacingBlockedText, 4
|
||
|
||
UnderwaterDive_Done: @ 81B12BE
|
||
releaseall
|
||
end
|
||
|
||
CannotUseDiveText: @ 81B12C0
|
||
.string "The sea is deep here. A POKéMON may be\n"
|
||
.string "able to go underwater here.$"
|
||
|
||
UseDivePromptText: @ 81B1303
|
||
.string "The sea is deep here.\n"
|
||
.string "Would you like to use DIVE?$"
|
||
|
||
UsedDiveText: @ 81B1335
|
||
.string "{STR_VAR_1} used DIVE.$"
|
||
|
||
UnderwaterCannotUseDiveText: @ 81B1343
|
||
.string "Light is filtering down from above.\n"
|
||
.string "A POKéMON may be able to surface here.$"
|
||
|
||
UnderwaterUseDivePromptText: @ 81B138E
|
||
.string "Light is filtering down from above.\n"
|
||
.string "Would you like to use DIVE?$"
|
||
|
||
SurfacingBlockedText: @ 81B13CE
|
||
.string "There is something in the way above.\n"
|
||
.string "DIVE can’t be used here.$"
|
||
|
||
SweetScentNothingHereScript:: @ 81B140C
|
||
msgbox SweetScentNothingHereText, 3
|
||
end
|
||
|
||
SweetScentNothingHereText: @ 81B1415
|
||
.string "There appears to be nothing here...$"
|