pokeemerald/data/maps/FallarborTown_MoveRelearnersHouse/scripts.inc

100 lines
3.9 KiB
PHP
Raw Normal View History

.set LOCALID_MOVE_RELEARNER, 1
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_MapScripts::
2019-10-18 01:22:03 +02:00
.byte 0
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_EventScript_MoveRelearner::
2019-10-18 01:22:03 +02:00
lockall
applymovement LOCALID_MOVE_RELEARNER, Common_Movement_FacePlayer
2019-10-18 01:22:03 +02:00
waitmovement 0
goto_if_set FLAG_TEMP_1, FallarborTown_MoveRelearnersHouse_EventScript_AskTeachMove
msgbox FallarborTown_MoveRelearnersHouse_Text_ImTheMoveTutor, MSGBOX_DEFAULT
setflag FLAG_TEMP_1
goto FallarborTown_MoveRelearnersHouse_EventScript_AskTeachMove
end
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_EventScript_AskTeachMove::
2021-08-05 18:46:11 +02:00
checkitem ITEM_HEART_SCALE
goto_if_eq VAR_RESULT, FALSE, FallarborTown_MoveRelearnersHouse_EventScript_ComeBackWithHeartScale
2019-10-18 01:22:03 +02:00
msgbox FallarborTown_MoveRelearnersHouse_Text_ThatsAHeartScaleWantMeToTeachMove, MSGBOX_YESNO
switch VAR_RESULT
2019-11-02 17:34:53 +01:00
case NO, FallarborTown_MoveRelearnersHouse_EventScript_ComeBackWithHeartScale
2019-10-18 01:22:03 +02:00
goto FallarborTown_MoveRelearnersHouse_EventScript_ChooseMon
end
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_EventScript_ChooseMon::
2019-10-18 01:22:03 +02:00
msgbox FallarborTown_MoveRelearnersHouse_Text_TutorWhichMon, MSGBOX_DEFAULT
special ChooseMonForMoveRelearner
waitstate
goto_if_eq VAR_0x8004, PARTY_NOTHING_CHOSEN, FallarborTown_MoveRelearnersHouse_EventScript_ComeBackWithHeartScale
2019-10-18 01:22:03 +02:00
special IsSelectedMonEgg
goto_if_eq VAR_RESULT, TRUE, FallarborTown_MoveRelearnersHouse_EventScript_CantTeachEgg
goto_if_eq VAR_0x8005, 0, FallarborTown_MoveRelearnersHouse_EventScript_NoMoveToTeachMon
2019-10-18 01:22:03 +02:00
goto FallarborTown_MoveRelearnersHouse_EventScript_ChooseMove
end
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_EventScript_ChooseMove::
2019-10-18 01:22:03 +02:00
msgbox FallarborTown_MoveRelearnersHouse_Text_TeachWhichMove, MSGBOX_DEFAULT
special TeachMoveRelearnerMove
waitstate
goto_if_eq VAR_0x8004, 0, FallarborTown_MoveRelearnersHouse_EventScript_ChooseMon
2019-10-18 01:22:03 +02:00
msgbox FallarborTown_MoveRelearnersHouse_Text_HandedOverHeartScale, MSGBOX_DEFAULT
removeitem ITEM_HEART_SCALE
2019-10-18 01:22:03 +02:00
goto FallarborTown_MoveRelearnersHouse_EventScript_ComeBackWithHeartScale
end
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_EventScript_NoMoveToTeachMon::
2019-10-18 01:22:03 +02:00
msgbox FallarborTown_MoveRelearnersHouse_Text_DontHaveMoveToTeachPokemon, MSGBOX_DEFAULT
goto FallarborTown_MoveRelearnersHouse_EventScript_ChooseMon
end
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_EventScript_CantTeachEgg::
2019-10-18 01:22:03 +02:00
msgbox FallarborTown_MoveRelearnersHouse_Text_CantTeachEgg, MSGBOX_DEFAULT
goto FallarborTown_MoveRelearnersHouse_EventScript_ChooseMon
end
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_EventScript_ComeBackWithHeartScale::
2019-10-18 01:22:03 +02:00
msgbox FallarborTown_MoveRelearnersHouse_Text_ComeBackWithHeartScale, MSGBOX_DEFAULT
releaseall
end
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_Text_ImTheMoveTutor:
2019-10-18 01:22:03 +02:00
.string "I'm the MOVE TUTOR.\p"
.string "I know all the moves that POKéMON\n"
.string "learn--every one of them--and I can\l"
.string "teach POKéMON those moves.\p"
.string "I can teach a move to a POKéMON\n"
.string "of yours if you'd like.\p"
.string "I'll do it for a HEART SCALE.\n"
.string "I'm collecting those now.$"
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_Text_ThatsAHeartScaleWantMeToTeachMove:
2019-10-18 01:22:03 +02:00
.string "Oh! That's it! That's an honest to\n"
.string "goodness HEART SCALE!\p"
.string "Let me guess, you want me to teach\n"
.string "a move?$"
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_Text_TutorWhichMon:
2019-10-18 01:22:03 +02:00
.string "Which POKéMON needs tutoring?$"
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_Text_TeachWhichMove:
2019-10-18 01:22:03 +02:00
.string "Which move should I teach?$"
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_Text_DontHaveMoveToTeachPokemon:
2019-10-18 01:22:03 +02:00
.string "Sorry…\p"
.string "It doesn't appear as if I have any move\n"
.string "I can teach that POKéMON.$"
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_Text_HandedOverHeartScale:
2019-10-18 01:22:03 +02:00
.string "{PLAYER} handed over one HEART SCALE\n"
.string "in exchange.$"
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_Text_ComeBackWithHeartScale:
2019-10-18 01:22:03 +02:00
.string "If your POKéMON need to learn a move,\n"
.string "come back with a HEART SCALE.$"
2021-07-20 21:18:31 +02:00
FallarborTown_MoveRelearnersHouse_Text_CantTeachEgg:
2019-10-18 01:22:03 +02:00
.string "Hunh? There isn't a single move that\n"
.string "I can teach an EGG.$"