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

73 lines
2.2 KiB
PHP

LavenderTown_House2_MapScripts::
.byte 0
LavenderTown_House2_EventScript_NameRater::
lock
faceplayer
msgbox LavenderTown_House2_Text_WantMeToRateNicknames, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq LavenderTown_House2_EventScript_ChooseMon
compare VAR_RESULT, NO
goto_if_eq LavenderTown_House2_EventScript_DontRateNickname
end
LavenderTown_House2_EventScript_ChooseMon::
msgbox LavenderTown_House2_Text_CritiqueWhichMonsNickname
special ChoosePartyMon
waitstate
compare VAR_0x8004, PARTY_SIZE
goto_if_lt LavenderTown_House2_EventScript_CheckCanRateMon
compare VAR_0x8004, PARTY_SIZE
goto_if_ge LavenderTown_House2_EventScript_DontRateNickname
end
LavenderTown_House2_EventScript_DontRateNickname::
msgbox LavenderTown_House2_Text_ISeeComeVisitAgain
release
end
LavenderTown_House2_EventScript_CheckCanRateMon::
specialvar VAR_RESULT, GetPartyMonSpecies
compare VAR_RESULT, SPECIES_EGG
goto_if_eq LavenderTown_House2_EventScript_CantNicknameEgg
special BufferMonNickname
special IsMonOTIDNotPlayers
compare VAR_RESULT, TRUE
goto_if_eq LavenderTown_House2_EventScript_CantNicknameTradeMon
specialvar VAR_RESULT, IsMonOTNameNotPlayers
special BufferMonNickname
compare VAR_RESULT, TRUE
goto_if_eq LavenderTown_House2_EventScript_CantNicknameTradeMon
msgbox LavenderTown_House2_Text_GiveItANicerName, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq LavenderTown_House2_EventScript_ChooseNewNickname
compare VAR_RESULT, NO
goto_if_eq LavenderTown_House2_EventScript_DontRateNickname
end
LavenderTown_House2_EventScript_CantNicknameEgg::
msgbox LavenderTown_House2_Text_ThatIsMerelyAnEgg
release
end
LavenderTown_House2_EventScript_CantNicknameTradeMon::
msgbox LavenderTown_House2_Text_TrulyImpeccableName
release
end
LavenderTown_House2_EventScript_ChooseNewNickname::
msgbox LavenderTown_House2_Text_WhatShallNewNicknameBe
call EventScript_ChangePokemonNickname
specialvar VAR_RESULT, NameRaterWasNicknameChanged
special BufferMonNickname
compare VAR_RESULT, TRUE
goto_if_eq LavenderTown_House2_EventScript_ChoseNewNickname
msgbox LavenderTown_House2_Text_FromNowOnShallBeKnownAsSameName
release
end
LavenderTown_House2_EventScript_ChoseNewNickname::
msgbox LavenderTown_House2_Text_FromNowOnShallBeKnownAsName
release
end