pokeemerald/data/maps/SlateportCity_NameRatersHouse/scripts.inc
2021-11-15 10:57:06 -05:00

122 lines
4.3 KiB
PHP

SlateportCity_NameRatersHouse_MapScripts::
.byte 0
SlateportCity_NameRatersHouse_EventScript_NameRater::
lock
faceplayer
msgbox SlateportCity_NameRatersHouse_Text_PleasedToRateMonNickname, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq SlateportCity_NameRatersHouse_EventScript_ChooseMonToRate
compare VAR_RESULT, NO
goto_if_eq SlateportCity_NameRatersHouse_EventScript_DeclineNameRate
end
SlateportCity_NameRatersHouse_EventScript_ChooseMonToRate::
msgbox SlateportCity_NameRatersHouse_Text_CritiqueWhichMonNickname, MSGBOX_DEFAULT
special ChoosePartyMon
waitstate
compare VAR_0x8004, PARTY_NOTHING_CHOSEN
goto_if_ne SlateportCity_NameRatersHouse_EventScript_RateMonNickname
compare VAR_0x8004, PARTY_NOTHING_CHOSEN
goto_if_eq SlateportCity_NameRatersHouse_EventScript_DeclineNameRate
end
SlateportCity_NameRatersHouse_EventScript_DeclineNameRate::
msgbox SlateportCity_NameRatersHouse_Text_DoVisitAgain, MSGBOX_DEFAULT
release
end
SlateportCity_NameRatersHouse_EventScript_RateMonNickname::
specialvar VAR_RESULT, ScriptGetPartyMonSpecies
compare VAR_RESULT, SPECIES_EGG
goto_if_eq SlateportCity_NameRatersHouse_EventScript_CantRateEgg
special BufferMonNickname
special IsMonOTIDNotPlayers
compare VAR_RESULT, TRUE
goto_if_eq SlateportCity_NameRatersHouse_EventScript_PlayerNotMonsOT
specialvar VAR_RESULT, MonOTNameNotPlayer
special BufferMonNickname
compare VAR_RESULT, TRUE
goto_if_eq SlateportCity_NameRatersHouse_EventScript_PlayerNotMonsOT
msgbox SlateportCity_NameRatersHouse_Text_FineNameSuggestBetterOne, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq SlateportCity_NameRatersHouse_EventScript_ChangeNickname
compare VAR_RESULT, NO
goto_if_eq SlateportCity_NameRatersHouse_EventScript_DeclineNameRate
end
SlateportCity_NameRatersHouse_EventScript_CantRateEgg::
msgbox SlateportCity_NameRatersHouse_Text_ThatIsMerelyAnEgg, MSGBOX_DEFAULT
release
end
SlateportCity_NameRatersHouse_EventScript_PlayerNotMonsOT::
msgbox SlateportCity_NameRatersHouse_Text_MagnificentName, MSGBOX_DEFAULT
release
end
SlateportCity_NameRatersHouse_EventScript_ChangeNickname::
msgbox SlateportCity_NameRatersHouse_Text_WhatShallNewNameBe, MSGBOX_DEFAULT
call Common_EventScript_NameReceivedPartyMon
specialvar VAR_RESULT, TryPutNameRaterShowOnTheAir
special BufferMonNickname
compare VAR_RESULT, TRUE
goto_if_eq SlateportCity_NameRatersHouse_EventScript_NewNameDifferent
msgbox SlateportCity_NameRatersHouse_Text_NameNoDifferentYetSuperior, MSGBOX_DEFAULT
release
end
SlateportCity_NameRatersHouse_EventScript_NewNameDifferent::
msgbox SlateportCity_NameRatersHouse_Text_MonShallBeKnownAsName, MSGBOX_DEFAULT
release
end
SlateportCity_NameRatersHouse_Text_PleasedToRateMonNickname:
.string "Hi, hi! I'm the NAME RATER!\n"
.string "I'm the fortune-teller of names!\p"
.string "I shall be pleased to rate your\n"
.string "POKéMON's nickname.$"
SlateportCity_NameRatersHouse_Text_CritiqueWhichMonNickname:
.string "Which POKéMON's nickname should\n"
.string "I critique?$"
SlateportCity_NameRatersHouse_Text_FineNameSuggestBetterOne:
.string "Hmmm… {STR_VAR_1}, is it? That is\n"
.string "quite a fine name you bestowed.\p"
.string "But! What say you, if I were to\n"
.string "suggest a slightly better name?$"
SlateportCity_NameRatersHouse_Text_WhatShallNewNameBe:
.string "Ah, good. Then, what shall the new\n"
.string "nickname be?$"
SlateportCity_NameRatersHouse_Text_MonShallBeKnownAsName:
.string "Done! From now on, this POKéMON\n"
.string "shall be known as {STR_VAR_1}!\p"
.string "It is a better name than before!\n"
.string "How fortunate for you!$"
SlateportCity_NameRatersHouse_Text_DoVisitAgain:
.string "I see.\n"
.string "Do come visit again.$"
SlateportCity_NameRatersHouse_Text_NameNoDifferentYetSuperior:
.string "Done! From now on, this POKéMON\n"
.string "shall be known as {STR_VAR_1}!\p"
.string "It looks no different from before,\n"
.string "and yet, this is vastly superior!\p"
.string "How fortunate for you!$"
SlateportCity_NameRatersHouse_Text_MagnificentName:
.string "Hmmm… {STR_VAR_1} it is!\p"
.string "This is a magnificent nickname!\n"
.string "It is impeccably beyond reproach!\p"
.string "You'll do well to cherish your\n"
.string "{STR_VAR_1} now and beyond.$"
SlateportCity_NameRatersHouse_Text_ThatIsMerelyAnEgg:
.string "Now, now.\n"
.string "That is merely an EGG!$"