pokeemerald/data/maps/Underwater_SeafloorCavern/scripts.inc
Melody c557ac61ae adds constants, cleans up callstd and msgbox code
* adds some constants for standard script names and messagebox types
* replaces some callstd calls with msgbox calls where equivalent
* replaces msgbox and callstd calls using raw digits with versions that use the constants
2018-12-02 03:37:46 -05:00

53 lines
1.5 KiB
PHP

Underwater_SeafloorCavern_MapScripts:: @ 823433B
map_script 5, Underwater_SeafloorCavern_MapScript1_2343D3
map_script 3, Underwater_SeafloorCavern_MapScript1_23434B
map_script 1, Underwater_SeafloorCavern_MapScript1_23435C
.byte 0
Underwater_SeafloorCavern_MapScript1_23434B: @ 823434B
setflag FLAG_LANDMARK_SEAFLOOR_CAVERN
checkflag FLAG_0x081
goto_eq Underwater_SeafloorCavern_EventScript_234358
end
Underwater_SeafloorCavern_EventScript_234358:: @ 8234358
setflag FLAG_HIDE_UNDERWATER_SEA_FLOOR_CAVERN_STOLEN_SUBMARINE
end
Underwater_SeafloorCavern_MapScript1_23435C: @ 823435C
checkflag FLAG_0x081
call_if 1, Underwater_SeafloorCavern_EventScript_234366
end
Underwater_SeafloorCavern_EventScript_234366:: @ 8234366
setmetatile 5, 3, 542, 1
setmetatile 6, 3, 542, 1
setmetatile 7, 3, 542, 1
setmetatile 8, 3, 542, 1
setmetatile 5, 4, 552, 0
setmetatile 6, 4, 552, 0
setmetatile 7, 4, 552, 0
setmetatile 8, 4, 552, 0
setmetatile 5, 5, 552, 0
setmetatile 6, 5, 552, 0
setmetatile 7, 5, 552, 0
setmetatile 8, 5, 552, 0
return
Underwater_SeafloorCavern_MapScript1_2343D3: @ 82343D3
setdivewarp MAP_SEAFLOOR_CAVERN_ENTRANCE, 255, 10, 17
end
Underwater_SeafloorCavern_EventScript_2343DC:: @ 82343DC
msgbox Underwater_SeafloorCavern_Text_2343E5, MSGBOX_SIGN
end
Underwater_SeafloorCavern_Text_2343E5: @ 82343E5
.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.$"