mirror of
https://github.com/Ninjdai1/pokeemerald.git
synced 2024-12-29 13:50:42 +01:00
105 lines
4.1 KiB
PHP
105 lines
4.1 KiB
PHP
.set LOCALID_MOVE_RELEARNER, 1
|
|
|
|
FallarborTown_MoveRelearnersHouse_MapScripts:: @ 8201382
|
|
.byte 0
|
|
|
|
FallarborTown_MoveRelearnersHouse_EventScript_MoveRelearner:: @ 8201383
|
|
lockall
|
|
applymovement LOCALID_MOVE_RELEARNER, Common_Movement_FacePlayer
|
|
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
|
|
|
|
FallarborTown_MoveRelearnersHouse_EventScript_AskTeachMove:: @ 82013A8
|
|
checkitem ITEM_HEART_SCALE, 1
|
|
compare VAR_RESULT, FALSE
|
|
goto_if_eq FallarborTown_MoveRelearnersHouse_EventScript_ComeBackWithHeartScale
|
|
msgbox FallarborTown_MoveRelearnersHouse_Text_ThatsAHeartScaleWantMeToTeachMove, MSGBOX_YESNO
|
|
switch VAR_RESULT
|
|
case NO, FallarborTown_MoveRelearnersHouse_EventScript_ComeBackWithHeartScale
|
|
goto FallarborTown_MoveRelearnersHouse_EventScript_ChooseMon
|
|
end
|
|
|
|
FallarborTown_MoveRelearnersHouse_EventScript_ChooseMon:: @ 82013D6
|
|
msgbox FallarborTown_MoveRelearnersHouse_Text_TutorWhichMon, MSGBOX_DEFAULT
|
|
special ChooseMonForMoveRelearner
|
|
waitstate
|
|
compare VAR_0x8004, 255
|
|
goto_if_eq FallarborTown_MoveRelearnersHouse_EventScript_ComeBackWithHeartScale
|
|
special IsSelectedMonEgg
|
|
compare VAR_RESULT, TRUE
|
|
goto_if_eq FallarborTown_MoveRelearnersHouse_EventScript_CantTeachEgg
|
|
compare VAR_0x8005, 0
|
|
goto_if_eq FallarborTown_MoveRelearnersHouse_EventScript_NoMoveToTeachMon
|
|
goto FallarborTown_MoveRelearnersHouse_EventScript_ChooseMove
|
|
end
|
|
|
|
FallarborTown_MoveRelearnersHouse_EventScript_ChooseMove:: @ 820140C
|
|
msgbox FallarborTown_MoveRelearnersHouse_Text_TeachWhichMove, MSGBOX_DEFAULT
|
|
special TeachMoveRelearnerMove
|
|
waitstate
|
|
compare VAR_0x8004, 0
|
|
goto_if_eq FallarborTown_MoveRelearnersHouse_EventScript_ChooseMon
|
|
msgbox FallarborTown_MoveRelearnersHouse_Text_HandedOverHeartScale, MSGBOX_DEFAULT
|
|
removeitem ITEM_HEART_SCALE
|
|
goto FallarborTown_MoveRelearnersHouse_EventScript_ComeBackWithHeartScale
|
|
end
|
|
|
|
FallarborTown_MoveRelearnersHouse_EventScript_NoMoveToTeachMon:: @ 8201436
|
|
msgbox FallarborTown_MoveRelearnersHouse_Text_DontHaveMoveToTeachPokemon, MSGBOX_DEFAULT
|
|
goto FallarborTown_MoveRelearnersHouse_EventScript_ChooseMon
|
|
end
|
|
|
|
FallarborTown_MoveRelearnersHouse_EventScript_CantTeachEgg:: @ 8201444
|
|
msgbox FallarborTown_MoveRelearnersHouse_Text_CantTeachEgg, MSGBOX_DEFAULT
|
|
goto FallarborTown_MoveRelearnersHouse_EventScript_ChooseMon
|
|
end
|
|
|
|
FallarborTown_MoveRelearnersHouse_EventScript_ComeBackWithHeartScale:: @ 8201452
|
|
msgbox FallarborTown_MoveRelearnersHouse_Text_ComeBackWithHeartScale, MSGBOX_DEFAULT
|
|
releaseall
|
|
end
|
|
|
|
FallarborTown_MoveRelearnersHouse_Text_ImTheMoveTutor: @ 820145C
|
|
.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.$"
|
|
|
|
FallarborTown_MoveRelearnersHouse_Text_ThatsAHeartScaleWantMeToTeachMove: @ 8201541
|
|
.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?$"
|
|
|
|
FallarborTown_MoveRelearnersHouse_Text_TutorWhichMon: @ 82015A5
|
|
.string "Which POKéMON needs tutoring?$"
|
|
|
|
FallarborTown_MoveRelearnersHouse_Text_TeachWhichMove: @ 82015C3
|
|
.string "Which move should I teach?$"
|
|
|
|
FallarborTown_MoveRelearnersHouse_Text_DontHaveMoveToTeachPokemon: @ 82015DE
|
|
.string "Sorry…\p"
|
|
.string "It doesn't appear as if I have any move\n"
|
|
.string "I can teach that POKéMON.$"
|
|
|
|
FallarborTown_MoveRelearnersHouse_Text_HandedOverHeartScale: @ 8201627
|
|
.string "{PLAYER} handed over one HEART SCALE\n"
|
|
.string "in exchange.$"
|
|
|
|
FallarborTown_MoveRelearnersHouse_Text_ComeBackWithHeartScale: @ 8201653
|
|
.string "If your POKéMON need to learn a move,\n"
|
|
.string "come back with a HEART SCALE.$"
|
|
|
|
FallarborTown_MoveRelearnersHouse_Text_CantTeachEgg: @ 8201697
|
|
.string "Hunh? There isn't a single move that\n"
|
|
.string "I can teach an EGG.$"
|
|
|