mirror of
https://github.com/pret/pokeemerald.git
synced 2026-08-09 06:21:38 -05:00
70bad62f9b
# Conflicts: # Makefile # data/maps/BattleFrontier_BattleTowerLobby/scripts.inc # data/maps/OldaleTown/scripts.inc # data/maps/Route110_TrickHousePuzzle7/scripts.inc # data/maps/Route110_TrickHousePuzzle8/scripts.inc # data/scripts/roulette.inc # data/tilesets/graphics.inc # data/tilesets/metatiles.inc # graphics/trainer_card/0star_fr.pal # graphics/trainer_card/four_stars_fr.pal # graphics/trainer_card/frlg/0star.pal # graphics/trainer_card/frlg/blue.pal # graphics/trainer_card/frlg/bronze.pal # graphics/trainer_card/frlg/card.png # graphics/trainer_card/frlg/four_stars.pal # graphics/trainer_card/frlg/gold.pal # graphics/trainer_card/frlg/green.pal # graphics/trainer_card/frlg/one_star.pal # graphics/trainer_card/frlg/silver.pal # graphics/trainer_card/frlg/three_stars.pal # graphics/trainer_card/frlg/two_stars.pal # graphics/trainer_card/one_star_fr.pal # graphics/trainer_card/three_stars_fr.pal # graphics/trainer_card/two_stars_fr.pal # src/battle_message.c # src/battle_tent.c # src/berry_blender.c # src/berry_tag_screen.c # src/data/bard_music/length_table.h # src/data/credits.h # src/data/items.h # src/data/pokemon/pokedex_orders.h # src/data/region_map/region_map_entries.h # src/easy_chat.c # src/field_region_map.c # src/graphics.c # src/item.c # src/item_menu.c # src/menu_specialized.c # src/pokedex.c # src/pokedex_cry_screen.c # src/pokemon_jump.c # src/pokenav_conditions_search_results.c # src/pokenav_match_call_gfx.c # src/pokenav_ribbons_list.c # src/shop.c # src/trade.c # src/trainer_card.c # src/wireless_communication_status_screen.c
540 lines
21 KiB
C++
540 lines
21 KiB
C++
.set LOCALID_ATTENDANT, 1
|
|
.set LOCALID_HINT_GIVER, 2
|
|
|
|
BattleFrontier_BattlePyramidLobby_MapScripts::
|
|
map_script MAP_SCRIPT_ON_FRAME_TABLE, BattleFrontier_BattlePyramidLobby_OnFrame
|
|
map_script MAP_SCRIPT_ON_WARP_INTO_MAP_TABLE, BattleFrontier_BattleDomeLobby_OnWarp
|
|
.byte 0
|
|
|
|
@ Unused. Pyramid uses Dome's OnWarp (presumably by mistake). Their effects are identical
|
|
BattleFrontier_BattlePyramidLobby_OnWarp:
|
|
map_script_2 VAR_TEMP_1, 0, BattleFrontier_BattlePyramidLobby_EventScript_TurnPlayerNorth
|
|
.2byte 0
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_TurnPlayerNorth:
|
|
setvar VAR_TEMP_1, 1
|
|
turnobject OBJ_EVENT_ID_PLAYER, DIR_NORTH
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_OnFrame:
|
|
map_script_2 VAR_TEMP_CHALLENGE_STATUS, 0, BattleFrontier_BattlePyramidLobby_EventScript_GetChallengeStatus
|
|
map_script_2 VAR_TEMP_CHALLENGE_STATUS, CHALLENGE_STATUS_SAVING, BattleFrontier_BattlePyramidLobby_EventScript_QuitWithoutSaving
|
|
map_script_2 VAR_TEMP_CHALLENGE_STATUS, CHALLENGE_STATUS_PAUSED, BattleFrontier_BattlePyramidLobby_EventScript_ResumeChallenge
|
|
map_script_2 VAR_TEMP_CHALLENGE_STATUS, CHALLENGE_STATUS_WON, BattleFrontier_BattlePyramidLobby_EventScript_WonChallenge
|
|
map_script_2 VAR_TEMP_CHALLENGE_STATUS, CHALLENGE_STATUS_LOST, BattleFrontier_BattlePyramidLobby_EventScript_LostChallenge
|
|
.2byte 0
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_GetChallengeStatus::
|
|
frontier_getstatus
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_QuitWithoutSaving::
|
|
lockall
|
|
message BattleFrontier_BattlePyramidLobby_Text_DidntSaveBeforeQuittingTakeBag
|
|
waitmessage
|
|
playse SE_EXP_MAX
|
|
waitse
|
|
closemessage
|
|
pyramid_set PYRAMID_DATA_WIN_STREAK, 0
|
|
pyramid_set PYRAMID_DATA_WIN_STREAK_ACTIVE, FALSE
|
|
frontier_set FRONTIER_DATA_CHALLENGE_STATUS, 0
|
|
setvar VAR_TEMP_CHALLENGE_STATUS, 255
|
|
releaseall
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_WonChallenge::
|
|
lockall
|
|
frontier_isbrain
|
|
goto_if_eq VAR_RESULT, TRUE, BattleFrontier_BattlePyramidLobby_EventScript_DefeatedKing
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_YouveConqueredPyramid, MSGBOX_DEFAULT
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_GiveBattlePoints
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_DefeatedKing::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_YouveDefeatedPyramidKing, MSGBOX_DEFAULT
|
|
BattleFrontier_BattlePyramidLobby_EventScript_GiveBattlePoints::
|
|
special DoBattlePyramidMonsHaveHeldItem
|
|
call_if_eq VAR_RESULT, TRUE, BattleFrontier_BattlePyramidLobby_EventScript_StoreHeldItemsInPyramidBag
|
|
clearflag FLAG_STORING_ITEMS_IN_PYRAMID_BAG
|
|
frontier_checkairshow
|
|
special LoadPlayerParty
|
|
pyramid_clearhelditems
|
|
special HealPlayerParty
|
|
message BattleFrontier_BattlePyramidLobby_Text_UsedBattleBagWillBeKept
|
|
waitmessage
|
|
playse SE_EXP_MAX
|
|
waitse
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_GiveYouTheseBattlePoints, MSGBOX_DEFAULT
|
|
frontier_givepoints
|
|
msgbox BattleFrontier_Text_ObtainedXBattlePoints, MSGBOX_GETPOINTS
|
|
message BattleFrontier_BattlePyramidLobby_Text_RecordResultsWait
|
|
waitmessage
|
|
pyramid_setprize
|
|
pyramid_save 0
|
|
playse SE_SAVE
|
|
waitse
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_LookForwardToNextChallenge, MSGBOX_DEFAULT
|
|
closemessage
|
|
setvar VAR_TEMP_CHALLENGE_STATUS, 255
|
|
releaseall
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_LostChallenge::
|
|
frontier_checkairshow
|
|
special LoadPlayerParty
|
|
pyramid_clearhelditems
|
|
special HealPlayerParty
|
|
lockall
|
|
message BattleFrontier_BattlePyramidLobby_Text_DisappointingHereIsBag
|
|
waitmessage
|
|
playse SE_EXP_MAX
|
|
waitse
|
|
message BattleFrontier_BattlePyramidLobby_Text_RecordResultsWait
|
|
waitmessage
|
|
pyramid_set PYRAMID_DATA_WIN_STREAK_ACTIVE, FALSE
|
|
pyramid_save 0
|
|
playse SE_SAVE
|
|
waitse
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_LookForwardToNextChallenge, MSGBOX_DEFAULT
|
|
closemessage
|
|
setvar VAR_TEMP_CHALLENGE_STATUS, 255
|
|
releaseall
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_ResumeChallenge::
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_EnterChallenge
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_Attendant::
|
|
lock
|
|
faceplayer
|
|
setvar VAR_FRONTIER_FACILITY, FRONTIER_FACILITY_PYRAMID
|
|
setvar VAR_FRONTIER_BATTLE_MODE, FRONTIER_MODE_SINGLES
|
|
special SavePlayerParty
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_WelcomeToBattlePyramid, MSGBOX_DEFAULT
|
|
BattleFrontier_BattlePyramidLobby_EventScript_AskTakeChallenge::
|
|
message BattleFrontier_BattlePyramidLobby_Text_EmbarkOnChallenge
|
|
waitmessage
|
|
multichoice 17, 6, MULTI_CHALLENGEINFO, FALSE
|
|
switch VAR_RESULT
|
|
case 0, BattleFrontier_BattlePyramidLobby_EventScript_TryEnterChallenge
|
|
case 1, BattleFrontier_BattlePyramidLobby_EventScript_ExplainChallenge
|
|
case 2, BattleFrontier_BattlePyramidLobby_EventScript_CancelChallenge
|
|
case MULTI_B_PRESSED, BattleFrontier_BattlePyramidLobby_EventScript_CancelChallenge
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_TryEnterChallenge::
|
|
message BattleFrontier_BattlePyramidLobby_Text_WhichLevelMode
|
|
waitmessage
|
|
multichoice 17, 6, MULTI_LEVEL_MODE, FALSE
|
|
switch VAR_RESULT
|
|
case FRONTIER_LVL_TENT, BattleFrontier_BattlePyramidLobby_EventScript_CancelChallenge
|
|
case MULTI_B_PRESSED, BattleFrontier_BattlePyramidLobby_EventScript_CancelChallenge
|
|
frontier_checkineligible
|
|
goto_if_eq VAR_0x8004, TRUE, BattleFrontier_BattlePyramidLobby_EventScript_NotEnoughValidMons
|
|
frontier_set FRONTIER_DATA_LVL_MODE, VAR_RESULT
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_SelectThreeMons, MSGBOX_DEFAULT
|
|
fadescreen FADE_TO_BLACK
|
|
call BattleFrontier_EventScript_GetLvlMode
|
|
copyvar VAR_0x8004, VAR_RESULT
|
|
setvar VAR_0x8005, FRONTIER_PARTY_SIZE
|
|
special ChoosePartyForBattleFrontier
|
|
waitstate
|
|
goto_if_eq VAR_RESULT, 0, BattleFrontier_BattlePyramidLobby_EventScript_LoadPartyAndCancelChallenge
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_OkayToSaveBeforeChallenge, MSGBOX_YESNO
|
|
switch VAR_RESULT
|
|
case NO, BattleFrontier_BattlePyramidLobby_EventScript_LoadPartyAndCancelChallenge
|
|
case YES, BattleFrontier_BattlePyramidLobby_EventScript_SaveBeforeChallenge
|
|
case MULTI_B_PRESSED, BattleFrontier_BattlePyramidLobby_EventScript_LoadPartyAndCancelChallenge
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_SaveBeforeChallenge::
|
|
setvar VAR_TEMP_CHALLENGE_STATUS, 0
|
|
frontier_set FRONTIER_DATA_SELECTED_MON_ORDER
|
|
pyramid_init
|
|
pyramid_set PYRAMID_DATA_WIN_STREAK_ACTIVE, TRUE
|
|
frontier_set FRONTIER_DATA_CHALLENGE_STATUS, CHALLENGE_STATUS_SAVING
|
|
frontier_set FRONTIER_DATA_PAUSED, FALSE
|
|
pyramid_seedfloor
|
|
pyramid_settrainers
|
|
special LoadPlayerParty
|
|
closemessage
|
|
delay 2
|
|
call Common_EventScript_SaveGame
|
|
setvar VAR_TEMP_CHALLENGE_STATUS, 255
|
|
goto_if_eq VAR_RESULT, 0, BattleFrontier_BattlePyramidLobby_EventScript_CancelChallengeSaveFailed
|
|
BattleFrontier_BattlePyramidLobby_EventScript_EnterChallenge::
|
|
special SavePlayerParty
|
|
frontier_setpartyorder FRONTIER_PARTY_SIZE
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_ShowYouIntoPyramid, MSGBOX_DEFAULT
|
|
closemessage
|
|
call BattleFrontier_BattlePyramidLobby_EventScript_WalkToPanelAndReceiveBag
|
|
frontier_set FRONTIER_DATA_CHALLENGE_STATUS, 0
|
|
setvar VAR_RESULT, 0
|
|
special HealPlayerParty
|
|
warp MAP_BATTLE_FRONTIER_BATTLE_PYRAMID_FLOOR, 1, 1
|
|
setvar VAR_TEMP_CHALLENGE_STATUS, 0
|
|
waitstate
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_ExplainChallenge::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_ExplainBattlePyramid, MSGBOX_DEFAULT
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_AskTakeChallenge
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_NotEnoughValidMons::
|
|
switch VAR_RESULT
|
|
case FRONTIER_LVL_50, BattleFrontier_BattlePyramidLobby_EventScript_NotEnoughValidMonsLv50
|
|
case FRONTIER_LVL_OPEN, BattleFrontier_BattlePyramidLobby_EventScript_NotEnoughValidMonsLvOpen
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_NotEnoughValidMonsLv50::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_NotEnoughValidMonsLv50, MSGBOX_DEFAULT
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_EndCancelChallenge
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_NotEnoughValidMonsLvOpen::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_NotEnoughValidMonsLvOpen, MSGBOX_DEFAULT
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_EndCancelChallenge
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_CancelChallengeSaveFailed::
|
|
frontier_set FRONTIER_DATA_CHALLENGE_STATUS, 0
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_CancelChallenge
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_LoadPartyAndCancelChallenge::
|
|
special LoadPlayerParty
|
|
BattleFrontier_BattlePyramidLobby_EventScript_CancelChallenge::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_AwaitFutureChallenge, MSGBOX_DEFAULT
|
|
BattleFrontier_BattlePyramidLobby_EventScript_EndCancelChallenge::
|
|
release
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintGiver::
|
|
lockall
|
|
applymovement LOCALID_HINT_GIVER, Common_Movement_FacePlayer
|
|
waitmovement 0
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_TellYouWhatMisfortunesAwait, MSGBOX_DEFAULT
|
|
call BattleFrontier_BattlePyramidLobby_EventScript_GiveHint
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_BelieveMyFortunesOrNot, MSGBOX_DEFAULT
|
|
releaseall
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_GiveHint::
|
|
multichoice 17, 6, MULTI_LEVEL_MODE, FALSE
|
|
switch VAR_RESULT
|
|
case FRONTIER_LVL_50, BattleFrontier_BattlePyramidLobby_EventScript_GiveHintLv50
|
|
case FRONTIER_LVL_OPEN, BattleFrontier_BattlePyramidLobby_EventScript_GiveHintLvOpen
|
|
case FRONTIER_LVL_TENT, BattleFrontier_BattlePyramidLobby_EventScript_NoHint
|
|
case MULTI_B_PRESSED, BattleFrontier_BattlePyramidLobby_EventScript_NoHint
|
|
return
|
|
|
|
@ Shouldnt occur
|
|
BattleFrontier_BattlePyramidLobby_EventScript_NoHint::
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_GiveHintLv50::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_Aah, MSGBOX_DEFAULT
|
|
pyramid_get PYRAMID_DATA_WIN_STREAK_ACTIVE_50
|
|
goto_if_ne VAR_RESULT, FALSE, BattleFrontier_BattlePyramidLobby_EventScript_GiveHintGetLv50Streak
|
|
setvar VAR_RESULT, 0
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_DoHintComment
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_GiveHintGetLv50Streak::
|
|
pyramid_get PYRAMID_DATA_WIN_STREAK_50
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_DoHintComment
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_GiveHintLvOpen::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_Aah, MSGBOX_DEFAULT
|
|
pyramid_get PYRAMID_DATA_WIN_STREAK_ACTIVE_OPEN
|
|
goto_if_ne VAR_RESULT, FALSE, BattleFrontier_BattlePyramidLobby_EventScript_GiveHintGetLvOpenStreak
|
|
setvar VAR_RESULT, 0
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_DoHintComment
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_GiveHintGetLvOpenStreak::
|
|
pyramid_get PYRAMID_DATA_WIN_STREAK_OPEN
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_DoHintComment
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_DoHintComment::
|
|
copyvar VAR_0x8004, VAR_RESULT
|
|
special GetBattlePyramidHint
|
|
switch VAR_RESULT
|
|
case 0, BattleFrontier_BattlePyramidLobby_EventScript_HintParalysis
|
|
case 1, BattleFrontier_BattlePyramidLobby_EventScript_HintPoison
|
|
case 2, BattleFrontier_BattlePyramidLobby_EventScript_HintBurn
|
|
case 3, BattleFrontier_BattlePyramidLobby_EventScript_HintPPWaste
|
|
case 4, BattleFrontier_BattlePyramidLobby_EventScript_HintLevitate
|
|
case 5, BattleFrontier_BattlePyramidLobby_EventScript_HintTrapAbility
|
|
case 6, BattleFrontier_BattlePyramidLobby_EventScript_HintIce
|
|
case 7, BattleFrontier_BattlePyramidLobby_EventScript_HintExplosion
|
|
case 8, BattleFrontier_BattlePyramidLobby_EventScript_HintPsychic
|
|
case 9, BattleFrontier_BattlePyramidLobby_EventScript_HintRock
|
|
case 10, BattleFrontier_BattlePyramidLobby_EventScript_HintFighting
|
|
case 11, BattleFrontier_BattlePyramidLobby_EventScript_HintWeather
|
|
case 12, BattleFrontier_BattlePyramidLobby_EventScript_HintBug
|
|
case 13, BattleFrontier_BattlePyramidLobby_EventScript_HintDark
|
|
case 14, BattleFrontier_BattlePyramidLobby_EventScript_HintWater
|
|
case 15, BattleFrontier_BattlePyramidLobby_EventScript_HintGhost
|
|
case 16, BattleFrontier_BattlePyramidLobby_EventScript_HintSteel
|
|
case 17, BattleFrontier_BattlePyramidLobby_EventScript_HintFlyingDragon
|
|
case 18, BattleFrontier_BattlePyramidLobby_EventScript_HintStoneEvolve
|
|
case 19, BattleFrontier_BattlePyramidLobby_EventScript_HintNormal
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintParalysis::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintParalysis, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintPoison::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintPoison, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintBurn::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintBurn, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintPPWaste::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintPPWaste, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintLevitate::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintLevitate, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintTrapAbility::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintTrapAbility, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintIce::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintIce, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintExplosion::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintExplosion, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintPsychic::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintPsychic, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintRock::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintRock, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintFighting::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintFighting, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintWeather::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintWeather, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintBug::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintBug, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintDark::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintDark, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintWater::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintWater, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintGhost::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintGhost, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintSteel::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintSteel, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintFlyingDragon::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintFlyingDragon, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintStoneEvolve::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintStoneEvolve, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HintNormal::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HintNormal, MSGBOX_DEFAULT
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_ShowResults::
|
|
lockall
|
|
frontier_results FRONTIER_FACILITY_PYRAMID
|
|
waitbuttonpress
|
|
special RemoveRecordsWindow
|
|
releaseall
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_WalkToPanelAndReceiveBag::
|
|
applymovement LOCALID_ATTENDANT, BattleFrontier_BattlePyramidLobby_Movement_AttendantWalkToPanel
|
|
applymovement OBJ_EVENT_ID_PLAYER, BattleFrontier_BattlePyramidLobby_Movement_PlayerWalkToPanel
|
|
waitmovement 0
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_WeWillHoldBagForSafekeeping, MSGBOX_DEFAULT
|
|
pyramid_get PYRAMID_DATA_WIN_STREAK
|
|
goto_if_eq VAR_RESULT, 0, BattleFrontier_BattlePyramidLobby_EventScript_ReceiveNewBattleBag
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_PleaseTakePreviousBattleBag, MSGBOX_DEFAULT
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_ReceiveBattleBag
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_ReceiveNewBattleBag::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_PleaseTakeThisBattleBag, MSGBOX_DEFAULT
|
|
BattleFrontier_BattlePyramidLobby_EventScript_ReceiveBattleBag::
|
|
message BattleFrontier_BattlePyramidLobby_Text_ExchangedBagForBattleBag
|
|
waitmessage
|
|
playse SE_EXP_MAX
|
|
waitse
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_StepOnFloorPanel, MSGBOX_DEFAULT
|
|
closemessage
|
|
applymovement LOCALID_ATTENDANT, BattleFrontier_BattlePyramidLobby_Movement_AttendantMoveAside
|
|
waitmovement 0
|
|
applymovement OBJ_EVENT_ID_PLAYER, BattleFrontier_BattlePyramidLobby_Movement_PlayerStepOnPanel
|
|
waitmovement 0
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_Movement_AttendantWalkToPanel:
|
|
walk_up
|
|
walk_up
|
|
walk_up
|
|
walk_up
|
|
walk_up
|
|
walk_up
|
|
walk_up
|
|
face_down
|
|
step_end
|
|
|
|
BattleFrontier_BattlePyramidLobby_Movement_PlayerWalkToPanel:
|
|
walk_up
|
|
walk_up
|
|
walk_up
|
|
walk_up
|
|
walk_up
|
|
walk_up
|
|
walk_up
|
|
step_end
|
|
|
|
BattleFrontier_BattlePyramidLobby_Movement_AttendantMoveAside:
|
|
walk_right
|
|
face_left
|
|
step_end
|
|
|
|
BattleFrontier_BattlePyramidLobby_Movement_PlayerStepOnPanel:
|
|
walk_up
|
|
walk_up
|
|
step_end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_StoreHeldItemsInPyramidBag::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_MonHoldingItemCannotTake, MSGBOX_DEFAULT
|
|
setflag FLAG_STORING_ITEMS_IN_PYRAMID_BAG
|
|
special TryStoreHeldItemsInPyramidBag
|
|
goto_if_eq VAR_RESULT, 0, BattleFrontier_BattlePyramidLobby_EventScript_HeldItemsStoredInPyramidBag
|
|
message BattleFrontier_BattlePyramidLobby_Text_BagCannotHoldPickItemsToKeep
|
|
waitmessage
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_PickItemsToKeep
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_HeldItemsStoredInPyramidBag::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_HeldItemsMovedToBag, MSGBOX_DEFAULT
|
|
return
|
|
|
|
@ When exiting Battle Pyramid with a full pyramid bag and held items the player must select to keep/toss party held items and make room for any kept items by tossing from the pyramid bag
|
|
BattleFrontier_BattlePyramidLobby_EventScript_PickItemsToKeep::
|
|
multichoice 17, 6, MULTI_FRONTIER_ITEM_CHOOSE, FALSE
|
|
switch VAR_RESULT
|
|
case 0, BattleFrontier_BattlePyramidLobby_EventScript_PickItemsFromBag
|
|
case 1, BattleFrontier_BattlePyramidLobby_EventScript_PickItemsFromParty
|
|
case 2, BattleFrontier_BattlePyramidLobby_EventScript_ExitPickItems
|
|
case MULTI_B_PRESSED, BattleFrontier_BattlePyramidLobby_EventScript_ExitPickItems
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_PickItemsFromBag::
|
|
special ChooseItemsToTossFromPyramidBag
|
|
waitstate
|
|
message BattleFrontier_BattlePyramidLobby_Text_PickItemsToKeep
|
|
waitmessage
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_PickItemsToKeep
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_PickItemsFromParty::
|
|
special BattlePyramidChooseMonHeldItems
|
|
waitstate
|
|
message BattleFrontier_BattlePyramidLobby_Text_PickItemsToKeep
|
|
waitmessage
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_PickItemsToKeep
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_ExitPickItems::
|
|
special DoBattlePyramidMonsHaveHeldItem
|
|
goto_if_eq VAR_RESULT, TRUE, BattleFrontier_BattlePyramidLobby_EventScript_PartyStillHasHeldItems
|
|
return
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_PartyStillHasHeldItems::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_LeastOneMonHoldingItem, MSGBOX_DEFAULT
|
|
message BattleFrontier_BattlePyramidLobby_Text_PickItemsToKeep
|
|
waitmessage
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_PickItemsToKeep
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_Woman::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_TrainersNoticeRunning, MSGBOX_NPC
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_FatMan::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_LostLotOfItems, MSGBOX_NPC
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_RulesBoard::
|
|
lockall
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_RulesAreListed, MSGBOX_DEFAULT
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_ReadRulesBoard
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_ReadRulesBoard::
|
|
message BattleFrontier_BattlePyramidLobby_Text_ReadWhichHeading
|
|
waitmessage
|
|
multichoice 15, 2, MULTI_BATTLE_PYRAMID_RULES, FALSE
|
|
switch VAR_RESULT
|
|
case 0, BattleFrontier_BattlePyramidLobby_EventScript_RulesPokemon
|
|
case 1, BattleFrontier_BattlePyramidLobby_EventScript_RulesTrainers
|
|
case 2, BattleFrontier_BattlePyramidLobby_EventScript_RulesMaze
|
|
case 3, BattleFrontier_BattlePyramidLobby_EventScript_RulesBag
|
|
case 4, BattleFrontier_BattlePyramidLobby_EventScript_ExitRules
|
|
case MULTI_B_PRESSED, BattleFrontier_BattlePyramidLobby_EventScript_ExitRules
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_RulesPokemon::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_ExplainMonRules, MSGBOX_DEFAULT
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_ReadRulesBoard
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_RulesTrainers::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_ExplainTrainerRules, MSGBOX_DEFAULT
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_ReadRulesBoard
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_RulesMaze::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_ExplainMazeRules, MSGBOX_DEFAULT
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_ReadRulesBoard
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_RulesBag::
|
|
msgbox BattleFrontier_BattlePyramidLobby_Text_ExplainBagRules, MSGBOX_DEFAULT
|
|
goto BattleFrontier_BattlePyramidLobby_EventScript_ReadRulesBoard
|
|
end
|
|
|
|
BattleFrontier_BattlePyramidLobby_EventScript_ExitRules::
|
|
releaseall
|
|
end
|
|
|
|
.ifdef FRENCH
|
|
.include "data/maps/BattleFrontier_BattlePyramidLobby/text_fr.inc"
|
|
.else
|
|
.ifdef ITALIAN
|
|
.include "data/maps/BattleFrontier_BattlePyramidLobby/text_it.inc"
|
|
.else
|
|
.ifdef SPANISH
|
|
.include "data/maps/BattleFrontier_BattlePyramidLobby/text_es.inc"
|
|
.else
|
|
.include "data/maps/BattleFrontier_BattlePyramidLobby/text.inc"
|
|
.endif
|
|
.endif
|
|
.endif
|