pokeemerald/data/maps/Underwater_SeafloorCavern/scripts.inc

51 lines
1.9 KiB
PHP

Underwater_SeafloorCavern_MapScripts::
map_script MAP_SCRIPT_ON_RESUME, Underwater_SeafloorCavern_OnResume
map_script MAP_SCRIPT_ON_TRANSITION, Underwater_SeafloorCavern_OnTransition
map_script MAP_SCRIPT_ON_LOAD, Underwater_SeafloorCavern_OnLoad
.byte 0
Underwater_SeafloorCavern_OnTransition:
setflag FLAG_LANDMARK_SEAFLOOR_CAVERN
goto_if_set FLAG_KYOGRE_ESCAPED_SEAFLOOR_CAVERN, Underwater_SeafloorCavern_EventScript_HideSubmarine
end
Underwater_SeafloorCavern_EventScript_HideSubmarine::
setflag FLAG_HIDE_UNDERWATER_SEA_FLOOR_CAVERN_STOLEN_SUBMARINE
end
Underwater_SeafloorCavern_OnLoad:
call_if_set FLAG_KYOGRE_ESCAPED_SEAFLOOR_CAVERN, Underwater_SeafloorCavern_EventScript_SetSubmarineGoneMetatiles
end
Underwater_SeafloorCavern_EventScript_SetSubmarineGoneMetatiles::
setmetatile 5, 3, METATILE_Underwater_RockWall, 1
setmetatile 6, 3, METATILE_Underwater_RockWall, 1
setmetatile 7, 3, METATILE_Underwater_RockWall, 1
setmetatile 8, 3, METATILE_Underwater_RockWall, 1
setmetatile 5, 4, METATILE_Underwater_FloorShadow, 0
setmetatile 6, 4, METATILE_Underwater_FloorShadow, 0
setmetatile 7, 4, METATILE_Underwater_FloorShadow, 0
setmetatile 8, 4, METATILE_Underwater_FloorShadow, 0
setmetatile 5, 5, METATILE_Underwater_FloorShadow, 0
setmetatile 6, 5, METATILE_Underwater_FloorShadow, 0
setmetatile 7, 5, METATILE_Underwater_FloorShadow, 0
setmetatile 8, 5, METATILE_Underwater_FloorShadow, 0
return
Underwater_SeafloorCavern_OnResume:
setdivewarp MAP_SEAFLOOR_CAVERN_ENTRANCE, 10, 17
end
Underwater_SeafloorCavern_EventScript_CheckStolenSub::
msgbox Underwater_SeafloorCavern_Text_SubExplorer1, MSGBOX_SIGN
end
Underwater_SeafloorCavern_Text_SubExplorer1:
.string "“SUBMARINE EXPLORER 1” is painted\n"
.string "on the hull.\p"
.string "This is the submarine TEAM AQUA\n"
.string "stole in SLATEPORT!\p"
.string "TEAM AQUA must have gone\n"
.string "ashore here.$"