mirror of
https://github.com/pret/pokeemerald.git
synced 2026-09-26 13:23:14 -04:00
Eduardo Quezada
103 lines
2.4 KiB
ObjectPascal
103 lines
2.4 KiB
ObjectPascal
FortreeCity_MapScripts::
|
|
map_script MAP_SCRIPT_ON_TRANSITION, FortreeCity_OnTransition
|
|
map_script MAP_SCRIPT_ON_RESUME, FortreeCity_OnResume
|
|
.byte 0
|
|
|
|
FortreeCity_OnTransition:
|
|
setflag FLAG_VISITED_FORTREE_CITY
|
|
end
|
|
|
|
FortreeCity_OnResume:
|
|
setstepcallback STEP_CB_FORTREE_BRIDGE
|
|
end
|
|
|
|
FortreeCity_EventScript_Man::
|
|
msgbox FortreeCity_Text_SawGiganticPokemonInSky, MSGBOX_NPC
|
|
end
|
|
|
|
FortreeCity_EventScript_Woman::
|
|
lock
|
|
faceplayer
|
|
goto_if_set FLAG_KECLEON_FLED_FORTREE, FortreeCity_EventScript_WomanGymAccessible
|
|
msgbox FortreeCity_Text_SomethingBlockingGym, MSGBOX_DEFAULT
|
|
release
|
|
end
|
|
|
|
FortreeCity_EventScript_WomanGymAccessible::
|
|
msgbox FortreeCity_Text_ThisTimeIllBeatWinona, MSGBOX_DEFAULT
|
|
release
|
|
end
|
|
|
|
FortreeCity_EventScript_Girl::
|
|
msgbox FortreeCity_Text_TreesGrowByDrinkingRainwater, MSGBOX_NPC
|
|
end
|
|
|
|
FortreeCity_EventScript_OldMan::
|
|
msgbox FortreeCity_Text_EveryoneHealthyAndLively, MSGBOX_NPC
|
|
end
|
|
|
|
FortreeCity_EventScript_Boy::
|
|
msgbox FortreeCity_Text_BugPokemonComeThroughWindow, MSGBOX_NPC
|
|
end
|
|
|
|
FortreeCity_EventScript_GameboyKid::
|
|
msgbox FortreeCity_Text_PokemonThatEvolveWhenTraded, MSGBOX_NPC
|
|
end
|
|
|
|
FortreeCity_EventScript_CitySign::
|
|
msgbox FortreeCity_Text_CitySign, MSGBOX_SIGN
|
|
end
|
|
|
|
FortreeCity_EventScript_GymSign::
|
|
msgbox FortreeCity_Text_GymSign, MSGBOX_SIGN
|
|
end
|
|
|
|
FortreeCity_EventScript_Kecleon::
|
|
lock
|
|
faceplayer
|
|
checkitem ITEM_DEVON_SCOPE
|
|
goto_if_eq VAR_RESULT, TRUE, FortreeCity_EventScript_AskUseDevonScope
|
|
msgbox FortreeCity_Text_SomethingUnseeable, MSGBOX_DEFAULT
|
|
release
|
|
end
|
|
|
|
FortreeCity_EventScript_AskUseDevonScope::
|
|
msgbox FortreeCity_Text_UnseeableUseDevonScope, MSGBOX_YESNO
|
|
goto_if_eq VAR_RESULT, YES, FortreeCity_EventScript_UseDevonScope
|
|
release
|
|
end
|
|
|
|
FortreeCity_EventScript_UseDevonScope::
|
|
msgbox FortreeCity_Text_UsedDevonScopePokemonFled, MSGBOX_DEFAULT
|
|
closemessage
|
|
applymovement VAR_LAST_TALKED, Movement_KecleonAppears
|
|
waitmovement 0
|
|
waitse
|
|
playmoncry SPECIES_KECLEON, CRY_MODE_ENCOUNTER
|
|
delay 40
|
|
waitmoncry
|
|
applymovement VAR_LAST_TALKED, FortreeCity_Movement_KecleonFlee
|
|
waitmovement 0
|
|
removeobject VAR_LAST_TALKED
|
|
setflag FLAG_KECLEON_FLED_FORTREE
|
|
release
|
|
end
|
|
|
|
FortreeCity_Movement_KecleonFlee:
|
|
walk_right
|
|
step_end
|
|
|
|
.ifdef FRENCH
|
|
.include "data/maps/FortreeCity/text_fr.inc"
|
|
.else
|
|
.ifdef ITALIAN
|
|
.include "data/maps/FortreeCity/text_it.inc"
|
|
.else
|
|
.ifdef SPANISH
|
|
.include "data/maps/FortreeCity/text_es.inc"
|
|
.else
|
|
.include "data/maps/FortreeCity/text.inc"
|
|
.endif
|
|
.endif
|
|
.endif
|