summaryrefslogtreecommitdiff
path: root/data/scripts/maps/Underwater_SeafloorCavern.inc
blob: d991a7096eb5601aa28e79d59f749fbd22f1385d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
Underwater_SeafloorCavern_MapScripts:: @ 815D99E
	map_script 5, Underwater_SeafloorCavern_MapScript1_15DA36
	map_script 3, Underwater_SeafloorCavern_MapScript1_15D9AE
	map_script 1, Underwater_SeafloorCavern_MapScript1_15D9BF
	.byte 0

Underwater_SeafloorCavern_MapScript1_15D9AE:: @ 815D9AE
	setflag FLAG_LANDMARK_SEAFLOOR_CAVERN
	checkflag FLAG_LEGEND_ESCAPED_SEAFLOOR_CAVERN
	goto_if_eq Underwater_SeafloorCavern_EventScript_15D9BB
	end

Underwater_SeafloorCavern_EventScript_15D9BB:: @ 815D9BB
	setflag FLAG_HIDE_UNDERWATER_SUBMARINE_INTERACTION
	end

Underwater_SeafloorCavern_MapScript1_15D9BF:: @ 815D9BF
	checkflag FLAG_LEGEND_ESCAPED_SEAFLOOR_CAVERN
	call_if 1, Underwater_SeafloorCavern_EventScript_15D9C9
	end

Underwater_SeafloorCavern_EventScript_15D9C9:: @ 815D9C9
	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_15DA36:: @ 815DA36
	setdivewarp MAP_SEAFLOOR_CAVERN_ENTRANCE, 255, 10, 17
	end

Underwater_SeafloorCavern_EventScript_15DA3F:: @ 815DA3F
	lockall
	msgbox Underwater_SeafloorCavern_Text_197435, 4
	releaseall
	end