summaryrefslogtreecommitdiff
path: root/data/scripts/maps/IslandCave.inc
blob: 2f8ba2121aec47696b5a79ec8c3aae00a87dae9f (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
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
IslandCave_MapScripts:: @ 815EEB6
	map_script 5, IslandCave_MapScript1_15EEC6
	map_script 1, IslandCave_MapScript1_15EED4
	map_script 3, IslandCave_MapScript1_15EF15
	.byte 0

IslandCave_MapScript1_15EEC6:: @ 815EEC6
	checkflag 2145
	callif 1, IslandCave_EventScript_15EED0
	end

IslandCave_EventScript_15EED0:: @ 815EED0
	disappear LAST_TALKED
	return

IslandCave_MapScript1_15EED4:: @ 815EED4
	checkflag 2129
	callif 0, IslandCave_EventScript_15EEDE
	end

IslandCave_EventScript_15EEDE:: @ 815EEDE
	setmaptile 7, 19, 553, 1
	setmaptile 8, 19, 553, 1
	setmaptile 9, 19, 553, 1
	setmaptile 7, 20, 565, 1
	setmaptile 8, 20, 565, 1
	setmaptile 9, 20, 565, 1
	return

IslandCave_MapScript1_15EF15:: @ 815EF15
	setflag 2133
	end

S_OpenRegiceChamber:: @ 815EF19
	setmaptile 7, 19, 554, 1
	setmaptile 8, 19, 555, 1
	setmaptile 9, 19, 556, 1
	setmaptile 7, 20, 562, 1
	setmaptile 8, 20, 563, 0
	setmaptile 9, 20, 564, 1
	special DrawWholeMapView
	playsfx SE_BAN
	setflag 2129
	end

IslandCave_EventScript_15EF59:: @ 815EF59
	lockall
	checkflag 2129
	jumpeq IslandCave_EventScript_15EF72
	braillemsg IslandCave_Braille_1C54FC
	special DoBrailleWait
	waitstate
	jump IslandCave_EventScript_15EF95
	end

IslandCave_EventScript_15EF72:: @ 815EF72
	msgbox IslandCave_Text_1A13BE, 4
	releaseall
	end

IslandCave_EventScript_15EF7C:: @ 815EF7C
	lockall
	braillemsg IslandCave_Braille_1C54FC
	checkflag 2129
	jumpeq IslandCave_EventScript_15EF95
	special DoBrailleWait
	waitstate
	jump IslandCave_EventScript_15EF95
	end

IslandCave_EventScript_15EF95:: @ 815EF95
	waitbutton
	hidebox 0, 0, 29, 19
	releaseall
	end

IslandCave_EventScript_15EF9D:: @ 815EF9D
	lock
	faceplayer
	checksound
	pokecry SPECIES_REGICE, 2
	pause 40
	waitpokecry
	setwildbattle SPECIES_REGICE, 40, ITEM_NONE
	setflag 936
	setflag 2145
	special ScrSpecial_StartRegiBattle
	waitstate
	clearflag 2145
	release
	end