pokeemerald/data/maps/FortreeCity_Gym/scripts.inc
huderlem 6d6c57f383
Merge pull request #953 from GriffinRichards/sync-script
Port some macro/script fixes from pokefirered
2020-01-13 19:33:47 -06:00

321 lines
11 KiB
PHP

FortreeCity_Gym_MapScripts:: @ 82165AB
map_script MAP_SCRIPT_ON_TRANSITION, FortreeCity_Gym_OnTransition
map_script MAP_SCRIPT_ON_WARP_INTO_MAP_TABLE, FortreeCity_Gym_OnWarp
.byte 0
FortreeCity_Gym_OnTransition: @ 82165B6
special RotatingGate_InitPuzzle
end
FortreeCity_Gym_OnWarp: @ 82165BA
map_script_2 VAR_TEMP_0, VAR_TEMP_0, FortreeCity_Gym_EventScript_InitRotatingGates
.2byte 0
FortreeCity_Gym_EventScript_InitRotatingGates:: @ 82165C4
special RotatingGate_InitPuzzleAndGraphics
end
FortreeCity_Gym_EventScript_Winona:: @ 82165C8
trainerbattle_single TRAINER_WINONA_1, FortreeCity_Gym_Text_WinonaIntro, FortreeCity_Gym_Text_WinonaDefeat, FortreeCity_Gym_EventScript_WinonaDefeated, NO_MUSIC
specialvar VAR_RESULT, ShouldTryRematchBattle
compare VAR_RESULT, TRUE
goto_if_eq FortreeCity_Gym_EventScript_WinonaRematch
goto_if_unset FLAG_RECEIVED_TM40, FortreeCity_Gym_EventScript_GiveAerialAce2
msgbox FortreeCity_Gym_Text_WinonaPostBattle, MSGBOX_DEFAULT
release
end
FortreeCity_Gym_EventScript_WinonaDefeated:: @ 82165FD
message FortreeCity_Gym_Text_ReceivedFeatherBadge
waitmessage
call Common_EventScript_PlayGymBadgeFanfare
msgbox FortreeCity_Gym_Text_ExplainFeatherBadgeTakeThis, MSGBOX_DEFAULT
setflag FLAG_DEFEATED_FORTREE_GYM
setflag FLAG_BADGE06_GET
setvar VAR_0x8008, 6
call Common_EventScript_SetGymTrainers
call FortreeCity_Gym_EventScript_GiveAerialAce
closemessage
delay 30
playfanfare MUS_ME_TORE_EYE
msgbox FortreeCity_Gym_Text_RegisteredWinona, MSGBOX_DEFAULT
waitfanfare
closemessage
delay 30
setflag FLAG_ENABLE_WINONA_MATCH_CALL
setvar VAR_SCOTT_FORTREE_CALL_STEP_COUNTER, 0
setflag FLAG_SCOTT_CALL_FORTREE_GYM
release
end
FortreeCity_Gym_EventScript_GiveAerialAce2:: @ 8216646
giveitem ITEM_TM40
compare VAR_RESULT, 0
goto_if_eq Common_EventScript_ShowBagIsFull
msgbox FortreeCity_Gym_Text_ExplainAerialAce, MSGBOX_DEFAULT
setflag FLAG_RECEIVED_TM40
release
end
FortreeCity_Gym_EventScript_GiveAerialAce:: @ 821666A
giveitem ITEM_TM40
compare VAR_RESULT, 0
goto_if_eq Common_EventScript_BagIsFull
msgbox FortreeCity_Gym_Text_ExplainAerialAce, MSGBOX_DEFAULT
setflag FLAG_RECEIVED_TM40
return
FortreeCity_Gym_EventScript_WinonaRematch:: @ 821668D
trainerbattle_rematch_double TRAINER_WINONA_1, FortreeCity_Gym_Text_WinonaPreRematch, FortreeCity_Gym_Text_WinonaRematchDefeat, FortreeCity_Gym_Text_WinonaRematchNeedTwoMons
msgbox FortreeCity_Gym_Text_WinonaPostRematch, MSGBOX_AUTOCLOSE
end
FortreeCity_Gym_EventScript_Jared:: @ 82166A8
trainerbattle_single TRAINER_JARED, FortreeCity_Gym_Text_JaredIntro, FortreeCity_Gym_Text_JaredDefeat
msgbox FortreeCity_Gym_Text_JaredPostBattle, MSGBOX_AUTOCLOSE
end
FortreeCity_Gym_EventScript_Edwardo:: @ 82166BF
trainerbattle_single TRAINER_EDWARDO, FortreeCity_Gym_Text_EdwardoIntro, FortreeCity_Gym_Text_EdwardoDefeat
msgbox FortreeCity_Gym_Text_EdwardoPostBattle, MSGBOX_AUTOCLOSE
end
FortreeCity_Gym_EventScript_Flint:: @ 82166D6
trainerbattle_single TRAINER_FLINT, FortreeCity_Gym_Text_FlintIntro, FortreeCity_Gym_Text_FlintDefeat
msgbox FortreeCity_Gym_Text_FlintPostBattle, MSGBOX_AUTOCLOSE
end
FortreeCity_Gym_EventScript_Ashley:: @ 82166ED
trainerbattle_single TRAINER_ASHLEY, FortreeCity_Gym_Text_AshleyIntro, FortreeCity_Gym_Text_AshleyDefeat
msgbox FortreeCity_Gym_Text_AshleyPostBattle, MSGBOX_AUTOCLOSE
end
FortreeCity_Gym_EventScript_Humberto:: @ 8216704
trainerbattle_single TRAINER_HUMBERTO, FortreeCity_Gym_Text_HumbertoIntro, FortreeCity_Gym_Text_HumbertoDefeat
msgbox FortreeCity_Gym_Text_HumbertoPostBattle, MSGBOX_AUTOCLOSE
end
FortreeCity_Gym_EventScript_Darius:: @ 821671B
trainerbattle_single TRAINER_DARIUS, FortreeCity_Gym_Text_DariusIntro, FortreeCity_Gym_Text_DariusDefeat
msgbox FortreeCity_Gym_Text_DariusPostBattle, MSGBOX_AUTOCLOSE
end
FortreeCity_Gym_EventScript_GymGuide:: @ 8216732
lock
faceplayer
goto_if_set FLAG_DEFEATED_FORTREE_GYM, FortreeCity_Gym_EventScript_GymGuidePostVictory
msgbox FortreeCity_Gym_Text_GymGuideAdvice, MSGBOX_DEFAULT
release
end
FortreeCity_Gym_EventScript_GymGuidePostVictory:: @ 8216747
msgbox FortreeCity_Gym_Text_GymGuidePostVictory, MSGBOX_DEFAULT
release
end
FortreeCity_Gym_EventScript_LeftGymStatue:: @ 8216751
lockall
goto_if_set FLAG_BADGE06_GET, FortreeCity_Gym_EventScript_GymStatueCertified
goto FortreeCity_Gym_EventScript_GymStatue
end
FortreeCity_Gym_EventScript_RightGymStatue:: @ 8216761
lockall
goto_if_set FLAG_BADGE06_GET, FortreeCity_Gym_EventScript_GymStatueCertified
goto FortreeCity_Gym_EventScript_GymStatue
end
FortreeCity_Gym_EventScript_GymStatueCertified:: @ 8216771
msgbox FortreeCity_Gym_Text_GymStatueCertified, MSGBOX_DEFAULT
releaseall
end
FortreeCity_Gym_EventScript_GymStatue:: @ 821677B
msgbox FortreeCity_Gym_Text_GymStatue, MSGBOX_DEFAULT
releaseall
end
FortreeCity_Gym_Text_GymGuideAdvice: @ 8216785
.string "Yo, how's it going, CHAMPION-\n"
.string "bound {PLAYER}?\p"
.string "FORTREE GYM LEADER WINONA is\n"
.string "a master of FLYING-type POKéMON.\p"
.string "She's waiting at the back of this GYM,\n"
.string "behind the rotating doors.\p"
.string "She's waiting for new challengers\n"
.string "who are trying to take wing!\p"
.string "Okay, go for it!$"
FortreeCity_Gym_Text_GymGuidePostVictory: @ 821687D
.string "You did it!\n"
.string "You've achieved liftoff!$"
FortreeCity_Gym_Text_JaredIntro: @ 82168A2
.string "Behold the elegant battle style of\n"
.string "BIRD POKéMON!$"
FortreeCity_Gym_Text_JaredDefeat: @ 82168D3
.string "You…\n"
.string "You're strong…$"
FortreeCity_Gym_Text_JaredPostBattle: @ 82168E7
.string "A TRAINER has to be smart to keep\n"
.string "up with unexpected turns of events.\p"
.string "Do you have the smarts to get to\n"
.string "our LEADER?$"
FortreeCity_Gym_Text_EdwardoIntro: @ 821695A
.string "The lovers of BIRD POKéMON aspire\n"
.string "to join this GYM.\p"
.string "As a member of the FORTREE GYM,\n"
.string "I'm not allowed to lose!$"
FortreeCity_Gym_Text_EdwardoDefeat: @ 82169C7
.string "It was too much of a load for me\n"
.string "to bear…$"
FortreeCity_Gym_Text_EdwardoPostBattle: @ 82169F1
.string "The world is huge, and there are\n"
.string "countless tough TRAINERS.\p"
.string "I'm going to keep training and make\n"
.string "myself even stronger.$"
FortreeCity_Gym_Text_FlintIntro: @ 8216A66
.string "There's no need for WINONA, our GYM\n"
.string "LEADER, to deal with you!\p"
.string "I'm plenty good enough for you!$"
FortreeCity_Gym_Text_FlintDefeat: @ 8216AC4
.string "WINONA, I…\n"
.string "I lost!$"
FortreeCity_Gym_Text_FlintPostBattle: @ 8216AD7
.string "WINONA is cute and she's strong.\n"
.string "She's the ultimate LEADER!\p"
.string "Blush…$"
FortreeCity_Gym_Text_AshleyIntro: @ 8216B1A
.string "WINONA taught me personally!\n"
.string "You can't beat me easily!$"
FortreeCity_Gym_Text_AshleyDefeat: @ 8216B51
.string "I was beaten…$"
FortreeCity_Gym_Text_AshleyPostBattle: @ 8216B5F
.string "Thanks to WINONA, the people of\n"
.string "FORTREE can live without fear.$"
FortreeCity_Gym_Text_HumbertoIntro: @ 8216B9E
.string "When WINONA takes to battle, her face\n"
.string "shines with beautiful determination…\p"
.string "I'm not letting you witness that\n"
.string "lovely sight!$"
FortreeCity_Gym_Text_HumbertoDefeat: @ 8216C18
.string "Urk!\n"
.string "I couldn't stop you.$"
FortreeCity_Gym_Text_HumbertoPostBattle: @ 8216C32
.string "You'd better watch it!\n"
.string "Don't get distracted staring at WINONA\l"
.string "or you'll go crashing down in a heap!$"
FortreeCity_Gym_Text_DariusIntro: @ 8216C96
.string "You'd better know that there are all\n"
.string "sorts of FLYING-type POKéMON.\p"
.string "You do know that, right?$"
FortreeCity_Gym_Text_DariusDefeat: @ 8216CF2
.string "You seem to know your stuff!$"
FortreeCity_Gym_Text_DariusPostBattle: @ 8216D0F
.string "Sure, you beat me all right.\n"
.string "But you'd better watch it! Our LEADER\l"
.string "WINONA's POKéMON are all business.$"
FortreeCity_Gym_Text_WinonaIntro: @ 8216D75
.string "I am WINONA. I am the LEADER of\n"
.string "the FORTREE POKéMON GYM.\p"
.string "I have become one with BIRD POKéMON\n"
.string "and have soared the skies…\p"
.string "However grueling the battle, we have\n"
.string "triumphed with grace…\p"
.string "Witness the elegant choreography\n"
.string "of BIRD POKéMON and I!$"
FortreeCity_Gym_Text_WinonaDefeat: @ 8216E60
.string "Never before have I seen a TRAINER\n"
.string "command POKéMON with more grace\l"
.string "than I…\p"
.string "In recognition of your prowess,\n"
.string "I present to you this GYM BADGE.$"
FortreeCity_Gym_Text_ReceivedFeatherBadge: @ 8216EEC
.string "{PLAYER} received the FEATHER BADGE\n"
.string "from WINONA.$"
FortreeCity_Gym_Text_ExplainFeatherBadgeTakeThis: @ 8216F17
.string "With the FEATHER BADGE, all POKéMON up\n"
.string "to LV 70, even those received through\l"
.string "trades, will obey your every command.\p"
.string "You will also be able to use\n"
.string "the HM move FLY outside of battle.\p"
.string "And this…\n"
.string "This is a gift from me.$"
FortreeCity_Gym_Text_ExplainAerialAce: @ 8216FEC
.string "TM40 contains AERIAL ACE.\p"
.string "Its speed…\n"
.string "No POKéMON should be able to avoid it.\p"
.string "… … … … … …$"
FortreeCity_Gym_Text_RegisteredWinona: @ 8217044
.string "Registered GYM LEADER WINONA\n"
.string "in the POKéNAV.$"
FortreeCity_Gym_Text_WinonaPostBattle: @ 8217071
.string "Though I fell to you, I will remain\n"
.string "devoted to BIRD POKéMON.$"
FortreeCity_Gym_Text_GymStatue: @ 82170AE
.string "FORTREE CITY POKéMON GYM$"
FortreeCity_Gym_Text_GymStatueCertified: @ 82170C7
.string "FORTREE CITY POKéMON GYM\p"
.string "WINONA'S CERTIFIED TRAINERS:\n"
.string "{PLAYER}$"
FortreeCity_Gym_Text_WinonaPreRematch: @ 8217100
.string "WINONA: We humans can never escape\n"
.string "gravity's pull on the ground.\p"
.string "But by striving for excellence,\n"
.string "we have the power to soar!\p"
.string "You have scaled the pinnacle as\n"
.string "the reigning CHAMPION.\p"
.string "Please, allow me to see your power\n"
.string "at full flight!$"
FortreeCity_Gym_Text_WinonaRematchDefeat: @ 82171E6
.string "I failed to reach your height again…$"
FortreeCity_Gym_Text_WinonaPostRematch: @ 821720B
.string "WINONA: Even though I have lost,\n"
.string "the wings of my heart remain unbroken.\p"
.string "I can rise and soar again and\n"
.string "yet again.\p"
.string "I am convinced of it!$"
FortreeCity_Gym_Text_WinonaRematchNeedTwoMons: @ 8217292
.string "WINONA: We humans can never escape\n"
.string "gravity's pull on the ground.\p"
.string "But by striving for excellence,\n"
.string "we have the power to soar!\p"
.string "You have scaled the pinnacle as\n"
.string "the reigning CHAMPION.\p"
.string "Please, allow me to see your power\n"
.string "at full flight!\p"
.string "Oh, no… Do you have but one\n"
.string "POKéMON with you?\p"
.string "Please return with two POKéMON\n"
.string "at the very least.$"