Files
2026-06-08 18:24:42 +09:30

72 lines
2.8 KiB
ObjectPascal

PokemonTower_5F_MapScripts::
.byte 0
PokemonTower_5F_EventScript_Channeler::
msgbox PokemonTower_5F_Text_RestHereInPurifiedSpace, MSGBOX_NPC
end
PokemonTower_5F_EventScript_PurifiedZone::
lockall
fadescreen FADE_TO_WHITE
special HealPlayerParty
fadescreen FADE_FROM_WHITE
msgbox PokemonTower_5F_Text_PurifiedZoneMonsFullyHealed
setvar VAR_TEMP_1, 1
releaseall
end
PokemonTower_5F_EventScript_ExitPurifiedZone::
lockall
setvar VAR_TEMP_1, 0
releaseall
end
PokemonTower_5F_EventScript_Tammy::
trainerbattle_single TRAINER_CHANNELER_TAMMY, PokemonTower_5F_Text_TammyIntro, PokemonTower_5F_Text_TammyDefeat
specialvar VAR_RESULT, ShouldTryRematchBattle
goto_if_eq VAR_RESULT, TRUE, PokemonTower_5F_EventScript_TammyRematch
msgbox PokemonTower_5F_Text_TammyPostBattle, MSGBOX_AUTOCLOSE
end
PokemonTower_5F_EventScript_TammyRematch::
trainerbattle_rematch TRAINER_CHANNELER_TAMMY, PokemonTower_5F_Text_TammyIntro, PokemonTower_5F_Text_TammyDefeat
msgbox PokemonTower_5F_Text_TammyPostBattle, MSGBOX_AUTOCLOSE
end
PokemonTower_5F_EventScript_Ruth::
trainerbattle_single TRAINER_CHANNELER_RUTH, PokemonTower_5F_Text_RuthIntro, PokemonTower_5F_Text_RuthDefeat
specialvar VAR_RESULT, ShouldTryRematchBattle
goto_if_eq VAR_RESULT, TRUE, PokemonTower_5F_EventScript_RuthRematch
msgbox PokemonTower_5F_Text_RuthPostBattle, MSGBOX_AUTOCLOSE
end
PokemonTower_5F_EventScript_RuthRematch::
trainerbattle_rematch TRAINER_CHANNELER_RUTH, PokemonTower_5F_Text_RuthIntro, PokemonTower_5F_Text_RuthDefeat
msgbox PokemonTower_5F_Text_RuthPostBattle, MSGBOX_AUTOCLOSE
end
PokemonTower_5F_EventScript_Karina::
trainerbattle_single TRAINER_CHANNELER_KARINA, PokemonTower_5F_Text_KarinaIntro, PokemonTower_5F_Text_KarinaDefeat
specialvar VAR_RESULT, ShouldTryRematchBattle
goto_if_eq VAR_RESULT, TRUE, PokemonTower_5F_EventScript_KarinaRematch
msgbox PokemonTower_5F_Text_KarinaPostBattle, MSGBOX_AUTOCLOSE
end
PokemonTower_5F_EventScript_KarinaRematch::
trainerbattle_rematch TRAINER_CHANNELER_KARINA, PokemonTower_5F_Text_KarinaIntro, PokemonTower_5F_Text_KarinaDefeat
msgbox PokemonTower_5F_Text_KarinaPostBattle, MSGBOX_AUTOCLOSE
end
PokemonTower_5F_EventScript_Janae::
trainerbattle_single TRAINER_CHANNELER_JANAE, PokemonTower_5F_Text_JanaeIntro, PokemonTower_5F_Text_JanaeDefeat
specialvar VAR_RESULT, ShouldTryRematchBattle
goto_if_eq VAR_RESULT, TRUE, PokemonTower_5F_EventScript_JanaeRematch
msgbox PokemonTower_5F_Text_JanaePostBattle, MSGBOX_AUTOCLOSE
end
PokemonTower_5F_EventScript_JanaeRematch::
trainerbattle_rematch TRAINER_CHANNELER_JANAE, PokemonTower_5F_Text_JanaeIntro, PokemonTower_5F_Text_JanaeDefeat
msgbox PokemonTower_5F_Text_JanaePostBattle, MSGBOX_AUTOCLOSE
end