pokefirered/data/maps/LavenderTown_House2/scripts.inc
2022-08-09 20:41:54 -04:00

63 lines
2.2 KiB
PHP

LavenderTown_House2_MapScripts::
.byte 0
LavenderTown_House2_EventScript_NameRater::
lock
faceplayer
msgbox LavenderTown_House2_Text_WantMeToRateNicknames, MSGBOX_YESNO
goto_if_eq VAR_RESULT, YES, LavenderTown_House2_EventScript_ChooseMon
goto_if_eq VAR_RESULT, NO, LavenderTown_House2_EventScript_DontRateNickname
end
LavenderTown_House2_EventScript_ChooseMon::
msgbox LavenderTown_House2_Text_CritiqueWhichMonsNickname
special ChoosePartyMon
waitstate
goto_if_lt VAR_0x8004, PARTY_SIZE, LavenderTown_House2_EventScript_CheckCanRateMon
goto_if_ge VAR_0x8004, PARTY_SIZE, LavenderTown_House2_EventScript_DontRateNickname
end
LavenderTown_House2_EventScript_DontRateNickname::
msgbox LavenderTown_House2_Text_ISeeComeVisitAgain
release
end
LavenderTown_House2_EventScript_CheckCanRateMon::
specialvar VAR_RESULT, GetPartyMonSpecies
goto_if_eq VAR_RESULT, SPECIES_EGG, LavenderTown_House2_EventScript_CantNicknameEgg
special BufferMonNickname
special IsMonOTIDNotPlayers
goto_if_eq VAR_RESULT, TRUE, LavenderTown_House2_EventScript_CantNicknameTradeMon
specialvar VAR_RESULT, IsMonOTNameNotPlayers
special BufferMonNickname
goto_if_eq VAR_RESULT, TRUE, LavenderTown_House2_EventScript_CantNicknameTradeMon
msgbox LavenderTown_House2_Text_GiveItANicerName, MSGBOX_YESNO
goto_if_eq VAR_RESULT, YES, LavenderTown_House2_EventScript_ChooseNewNickname
goto_if_eq VAR_RESULT, NO, 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
goto_if_eq VAR_RESULT, TRUE, LavenderTown_House2_EventScript_ChoseNewNickname
msgbox LavenderTown_House2_Text_FromNowOnShallBeKnownAsSameName
release
end
LavenderTown_House2_EventScript_ChoseNewNickname::
msgbox LavenderTown_House2_Text_FromNowOnShallBeKnownAsName
release
end