tumbledemerald-legacy/data/maps/BattleFrontier_ReceptionGate/scripts.inc

511 lines
18 KiB
PHP

.set LOCALID_GREETER, 1
.set LOCALID_GUIDE, 2
.set LOCALID_SCOTT, 4
BattleFrontier_ReceptionGate_MapScripts::
map_script MAP_SCRIPT_ON_FRAME_TABLE, BattleFrontier_ReceptionGate_OnFrame
map_script MAP_SCRIPT_ON_TRANSITION, BattleFrontier_ReceptionGate_OnTransition
.byte 0
BattleFrontier_ReceptionGate_OnTransition:
setflag FLAG_LANDMARK_BATTLE_FRONTIER
end
BattleFrontier_ReceptionGate_OnFrame:
map_script_2 VAR_HAS_ENTERED_BATTLE_FRONTIER, 0, BattleFrontier_ReceptionGate_EventScript_FirstTimeEntering
.2byte 0
BattleFrontier_ReceptionGate_EventScript_FirstTimeEntering::
lockall
setvar VAR_HAS_ENTERED_BATTLE_FRONTIER, 1
playse SE_PIN
applymovement LOCALID_GREETER, Common_Movement_ExclamationMark
waitmovement 0
applymovement LOCALID_GREETER, Common_Movement_Delay48
waitmovement 0
msgbox BattleFrontier_ReceptionGate_Text_FirstTimeHereThisWay, MSGBOX_DEFAULT
closemessage
applymovement OBJ_EVENT_ID_PLAYER, BattleFrontier_ReceptionGate_Movement_PlayerApproachCounter
waitmovement 0
goto BattleFrontier_ReceptionGate_EventScript_ScottScene
end
BattleFrontier_ReceptionGate_EventScript_ScottScene::
msgbox BattleFrontier_ReceptionGate_Text_WelcomeToBattleFrontier, MSGBOX_DEFAULT
msgbox BattleFrontier_ReceptionGate_Text_IssueFrontierPass, MSGBOX_DEFAULT
playfanfare MUS_OBTAIN_ITEM
message BattleFrontier_ReceptionGate_Text_ObtainedFrontierPass
waitfanfare
waitmessage
msgbox BattleFrontier_ReceptionGate_Text_PlacedTrainerCardInFrontierPass, MSGBOX_DEFAULT
setflag FLAG_SYS_FRONTIER_PASS
msgbox BattleFrontier_ReceptionGate_Text_EnjoyBattleFrontier, MSGBOX_DEFAULT
msgbox BattleFrontier_ReceptionGate_Text_IfItIsntPlayerYouCame, MSGBOX_DEFAULT
closemessage
applymovement LOCALID_GREETER, Common_Movement_WalkInPlaceFasterUp
applymovement LOCALID_GUIDE, Common_Movement_WalkInPlaceFasterUp
applymovement OBJ_EVENT_ID_PLAYER, Common_Movement_WalkInPlaceFasterUp
waitmovement 0
playse SE_PIN
applymovement LOCALID_GREETER, Common_Movement_ExclamationMark
applymovement LOCALID_GUIDE, Common_Movement_ExclamationMark
applymovement OBJ_EVENT_ID_PLAYER, Common_Movement_ExclamationMark
waitmovement 0
msgbox BattleFrontier_ReceptionGate_Text_OhMrScottGoodDay, MSGBOX_DEFAULT
closemessage
applymovement LOCALID_GREETER, BattleFrontier_ReceptionGate_Movement_GreeterFaceScott
applymovement LOCALID_GUIDE, BattleFrontier_ReceptionGate_Movement_FacilityGuideFaceScott
applymovement OBJ_EVENT_ID_PLAYER, BattleFrontier_ReceptionGate_Movement_PlayerFaceScott
applymovement LOCALID_SCOTT, BattleFrontier_ReceptionGate_Movement_ScottEnter
waitmovement 0
msgbox BattleFrontier_ReceptionGate_Text_ScottGreatToSeeYouHere, MSGBOX_DEFAULT
closemessage
applymovement LOCALID_SCOTT, BattleFrontier_ReceptionGate_Movement_ScottExit
waitmovement 0
removeobject LOCALID_SCOTT
releaseall
end
BattleFrontier_ReceptionGate_Movement_PlayerApproachCounter:
walk_up
walk_up
walk_left
walk_left
step_end
BattleFrontier_ReceptionGate_Movement_PlayerFaceScott:
delay_16
delay_16
delay_16
delay_8
walk_in_place_faster_right
step_end
@ Unused
BattleFrontier_ReceptionGate_Movement_WalkDown:
walk_down
walk_down
step_end
BattleFrontier_ReceptionGate_Movement_ScottEnter:
walk_down
walk_down
walk_down
walk_down
walk_down
walk_down
walk_left
step_end
BattleFrontier_ReceptionGate_Movement_ScottExit:
walk_right
walk_up
walk_up
walk_up
walk_up
walk_up
walk_up
step_end
BattleFrontier_ReceptionGate_Movement_GreeterFaceScott:
delay_16
delay_16
delay_16
delay_8
walk_in_place_faster_right
step_end
BattleFrontier_ReceptionGate_Movement_FacilityGuideFaceScott:
delay_16
delay_16
delay_16
delay_8
walk_in_place_faster_left
step_end
BattleFrontier_ReceptionGate_EventScript_Greeter::
lock
faceplayer
msgbox BattleFrontier_ReceptionGate_Text_WelcomeToBattleFrontier, MSGBOX_DEFAULT
msgbox BattleFrontier_ReceptionGate_Text_EnjoyBattleFrontier, MSGBOX_DEFAULT
release
end
BattleFrontier_ReceptionGate_EventScript_FacilityGuide::
lock
faceplayer
msgbox BattleFrontier_ReceptionGate_Text_YourGuideToFacilities, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFacilityToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_ChooseFacilityToLearnAbout::
message BattleFrontier_ReceptionGate_Text_LearnAboutWhich2
waitmessage
setvar VAR_0x8004, SCROLL_MULTI_BF_RECEPTIONIST
special ShowScrollableMultichoice
waitstate
switch VAR_RESULT
case 0, BattleFrontier_ReceptionGate_EventScript_BattleTower
case 1, BattleFrontier_ReceptionGate_EventScript_BattleDome
case 2, BattleFrontier_ReceptionGate_EventScript_BattlePalace
case 3, BattleFrontier_ReceptionGate_EventScript_BattleArena
case 4, BattleFrontier_ReceptionGate_EventScript_BattleFactory
case 5, BattleFrontier_ReceptionGate_EventScript_BattlePike
case 6, BattleFrontier_ReceptionGate_EventScript_BattlePyramid
case 7, BattleFrontier_ReceptionGate_EventScript_RankingHall
case 8, BattleFrontier_ReceptionGate_EventScript_ExchangeCorner
case 9, BattleFrontier_ReceptionGate_EventScript_ExitFacilityGuide
case MULTI_B_PRESSED, BattleFrontier_ReceptionGate_EventScript_ExitFacilityGuide
end
BattleFrontier_ReceptionGate_EventScript_BattleTower::
msgbox BattleFrontier_ReceptionGate_Text_BattleTowerInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFacilityToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_BattleDome::
msgbox BattleFrontier_ReceptionGate_Text_BattleDomeInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFacilityToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_BattlePalace::
msgbox BattleFrontier_ReceptionGate_Text_BattlePalaceInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFacilityToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_BattleArena::
msgbox BattleFrontier_ReceptionGate_Text_BattleArenaInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFacilityToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_BattleFactory::
msgbox BattleFrontier_ReceptionGate_Text_BattleFactoryInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFacilityToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_BattlePike::
msgbox BattleFrontier_ReceptionGate_Text_BattlePikeInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFacilityToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_BattlePyramid::
msgbox BattleFrontier_ReceptionGate_Text_BattlePyramidInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFacilityToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_RankingHall::
msgbox BattleFrontier_ReceptionGate_Text_RankingHallInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFacilityToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_ExchangeCorner::
msgbox BattleFrontier_ReceptionGate_Text_ExchangeCornerInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFacilityToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_ExitFacilityGuide::
msgbox BattleFrontier_ReceptionGate_Text_EnjoyBattleFrontier, MSGBOX_DEFAULT
release
end
BattleFrontier_ReceptionGate_EventScript_RulesGuide::
lock
faceplayer
msgbox BattleFrontier_ReceptionGate_Text_YourGuideToRules, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseRuleToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_ChooseRuleToLearnAbout::
message BattleFrontier_ReceptionGate_Text_LearnAboutWhat
waitmessage
multichoice 15, 0, MULTI_FRONTIER_RULES, FALSE
switch VAR_RESULT
case 0, BattleFrontier_ReceptionGate_EventScript_LevelMode
case 1, BattleFrontier_ReceptionGate_EventScript_Level50
case 2, BattleFrontier_ReceptionGate_EventScript_OpenLevel
case 3, BattleFrontier_ReceptionGate_EventScript_MonEntry
case 4, BattleFrontier_ReceptionGate_EventScript_HoldItems
case 5, BattleFrontier_ReceptionGate_EventScript_ExitRulesGuide
case MULTI_B_PRESSED, BattleFrontier_ReceptionGate_EventScript_ExitRulesGuide
end
BattleFrontier_ReceptionGate_EventScript_LevelMode::
msgbox BattleFrontier_ReceptionGate_Text_LevelModeInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseRuleToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_Level50::
msgbox BattleFrontier_ReceptionGate_Text_Level50Info, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseRuleToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_OpenLevel::
msgbox BattleFrontier_ReceptionGate_Text_OpenLevelInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseRuleToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_MonEntry::
msgbox BattleFrontier_ReceptionGate_Text_MonEntryInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseRuleToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_HoldItems::
msgbox BattleFrontier_ReceptionGate_Text_HoldItemsInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseRuleToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_ExitRulesGuide::
msgbox BattleFrontier_ReceptionGate_Text_EnjoyBattleFrontier, MSGBOX_DEFAULT
release
end
BattleFrontier_ReceptionGate_EventScript_FrontierPassGuide::
lock
faceplayer
msgbox BattleFrontier_ReceptionGate_Text_YourGuideToFrontierPass, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFrontierPassInfoToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_ChooseFrontierPassInfoToLearnAbout::
message BattleFrontier_ReceptionGate_Text_LearnAboutWhich1
waitmessage
multichoice 16, 4, MULTI_FRONTIER_PASS_INFO, FALSE
switch VAR_RESULT
case 0, BattleFrontier_ReceptionGate_EventScript_Symbols
case 1, BattleFrontier_ReceptionGate_EventScript_RecordBattle
case 2, BattleFrontier_ReceptionGate_EventScript_BattlePoints
case 3, BattleFrontier_ReceptionGate_EventScript_ExitFrontierPassGuide
case MULTI_B_PRESSED, BattleFrontier_ReceptionGate_EventScript_ExitFrontierPassGuide
end
BattleFrontier_ReceptionGate_EventScript_Symbols::
msgbox BattleFrontier_ReceptionGate_Text_SymbolsInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFrontierPassInfoToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_RecordBattle::
msgbox BattleFrontier_ReceptionGate_Text_RecordedBattleInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFrontierPassInfoToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_BattlePoints::
msgbox BattleFrontier_ReceptionGate_Text_BattlePointsInfo, MSGBOX_DEFAULT
goto BattleFrontier_ReceptionGate_EventScript_ChooseFrontierPassInfoToLearnAbout
end
BattleFrontier_ReceptionGate_EventScript_ExitFrontierPassGuide::
msgbox BattleFrontier_ReceptionGate_Text_EnjoyBattleFrontier, MSGBOX_DEFAULT
release
end
BattleFrontier_ReceptionGate_Text_FirstTimeHereThisWay:
.string "Is it your first time here?\n"
.string "Please step this way!$"
BattleFrontier_ReceptionGate_Text_WelcomeToBattleFrontier:
.string "The front lines of Pokémon battling!\n"
.string "Welcome to the Battle Frontier!$"
BattleFrontier_ReceptionGate_Text_IssueFrontierPass:
.string "For a first-time visitor, we issue\n"
.string "the Frontier Pass.\p"
.string "It's for use at all the facilities\n"
.string "in the Battle Frontier.\p"
.string "Here you are!$"
BattleFrontier_ReceptionGate_Text_ObtainedFrontierPass:
.string "{PLAYER} obtained\n"
.string "the Frontier Pass.$"
BattleFrontier_ReceptionGate_Text_PlacedTrainerCardInFrontierPass:
.string "{PLAYER} placed the Trainer Card\n"
.string "in the Frontier Pass.$"
BattleFrontier_ReceptionGate_Text_EnjoyBattleFrontier:
.string "We hope you enjoy all that the Battle\n"
.string "Frontier has to offer!$"
BattleFrontier_ReceptionGate_Text_IfItIsntPlayerYouCame:
.string "???: Well, if it isn't {PLAYER}{KUN}!\n"
.string "You came out here!$"
BattleFrontier_ReceptionGate_Text_OhMrScottGoodDay:
.string "Guide: Oh! Mr. Scott, sir!\n"
.string "Good day to you, sir!$"
BattleFrontier_ReceptionGate_Text_ScottGreatToSeeYouHere:
.string "Scott: It's great to see you here,\n"
.string "it really is!\p"
.string "I hope you'll take your time and\n"
.string "explore everywhere.\p"
.string "Naturally, I hope you'll also experience\n"
.string "the pure essence of battling.\p"
.string "I also have my quarters here, so feel\n"
.string "free to visit if you have time.$"
BattleFrontier_ReceptionGate_Text_YourGuideToFacilities:
.string "I'm your guide to the various facilities\n"
.string "here in the Battle Frontier.$"
BattleFrontier_ReceptionGate_Text_LearnAboutWhich2:
.string "Which would you like to learn about?$"
BattleFrontier_ReceptionGate_Text_BattleTowerInfo:
.string "It is the gigantic tower considered\n"
.string "to be the Battle Frontier's symbol.\p"
.string "There are four kinds of Battle Rooms\n"
.string "in the tower for Single, Double, Multi,\l"
.string "and Link Multi Battles.$"
BattleFrontier_ReceptionGate_Text_BattleDomeInfo:
.string "The Battle Dome is the large building\n"
.string "shaped like a huge egg.\p"
.string "Events named Battle Tourneys are held\n"
.string "in this facility.\p"
.string "The Battle Tourneys are offered in\n"
.string "two courses--for Single and Double\l"
.string "Battles.$"
BattleFrontier_ReceptionGate_Text_BattlePalaceInfo:
.string "The Battle Palace is the red building\n"
.string "on the right of the Battle Frontier.\p"
.string "There are two kinds of Battle Halls\n"
.string "for Single and Double Battles.$"
BattleFrontier_ReceptionGate_Text_BattleArenaInfo:
.string "The Battle Arena is the dojo-like\n"
.string "building at the center-right of\l"
.string "the Battle Frontier.\p"
.string "An event called the Set KO Tourney\n"
.string "takes place at the Battle Arena.$"
BattleFrontier_ReceptionGate_Text_BattleFactoryInfo:
.string "The Battle Factory is the large\n"
.string "building that is the closest to us.\p"
.string "An event called the Battle Swap\n"
.string "is conducted there.\p"
.string "The Battle Swap event is offered in\n"
.string "two courses for Single and Double\l"
.string "Battles.$"
BattleFrontier_ReceptionGate_Text_BattlePikeInfo:
.string "The Battle Pike is the building shaped\n"
.string "like a Pokémon at the center-left of\l"
.string "the Battle Frontier.\p"
.string "An event called the Battle Choice\n"
.string "is conducted there.$"
BattleFrontier_ReceptionGate_Text_BattlePyramidInfo:
.string "The Battle Pyramid is the enormous\n"
.string "pyramid.\p"
.string "An event called the Battle Quest\n"
.string "is conducted there.$"
BattleFrontier_ReceptionGate_Text_RankingHallInfo:
.string "The Ranking Hall is located near\n"
.string "the Battle Tower.\p"
.string "There, you may see the most fantastic\n"
.string "records left by the Trainers that\l"
.string "took on the many challenges of\l"
.string "the Battle Frontier.$"
BattleFrontier_ReceptionGate_Text_ExchangeCornerInfo:
.string "The Exchange Service Corner is near\n"
.string "the Battle Tower.\p"
.string "The Battle Points you have earned in\n"
.string "the Battle Frontier may be exchanged\l"
.string "for fabulous prizes there.$"
BattleFrontier_ReceptionGate_Text_YourGuideToRules:
.string "I'm your guide to the basic rules that\n"
.string "are common to all the challenges\l"
.string "offered by the facilities in the Battle\l"
.string "Frontier.$"
BattleFrontier_ReceptionGate_Text_LearnAboutWhat:
.string "What would you like to learn about?$"
BattleFrontier_ReceptionGate_Text_LevelModeInfo:
.string "All the challenges at the Battle\n"
.string "Frontier's facilities come in\l"
.string "two courses--Level 50 and Open Level.$"
BattleFrontier_ReceptionGate_Text_Level50Info:
.string "The Level 50 course is open to Pokémon\n"
.string "up to and including Level 50.\p"
.string "Please keep in mind, however, that\n"
.string "no Trainer you face will have any\l"
.string "Pokémon below Level 50.\p"
.string "This course is the entry level for\n"
.string "battles at the Battle Frontier.\p"
.string "To begin, we hope you will challenge\n"
.string "this course.$"
BattleFrontier_ReceptionGate_Text_OpenLevelInfo:
.string "The Open Level course places no limit\n"
.string "on the levels of Pokémon entering\l"
.string "challenges.\p"
.string "The levels of your opponents will\n"
.string "be adjusted to match the levels of\l"
.string "your Pokémon.\p"
.string "However, no Trainer you face will\n"
.string "have any Pokémon below Level 60.$"
BattleFrontier_ReceptionGate_Text_MonEntryInfo:
.string "Virtually any kind of Pokémon may take\n"
.string "on the challenges at all facilities.\p"
.string "Eggs and certain kinds of Pokémon,\n"
.string "however, are not permitted.\p"
.string "The numbers of Pokémon required for\n"
.string "challenges will depend on the facility.\p"
.string "At all facilities, however, two or more\n"
.string "of the same kind of Pokémon are not\l"
.string "permitted.$"
BattleFrontier_ReceptionGate_Text_HoldItemsInfo:
.string "When entering a challenge at a Battle\n"
.string "Frontier facility, Pokémon may not\l"
.string "be holding the same kind of item.\p"
.string "Please make sure that all Pokémon\n"
.string "entering a challenge are holding\l"
.string "different items.$"
BattleFrontier_ReceptionGate_Text_YourGuideToFrontierPass:
.string "I'm your guide to the Frontier Pass.$"
BattleFrontier_ReceptionGate_Text_LearnAboutWhich1:
.string "Which would you like to learn about?$"
BattleFrontier_ReceptionGate_Text_SymbolsInfo:
.string "There are seven facilities at\n"
.string "the Battle Frontier.\p"
.string "Trainers who gain recognition for\n"
.string "their abilities may be rewarded with\l"
.string "symbols from each of the facilities.\p"
.string "To earn a symbol, Trainers may need\n"
.string "to defeat other Trainers in a row,\l"
.string "and may need to win events repeatedly.\p"
.string "It's certainly not easy to win symbols.\n"
.string "I wish you the best of luck!$"
BattleFrontier_ReceptionGate_Text_RecordedBattleInfo:
.string "It is possible to record one battle\n"
.string "on your Frontier Pass.\p"
.string "You may record a battle you had with\n"
.string "a friend or friends.\p"
.string "Or you may record a battle conducted\n"
.string "at the Battle Frontier excluding\l"
.string "matches at the Battle Pike or\l"
.string "the Battle Pyramid.\p"
.string "You may choose to record your match\n"
.string "at the end of a battle.$"
BattleFrontier_ReceptionGate_Text_BattlePointsInfo:
.string "Battle Points are rewards given to\n"
.string "Trainers who battled outstandingly\l"
.string "at the Battle Frontier.\p"
.string "You may trade in your Battle Points\n"
.string "for prizes at the Exchange Service\l"
.string "Corner.$"