Files
2024-07-05 07:31:42 -04:00

57 lines
1.6 KiB
ObjectPascal

BattleFrontier_Lounge5_MapScripts::
.byte 0
BattleFrontier_Lounge5_EventScript_NatureGirl::
lock
faceplayer
msgbox BattleFrontier_Lounge5_Text_NatureGirlGreeting, MSGBOX_YESNO
goto_if_eq VAR_RESULT, NO, BattleFrontier_Lounge5_EventScript_NatureGirlNoneShown
special ChoosePartyMon
waitstate
lock
faceplayer
goto_if_eq VAR_0x8004, PARTY_NOTHING_CHOSEN, BattleFrontier_Lounge5_EventScript_NatureGirlNoneShown
specialvar VAR_RESULT, ScriptGetPartyMonSpecies
goto_if_eq VAR_RESULT, SPECIES_EGG, BattleFrontier_Lounge5_EventScript_NatureGirlEgg
special ShowNatureGirlMessage
waitmessage
waitbuttonpress
release
end
BattleFrontier_Lounge5_EventScript_NatureGirlEgg::
msgbox BattleFrontier_Lounge5_Text_NatureGirlEgg, MSGBOX_DEFAULT
release
end
BattleFrontier_Lounge5_EventScript_NatureGirlNoneShown::
msgbox BattleFrontier_Lounge5_Text_NatureGirlNoneShown, MSGBOX_DEFAULT
release
end
BattleFrontier_Lounge5_EventScript_Gentleman::
msgbox BattleFrontier_Lounge5_Text_LadyClaimsSheUnderstandsPokemon, MSGBOX_NPC
end
BattleFrontier_Lounge5_EventScript_BlackBelt::
msgbox BattleFrontier_Lounge5_Text_GirlSayingSomethingProfound, MSGBOX_NPC
end
BattleFrontier_Lounge5_EventScript_LittleBoy::
msgbox BattleFrontier_Lounge5_Text_GirlPlaysAtRedHouseALot, MSGBOX_NPC
end
.ifdef FRENCH
.include "data/maps/BattleFrontier_Lounge5/text_fr.inc"
.else
.ifdef ITALIAN
.include "data/maps/BattleFrontier_Lounge5/text_it.inc"
.else
.ifdef SPANISH
.include "data/maps/BattleFrontier_Lounge5/text_es.inc"
.else
.include "data/maps/BattleFrontier_Lounge5/text.inc"
.endif
.endif
.endif