.set LOCALID_ATTENDANT, 1 BattleFrontier_BattleDomePreBattleRoom_MapScripts:: map_script MAP_SCRIPT_ON_FRAME_TABLE, BattleFrontier_BattleDomePreBattleRoom_OnFrame map_script MAP_SCRIPT_ON_WARP_INTO_MAP_TABLE, BattleFrontier_BattleDomePreBattleRoom_OnWarp .byte 0 BattleFrontier_BattleDomePreBattleRoom_OnWarp: map_script_2 VAR_TEMP_1, 0, BattleFrontier_BattleDomePreBattleRoom_EventScript_TurnPlayerNorth .2byte 0 BattleFrontier_BattleDomePreBattleRoom_EventScript_TurnPlayerNorth:: setvar VAR_TEMP_1, 1 turnobject OBJ_EVENT_ID_PLAYER, DIR_NORTH end BattleFrontier_BattleDomePreBattleRoom_OnFrame: map_script_2 VAR_TEMP_0, 0, BattleFrontier_BattleDomePreBattleRoom_EventScript_EnterRoom .2byte 0 BattleFrontier_BattleDomePreBattleRoom_EventScript_EnterRoom:: compare VAR_0x8006, 1 goto_if_eq BattleFrontier_BattleDomePreBattleRoom_EventScript_ReturnFromBattle frontier_set FRONTIER_DATA_RECORD_DISABLED, TRUE setvar VAR_TEMP_0, 1 applymovement OBJ_EVENT_ID_PLAYER, BattleFrontier_BattleDomePreBattleRoom_Movement_PlayerEnter waitmovement 0 lockall BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound:: call BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForNextRoundMessage waitmessage switch VAR_RESULT @ No case? call BattleFrontier_EventScript_GetCantRecordBattle compare VAR_RESULT, TRUE goto_if_eq BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRoundNoRecord multichoice 16, 0, MULTI_TOURNEY_WITH_RECORD, TRUE switch VAR_RESULT case 0, BattleFrontier_BattleDomePreBattleRoom_EventScript_ShowOpponentInfo case 1, BattleFrontier_BattleDomePreBattleRoom_EventScript_ShowTourneyTree case 2, BattleFrontier_BattleDomePreBattleRoom_EventScript_ContinueChallenge case 3, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskRecordBattle case 4, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskPauseChallenge case 5, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskRetireChallenge case MULTI_B_PRESSED, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRoundNoRecord:: multichoice 16, 2, MULTI_TOURNEY_NO_RECORD, TRUE switch VAR_RESULT case 0, BattleFrontier_BattleDomePreBattleRoom_EventScript_ShowOpponentInfo case 1, BattleFrontier_BattleDomePreBattleRoom_EventScript_ShowTourneyTree case 2, BattleFrontier_BattleDomePreBattleRoom_EventScript_ContinueChallenge case 3, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskPauseChallenge case 4, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskRetireChallenge case MULTI_B_PRESSED, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound BattleFrontier_BattleDomePreBattleRoom_EventScript_AskRecordBattle:: message BattleFrontier_BattleDomePreBattleRoom_Text_RecordLastMatch waitmessage multichoicedefault 20, 8, MULTI_YESNO, 1, FALSE switch VAR_RESULT case 1, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound case 0, BattleFrontier_BattleDomePreBattleRoom_EventScript_RecordBattle case MULTI_B_PRESSED, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound BattleFrontier_BattleDomePreBattleRoom_EventScript_RecordBattle:: call BattleFrontier_EventScript_SaveBattle goto BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound BattleFrontier_BattleDomePreBattleRoom_EventScript_AskPauseChallenge:: msgbox BattleFrontier_BattleDomePreBattleRoom_Text_SaveAndQuitGame, MSGBOX_YESNO switch VAR_RESULT case NO, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound case YES, BattleFrontier_BattleDomePreBattleRoom_EventScript_PauseChallenge case MULTI_B_PRESSED, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound BattleFrontier_BattleDomePreBattleRoom_EventScript_AskRetireChallenge:: message BattleFrontier_BattleDomePreBattleRoom_Text_RetireYourChallenge waitmessage multichoicedefault 20, 8, MULTI_YESNO, 1, FALSE switch VAR_RESULT case 1, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound case 0, BattleFrontier_BattleDomePreBattleRoom_EventScript_RetireChallenge case MULTI_B_PRESSED, BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound BattleFrontier_BattleDomePreBattleRoom_EventScript_RetireChallenge:: dome_resolvewinners DOME_PLAYER_RETIRED goto BattleFrontier_BattleDomeBattleRoom_EventScript_WarpToLobbyLost BattleFrontier_BattleDomePreBattleRoom_EventScript_PauseChallenge:: message BattleFrontier_BattleDomePreBattleRoom_Text_SavingDataPleaseWait waitmessage dome_save CHALLENGE_STATUS_PAUSED playse SE_SAVE waitse fadescreen FADE_TO_BLACK frontier_reset end BattleFrontier_BattleDomePreBattleRoom_EventScript_ShowOpponentInfo:: msgbox BattleFrontier_BattleDomePreBattleRoom_Text_PlayersNextOpponentIsTrainer, MSGBOX_DEFAULT fadescreen FADE_TO_BLACK dome_showopponentinfo waitstate goto BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound BattleFrontier_BattleDomePreBattleRoom_EventScript_ShowTourneyTree:: call BattleFrontier_BattleDomePreBattleRoom_EventScript_ShowRoundMessage fadescreen FADE_TO_BLACK dome_showtourneytree waitstate goto BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound BattleFrontier_BattleDomePreBattleRoom_EventScript_ShowRoundMessage:: frontier_get FRONTIER_DATA_BATTLE_NUM switch VAR_RESULT case DOME_ROUND1, BattleFrontier_BattleDomePreBattleRoom_EventScript_TourneyInRound1 case DOME_ROUND2, BattleFrontier_BattleDomePreBattleRoom_EventScript_TourneyInRound2 case DOME_SEMIFINAL, BattleFrontier_BattleDomePreBattleRoom_EventScript_TourneyInSemifinals case DOME_FINAL, BattleFrontier_BattleDomePreBattleRoom_EventScript_TourneyInFinals return BattleFrontier_BattleDomePreBattleRoom_EventScript_TourneyInRound1:: msgbox BattleFrontier_BattleDomePreBattleRoom_Text_TourneyInRound1, MSGBOX_DEFAULT return BattleFrontier_BattleDomePreBattleRoom_EventScript_TourneyInRound2:: msgbox BattleFrontier_BattleDomePreBattleRoom_Text_TourneyInRound2, MSGBOX_DEFAULT return BattleFrontier_BattleDomePreBattleRoom_EventScript_TourneyInSemifinals:: msgbox BattleFrontier_BattleDomePreBattleRoom_Text_TourneyInSemifinals, MSGBOX_DEFAULT return BattleFrontier_BattleDomePreBattleRoom_EventScript_TourneyInFinals:: msgbox BattleFrontier_BattleDomePreBattleRoom_Text_TourneyInFinals, MSGBOX_DEFAULT return BattleFrontier_BattleDomePreBattleRoom_EventScript_ContinueChallenge:: message BattleFrontier_BattleDomePreBattleRoom_Text_ChooseTwoMons waitmessage waitbuttonpress fadescreen FADE_TO_BLACK call BattleFrontier_EventScript_GetLvlMode copyvar VAR_0x8004, VAR_RESULT setvar VAR_0x8005, DOME_BATTLE_PARTY_SIZE @ 2 of the 3 party mons are selected for battle special ChoosePartyForBattleFrontier waitstate frontier_resetsketch compare VAR_RESULT, 0 goto_if_eq BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound dome_set DOME_DATA_SELECTED_MONS dome_reduceparty dome_setopponent msgbox BattleFrontier_BattleDomePreBattleRoom_Text_RightThisWay, MSGBOX_DEFAULT closemessage applymovement LOCALID_ATTENDANT, BattleFrontier_BattleDomePreBattleRoom_Movement_AttendantMoveAside waitmovement 0 applymovement OBJ_EVENT_ID_PLAYER, BattleFrontier_BattleDomePreBattleRoom_Movement_PlayerWalkToDoor waitmovement 0 opendoor 5, 1 waitdooranim applymovement OBJ_EVENT_ID_PLAYER, BattleFrontier_BattleDomePreBattleRoom_Movement_PlayerEnterDoor waitmovement 0 closedoor 5, 1 waitdooranim warp MAP_BATTLE_FRONTIER_BATTLE_DOME_BATTLE_ROOM, 255, 9, 5 setvar VAR_TEMP_0, 0 waitstate end BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForNextRoundMessage:: frontier_get FRONTIER_DATA_BATTLE_NUM switch VAR_RESULT case DOME_ROUND1, BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForRound1 case DOME_ROUND2, BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForRound2 case DOME_SEMIFINAL, BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForSemifinals case DOME_FINAL, BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForFinals return BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForRound1:: message BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForRound1 return BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForRound2:: message BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForRound2 return BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForSemifinals:: message BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForSemifinals return BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForFinals:: frontier_getbrainstatus switch VAR_RESULT case FRONTIER_BRAIN_SILVER, BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForTuckerSilver case FRONTIER_BRAIN_GOLD, BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForTuckerGold case FRONTIER_BRAIN_STREAK, BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForTuckerSilver case FRONTIER_BRAIN_STREAK_LONG, BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForTuckerGold message BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForFinals return BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForTuckerSilver:: goto_if_set FLAG_TEMP_1, BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForTuckerSilverShort msgbox BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForTuckerSilver, MSGBOX_DEFAULT setflag FLAG_TEMP_1 return BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForTuckerGold:: goto_if_set FLAG_TEMP_1, BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForTuckerGoldShort msgbox BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForTuckerGold, MSGBOX_DEFAULT setflag FLAG_TEMP_1 return BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForTuckerSilverShort:: msgbox BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForTuckerSilverShort, MSGBOX_DEFAULT return BattleFrontier_BattleDomePreBattleRoom_EventScript_ReadyForTuckerGoldShort:: msgbox BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForTuckerGoldShort, MSGBOX_DEFAULT return BattleFrontier_BattleDomePreBattleRoom_EventScript_ReturnFromBattle:: setvar VAR_TEMP_0, 1 msgbox BattleFrontier_BattleDomePreBattleRoom_Text_RestoreMonsToFullHealth, MSGBOX_DEFAULT special LoadPlayerParty frontier_setpartyorder FRONTIER_PARTY_SIZE playfanfare MUS_HEAL waitfanfare special HealPlayerParty call BattleFrontier_BattleDomePreBattleRoom_EventScript_RoundCompleteMessage fadescreen FADE_TO_BLACK dome_showstatictourneytree waitstate goto BattleFrontier_BattleDomePreBattleRoom_EventScript_AskReadyForNextRound BattleFrontier_BattleDomePreBattleRoom_EventScript_RoundCompleteMessage:: frontier_get FRONTIER_DATA_BATTLE_NUM switch VAR_RESULT case DOME_ROUND2, BattleFrontier_BattleDomePreBattleRoom_EventScript_Round1Complete case DOME_SEMIFINAL, BattleFrontier_BattleDomePreBattleRoom_EventScript_Round2Complete case DOME_FINAL, BattleFrontier_BattleDomePreBattleRoom_EventScript_SemifinalsComplete return BattleFrontier_BattleDomePreBattleRoom_EventScript_Round1Complete:: msgbox BattleFrontier_BattleDomePreBattleRoom_Text_Round1Complete, MSGBOX_DEFAULT return BattleFrontier_BattleDomePreBattleRoom_EventScript_Round2Complete:: msgbox BattleFrontier_BattleDomePreBattleRoom_Text_Round2Complete, MSGBOX_DEFAULT return BattleFrontier_BattleDomePreBattleRoom_EventScript_SemifinalsComplete:: msgbox BattleFrontier_BattleDomePreBattleRoom_Text_SemifinalsComplete, MSGBOX_DEFAULT return BattleFrontier_BattleDomePreBattleRoom_Movement_AttendantMoveAside: walk_right face_left step_end BattleFrontier_BattleDomePreBattleRoom_Movement_PlayerEnter: walk_up walk_up walk_up walk_up step_end BattleFrontier_BattleDomePreBattleRoom_Movement_PlayerWalkToDoor: walk_up step_end BattleFrontier_BattleDomePreBattleRoom_Movement_PlayerEnterDoor: walk_up set_invisible step_end BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForRound1: .string "Your 1st-round match is next.\n" .string "Are you ready?$" BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForRound2: .string "Your 2nd-round match is next.\n" .string "Are you ready?$" BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForSemifinals: .string "Your semifinal match is next.\n" .string "Are you ready?$" BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForFinals: .string "Your final match is next.\n" .string "Are you ready?$" BattleFrontier_BattleDomePreBattleRoom_Text_ChooseTwoMons: .string "Please choose the two POKéMON\n" .string "that are to appear in battle.$" BattleFrontier_BattleDomePreBattleRoom_Text_RightThisWay: .string "Right this way, please.$" BattleFrontier_BattleDomePreBattleRoom_Text_RestoreMonsToFullHealth: .string "Thank you for competing!\p" .string "I'll restore your POKéMON to\n" .string "full health.$" BattleFrontier_BattleDomePreBattleRoom_Text_Round1Complete: .string "All 1st-round matches have been\n" .string "completed.\p" .string "These are the teams that advanced!$" BattleFrontier_BattleDomePreBattleRoom_Text_Round2Complete: .string "All 2nd-round matches have been\n" .string "completed.\p" .string "These are the teams that advanced!$" BattleFrontier_BattleDomePreBattleRoom_Text_SemifinalsComplete: .string "All semifinal matches have been\n" .string "completed.\p" .string "These are the teams that advanced!$" @ Unused BattleFrontier_BattleDomePreBattleRoom_Text_CongratsReadyForRound2: .string "Congratulations for getting through\n" .string "the 1st round.\p" .string "The 2nd round is next.\n" .string "Are you ready?$" @ Unused BattleFrontier_BattleDomePreBattleRoom_Text_CongratsReadyForSemifinals: .string "Congratulations for advancing\n" .string "to the semifinals.\p" .string "The best four teams meet in this round.\n" .string "Are you ready?$" @ Unused BattleFrontier_BattleDomePreBattleRoom_Text_CongratsReadyForFinals: .string "Congratulations for advancing\n" .string "to the final match.\p" .string "You're one win from the championship.\n" .string "Are you ready?$" BattleFrontier_BattleDomePreBattleRoom_Text_PlayersNextOpponentIsTrainer: .string "{PLAYER}'s next opponent\n" .string "is this TRAINER.$" BattleFrontier_BattleDomePreBattleRoom_Text_TourneyInRound1: .string "The tournament is in the 1st round.$" BattleFrontier_BattleDomePreBattleRoom_Text_TourneyInRound2: .string "The tournament is in the 2nd round.$" BattleFrontier_BattleDomePreBattleRoom_Text_TourneyInSemifinals: .string "The tournament is in the semifinals.$" BattleFrontier_BattleDomePreBattleRoom_Text_TourneyInFinals: .string "The tournament is up to the final.$" BattleFrontier_BattleDomePreBattleRoom_Text_SaveAndQuitGame: .string "Would you like to save and\n" .string "quit the game?$" BattleFrontier_BattleDomePreBattleRoom_Text_RetireYourChallenge: .string "Would you like to retire from your\n" .string "Battle Tournament challenge?$" BattleFrontier_BattleDomePreBattleRoom_Text_SavingDataPleaseWait: .string "I am saving your data.\n" .string "Please wait.$" BattleFrontier_BattleDomePreBattleRoom_Text_RecordLastMatch: .string "Should I record your last match\n" .string "on your FRONTIER PASS?$" BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForTuckerSilver: .string "Congratulations for advancing\n" .string "to the final match.\p" .string "For the final match, you will challenge\n" .string "the DOME ACE TUCKER.\p" .string "Are you ready?$" @ Identical to ReadyForTuckerSilver BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForTuckerGold: .string "Congratulations for advancing\n" .string "to the final match.\p" .string "For the final match, you will challenge\n" .string "the DOME ACE TUCKER.\p" .string "Are you ready?$" BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForTuckerSilverShort: .string "Your final battle against TUCKER is\n" .string "next. Are you ready?$" @ Identical again BattleFrontier_BattleDomePreBattleRoom_Text_ReadyForTuckerGoldShort: .string "Your final battle against TUCKER is\n" .string "next. Are you ready?$"