pokefirered/data/scripts/move_tutors.inc
2022-06-24 21:10:48 -04:00

583 lines
14 KiB
PHP

VictoryRoad_2F_EventScript_DoubleEdgeTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_DOUBLE_EDGE, EventScript_DoubleEdgeTaught
msgbox Text_DoubleEdgeTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_DoubleEdgeDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_DoubleEdgeDeclined
msgbox Text_DoubleEdgeWhichMon
setvar VAR_0x8005, MOVETUTOR_DOUBLE_EDGE
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_DoubleEdgeDeclined
setflag FLAG_TUTOR_DOUBLE_EDGE
goto EventScript_DoubleEdgeTaught
end
EventScript_DoubleEdgeDeclined::
msgbox Text_DoubleEdgeDeclined
release
end
EventScript_DoubleEdgeTaught::
msgbox Text_DoubleEdgeTaught
release
end
EventScript_ThunderWaveTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_THUNDER_WAVE, EventScript_ThunderWaveTaught
msgbox Text_ThunderWaveTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_ThunderWaveDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_ThunderWaveDeclined
msgbox Text_ThunderWaveWhichMon
setvar VAR_0x8005, MOVETUTOR_THUNDER_WAVE
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_ThunderWaveDeclined
setflag FLAG_TUTOR_THUNDER_WAVE
goto EventScript_ThunderWaveTaught
end
EventScript_ThunderWaveDeclined::
msgbox Text_ThunderWaveDeclined
release
end
EventScript_ThunderWaveTaught::
msgbox Text_ThunderWaveTaught
release
end
RockTunnel_B1F_EventScript_RockSlideTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_ROCK_SLIDE, EventScript_RockSlideTaught
msgbox Text_RockSlideTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_RockSlideDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_RockSlideDeclined
msgbox Text_RockSlideWhichMon
setvar VAR_0x8005, MOVETUTOR_ROCK_SLIDE
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_RockSlideDeclined
setflag FLAG_TUTOR_ROCK_SLIDE
goto EventScript_RockSlideTaught
end
EventScript_RockSlideDeclined::
msgbox Text_RockSlideDeclined
release
end
EventScript_RockSlideTaught::
msgbox Text_RockSlideTaught
release
end
MtEmber_Exterior_EventScript_ExplosionTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_EXPLOSION, EventScript_ExplosionTaught
msgbox Text_ExplosionTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_ExplosionDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_ExplosionDeclined
msgbox Text_ExplosionWhichMon
setvar VAR_0x8005, MOVETUTOR_EXPLOSION
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_ExplosionDeclined
setflag FLAG_TUTOR_EXPLOSION
goto EventScript_ExplosionTaught
end
EventScript_ExplosionDeclined::
msgbox Text_ExplosionDeclined
release
end
EventScript_ExplosionTaught::
msgbox Text_ExplosionTaught
release
end
Route4_EventScript_MegaPunchTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_MEGA_PUNCH, EventScript_MegaPunchTaught
msgbox Text_MegaPunchTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_MegaPunchDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_MegaPunchDeclined
msgbox Text_MegaPunchWhichMon
setvar VAR_0x8005, MOVETUTOR_MEGA_PUNCH
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_MegaPunchDeclined
setflag FLAG_TUTOR_MEGA_PUNCH
goto EventScript_MegaPunchTaught
end
EventScript_MegaPunchDeclined::
msgbox Text_MegaPunchDeclined
release
end
EventScript_MegaPunchTaught::
msgbox Text_MegaPunchTaught
release
end
Route4_EventScript_MegaKickTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_MEGA_KICK, EventScript_MegaKickTaught
msgbox Text_MegaKickTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_MegaKickDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_MegaKickDeclined
msgbox Text_MegaKickWhichMon
setvar VAR_0x8005, MOVETUTOR_MEGA_KICK
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_MegaKickDeclined
setflag FLAG_TUTOR_MEGA_KICK
goto EventScript_MegaKickTaught
end
EventScript_MegaKickDeclined::
msgbox Text_MegaKickDeclined
release
end
EventScript_MegaKickTaught::
msgbox Text_MegaKickTaught
release
end
EventScript_DreamEaterTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_DREAM_EATER, EventScript_DreamEaterTaught
msgbox Text_DreamEaterTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_DreamEaterDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_DreamEaterDeclined
msgbox Text_DreamEaterWhichMon
setvar VAR_0x8005, MOVETUTOR_DREAM_EATER
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_DreamEaterDeclined
setflag FLAG_TUTOR_DREAM_EATER
goto EventScript_DreamEaterTaught
end
EventScript_DreamEaterDeclined::
msgbox Text_DreamEaterDeclined
release
end
EventScript_DreamEaterTaught::
msgbox Text_DreamEaterTaught
release
end
EventScript_SoftboiledTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_SOFT_BOILED, EventScript_SoftboiledTaught
msgbox Text_SoftboiledTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_SoftboiledDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_SoftboiledDeclined
msgbox Text_SoftboiledWhichMon
setvar VAR_0x8005, MOVETUTOR_SOFT_BOILED
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_SoftboiledDeclined
setflag FLAG_TUTOR_SOFT_BOILED
goto EventScript_SoftboiledTaught
end
EventScript_SoftboiledDeclined::
msgbox Text_SoftboiledDeclined
release
end
EventScript_SoftboiledTaught::
msgbox Text_SoftboiledTaught
release
end
FuchsiaCity_EventScript_SubstituteTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_SUBSTITUTE, EventScript_SubstituteTaught
msgbox Text_SubstituteTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_SubstituteDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_SubstituteDeclined
msgbox Text_SubstituteWhichMon
setvar VAR_0x8005, MOVETUTOR_SUBSTITUTE
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_SubstituteDeclined
setflag FLAG_TUTOR_SUBSTITUTE
goto EventScript_SubstituteTaught
end
EventScript_SubstituteDeclined::
msgbox Text_SubstituteDeclined
release
end
EventScript_SubstituteTaught::
msgbox Text_SubstituteTaught
release
end
SevenIsland_EventScript_SwordsDanceTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_SWORDS_DANCE, EventScript_SwordsDanceTaught
msgbox Text_SwordsDanceTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_SwordsDanceDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_SwordsDanceDeclined
msgbox Text_SwordsDanceWhichMon
setvar VAR_0x8005, MOVETUTOR_SWORDS_DANCE
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_SwordsDanceDeclined
setflag FLAG_TUTOR_SWORDS_DANCE
goto EventScript_SwordsDanceTaught
end
EventScript_SwordsDanceDeclined::
msgbox Text_SwordsDanceDeclined
release
end
EventScript_SwordsDanceTaught::
msgbox Text_SwordsDanceTaught
release
end
PewterCity_Museum_1F_EventScript_SeismicTossTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_SEISMIC_TOSS, EventScript_SeismicTossTaught
msgbox Text_SeismicTossTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_SeismicTossDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_SeismicTossDeclined
msgbox Text_SeismicTossWhichMon
setvar VAR_0x8005, MOVETUTOR_SEISMIC_TOSS
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_SeismicTossDeclined
setflag FLAG_TUTOR_SEISMIC_TOSS
goto EventScript_SeismicTossTaught
end
EventScript_SeismicTossDeclined::
msgbox Text_SeismicTossDeclined
release
end
EventScript_SeismicTossTaught::
msgbox Text_SeismicTossTaught
release
end
EventScript_CounterTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_COUNTER, EventScript_CounterTaught
msgbox Text_CounterTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_CounterDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_CounterDeclined
msgbox Text_CounterWhichMon
setvar VAR_0x8005, MOVETUTOR_COUNTER
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_CounterDeclined
setflag FLAG_TUTOR_COUNTER
goto EventScript_CounterTaught
end
EventScript_CounterDeclined::
msgbox Text_CounterDeclined
release
end
EventScript_CounterTaught::
msgbox Text_CounterTaught
release
end
EventScript_MetronomeTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_METRONOME, EventScript_MetronomeTaught
msgbox Text_MetronomeTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_MetronomeDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_MetronomeDeclined
msgbox Text_MetronomeWhichMon
setvar VAR_0x8005, MOVETUTOR_METRONOME
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_MetronomeDeclined
setflag FLAG_TUTOR_METRONOME
goto EventScript_MetronomeTaught
end
EventScript_MetronomeDeclined::
msgbox Text_MetronomeDeclined
release
end
EventScript_MetronomeTaught::
msgbox Text_MetronomeTaught
release
end
EventScript_MimicTutor::
goto_if_set FLAG_TUTOR_MIMIC, EventScript_MimicTaught
msgbox Text_MimicTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_MimicDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_MimicDeclined
msgbox Text_MimicWhichMon
setvar VAR_0x8005, MOVETUTOR_MIMIC
call EventScript_ChooseMoveTutorMon
lock
faceplayer
compare VAR_RESULT, 0
goto_if_eq EventScript_MimicDeclined
removeitem ITEM_POKE_DOLL, 1
setflag FLAG_TUTOR_MIMIC
goto EventScript_MimicTaught
end
EventScript_MimicDeclined::
msgbox Text_MimicDeclined
release
end
EventScript_MimicTaught::
checkplayergender
compare VAR_RESULT, MALE
call_if_eq EventScript_MimicTaughtMale
compare VAR_RESULT, FEMALE
call_if_eq EventScript_MimicTaughtFemale
release
end
EventScript_MimicTaughtMale::
msgbox Text_MimicTaughtMale
return
EventScript_MimicTaughtFemale::
msgbox Text_MimicTaughtFemale
return
FourIsland_House1_EventScript_BodySlamTutor::
lock
faceplayer
goto_if_set FLAG_TUTOR_BODY_SLAM, EventScript_BodySlamTaught
msgbox Text_BodySlamTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_BodySlamDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_BodySlamDeclined
msgbox Text_BodySlamWhichMon
setvar VAR_0x8005, MOVETUTOR_BODY_SLAM
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_BodySlamDeclined
setflag FLAG_TUTOR_BODY_SLAM
goto EventScript_BodySlamTaught
end
EventScript_BodySlamDeclined::
msgbox Text_BodySlamDeclined
release
end
EventScript_BodySlamTaught::
msgbox Text_BodySlamTaught
release
end
.set LOCALID_CAPE_BRINK_TUTOR, 1
TwoIsland_CapeBrink_House_EventScript_StarterTutor::
goto_if_questlog EventScript_ReleaseEnd
special QuestLog_CutRecording
lock
faceplayer
goto_if_set FLAG_LEARNED_ALL_MOVES_AT_CAPE_BRINK, CapeBrinkTutor_EventScript_TaughtAllMoves
goto_if_set FLAG_TEMP_2, CapeBrinkTutor_EventScript_MoveJustTaught
getfirstpartymonname 0
msgbox Text_UltimateMoveThatMon
specialvar VAR_RESULT, CapeBrinkGetMoveToTeachLeadPokemon
compare VAR_RESULT, FALSE
goto_if_eq CapeBrinkTutor_EventScript_NoLeadStarter
copyvar VAR_0x8009, VAR_0x8005
compare VAR_FACING, DIR_NORTH
call_if_eq CapeBrinkTutor_EventScript_JumpInPlaceDown
compare VAR_FACING, DIR_SOUTH
call_if_eq CapeBrinkTutor_EventScript_JumpInPlaceUp
compare VAR_FACING, DIR_EAST
call_if_eq CapeBrinkTutor_EventScript_JumpInPlaceLeft
compare VAR_FACING, DIR_WEST
call_if_eq CapeBrinkTutor_EventScript_JumpInPlaceRight
msgbox Text_AllowMeToTeachMonUltimateMove, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq CapeBrinkTutor_EventScript_DeclineMove
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq CapeBrinkTutor_EventScript_DeclineMove
msgbox Text_LetMeConferUltimateMove
closemessage
fadescreen FADE_TO_BLACK
goto CapeBrinkTutor_EventScript_ChooseMon
@ Unused
CapeBrinkTutor_EventScript_FadeTaughtMove::
fadescreen FADE_FROM_BLACK
goto CapeBrinkTutor_EventScript_TaughtMove
end
CapeBrinkTutor_EventScript_MoveJustTaught::
msgbox Text_MakeBestUseOfMove
release
end
CapeBrinkTutor_EventScript_TaughtAllMoves::
msgbox Text_FeelRejuvenated
release
end
CapeBrinkTutor_EventScript_TaughtMove::
copyvar VAR_0x8005, VAR_0x8009
specialvar VAR_RESULT, HasLearnedAllMovesFromCapeBrinkTutor
compare VAR_RESULT, TRUE
goto_if_eq CapeBrinkTutor_EventScript_LearnedAllMoves
msgbox Text_TaughtMove
setflag FLAG_TEMP_2
release
end
CapeBrinkTutor_EventScript_LearnedAllMoves::
msgbox Text_PassedOnEverythingIKnow
setflag FLAG_LEARNED_ALL_MOVES_AT_CAPE_BRINK
release
end
CapeBrinkTutor_EventScript_ChooseMon::
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq CapeBrinkTutor_EventScript_DeclineMove
goto CapeBrinkTutor_EventScript_TaughtMove
end
CapeBrinkTutor_EventScript_JumpInPlaceDown::
applymovement LOCALID_CAPE_BRINK_TUTOR, Movement_JumpInPlaceDown
waitmovement 0
return
CapeBrinkTutor_EventScript_JumpInPlaceUp::
applymovement LOCALID_CAPE_BRINK_TUTOR, Movement_JumpInPlaceUp
waitmovement 0
return
CapeBrinkTutor_EventScript_JumpInPlaceLeft::
applymovement LOCALID_CAPE_BRINK_TUTOR, Movement_JumpInPlaceLeft
waitmovement 0
return
CapeBrinkTutor_EventScript_JumpInPlaceRight::
applymovement LOCALID_CAPE_BRINK_TUTOR, Movement_JumpInPlaceRight
waitmovement 0
return
CapeBrinkTutor_EventScript_DeclineMove::
msgbox Text_YouRejectIt
release
end
CapeBrinkTutor_EventScript_NoLeadStarter::
msgbox Text_JustMistaken
release
end
EventScript_ChooseMoveTutorMon::
special ChooseMonForMoveTutor
waitstate
lock
faceplayer
return
EventScript_CanOnlyBeLearnedOnce::
textcolor 3
special DisableMsgBoxWalkaway
signmsg
msgbox Text_MoveCanOnlyBeLearnedOnce, MSGBOX_YESNO
normalmsg
call EventScript_RestorePrevTextColor
return
Movement_JumpInPlaceDown:
jump_in_place_down
step_end
Movement_JumpInPlaceUp:
jump_in_place_up
step_end
Movement_JumpInPlaceLeft:
jump_in_place_left
step_end
Movement_JumpInPlaceRight:
jump_in_place_right
step_end