2025-06-02 14:17:22 +08:00

83 lines
3.7 KiB
C++
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

FallarborTown_MoveRelearnersHouse_MapScripts::
.byte 0
FallarborTown_MoveRelearnersHouse_EventScript_MoveRelearner::
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::
checkitem ITEM_HEART_SCALE
goto_if_eq VAR_RESULT, FALSE, 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::
msgbox FallarborTown_MoveRelearnersHouse_Text_TutorWhichMon, MSGBOX_DEFAULT
special ChooseMonForMoveRelearner
waitstate
goto_if_eq VAR_0x8004, PARTY_NOTHING_CHOSEN, FallarborTown_MoveRelearnersHouse_EventScript_ComeBackWithHeartScale
special IsSelectedMonEgg
goto_if_eq VAR_RESULT, TRUE, FallarborTown_MoveRelearnersHouse_EventScript_CantTeachEgg
goto_if_eq VAR_0x8005, 0, FallarborTown_MoveRelearnersHouse_EventScript_NoMoveToTeachMon
goto FallarborTown_MoveRelearnersHouse_EventScript_ChooseMove
end
FallarborTown_MoveRelearnersHouse_EventScript_ChooseMove::
msgbox FallarborTown_MoveRelearnersHouse_Text_TeachWhichMove, MSGBOX_DEFAULT
special TeachMoveRelearnerMove
waitstate
goto_if_eq VAR_0x8004, 0, 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::
msgbox FallarborTown_MoveRelearnersHouse_Text_DontHaveMoveToTeachPokemon, MSGBOX_DEFAULT
goto FallarborTown_MoveRelearnersHouse_EventScript_ChooseMon
end
FallarborTown_MoveRelearnersHouse_EventScript_CantTeachEgg::
msgbox FallarborTown_MoveRelearnersHouse_Text_CantTeachEgg, MSGBOX_DEFAULT
goto FallarborTown_MoveRelearnersHouse_EventScript_ChooseMon
end
FallarborTown_MoveRelearnersHouse_EventScript_ComeBackWithHeartScale::
msgbox FallarborTown_MoveRelearnersHouse_Text_ComeBackWithHeartScale, MSGBOX_DEFAULT
releaseall
end
FallarborTown_MoveRelearnersHouse_Text_ImTheMoveTutor:
.string "大家都叫我\n宝可梦招式爱好者!\p宝可梦成长过程中能学会的\n所有招式我都一清二楚。\p我知道的那些招式\n甚至可以教给宝可梦!\p如果你给我心之鳞片\n我就把知道的招式教给你的宝可梦!$"
FallarborTown_MoveRelearnersHouse_Text_ThatsAHeartScaleWantMeToTeachMove:
.string "哇哦!\n这是心之鳞片!\p要把招式教给你的宝可梦吗$"
FallarborTown_MoveRelearnersHouse_Text_TutorWhichMon:
.string "要选择哪只宝可梦?$"
FallarborTown_MoveRelearnersHouse_Text_TeachWhichMove:
.string "要学习哪个招式?$"
FallarborTown_MoveRelearnersHouse_Text_DontHaveMoveToTeachPokemon:
.string "抱歉……\p我看来没有能够教给\n这只宝可梦的招式。$"
FallarborTown_MoveRelearnersHouse_Text_HandedOverHeartScale:
.string "{PLAYER}将1个心之鳞片\n作为谢礼送给了对方!$"
FallarborTown_MoveRelearnersHouse_Text_ComeBackWithHeartScale:
.string "如果有想让宝可梦学习的招式,\n就把心之鳞片带过来吧!$"
FallarborTown_MoveRelearnersHouse_Text_CantTeachEgg:
.string "嗯……\p蛋应该没法学习招式吧$"