summaryrefslogtreecommitdiff
path: root/data/scripts/maps/SeafloorCavern_Room9.inc
blob: 574c7412e23819a60bd1f252107c62ce882f9a43 (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
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
SeafloorCavern_Room9_MapScripts:: @ 815DAE6
	map_script 3, SeafloorCavern_Room9_MapScript1_15DAEC
	.byte 0

SeafloorCavern_Room9_MapScript1_15DAEC:: @ 815DAEC
	call SeafloorCavern_Room9_EventScript_1A0196
	call SeafloorCavern_Room9_EventScript_1A01B5
	.ifdef SAPPHIRE
	setmaplayoutindex 157
	.else
	setmaplayoutindex 327
	.endif
	end

SeafloorCavern_Room9_EventScript_15DAFA:: @ 815DAFA
	lockall
	setvar VAR_SPECIAL_4, 2
	setvar VAR_SPECIAL_5, 3
	setvar VAR_SPECIAL_6, 4
	setvar VAR_SPECIAL_7, 5
	applymovement 255, SeafloorCavern_Room9_Movement_1A0841
	waitmovement 0
	applymovement 255, SeafloorCavern_Room9_Movement_15DD68
	waitmovement 0
	.ifdef SAPPHIRE
	msgbox UnknownString_81B41B8, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B4850, 4
	.endif
	closemessage
	addobject VAR_SPECIAL_4
	applymovement 255, SeafloorCavern_Room9_Movement_1A083F
	waitmovement 0
	applymovement VAR_SPECIAL_4, SeafloorCavern_Room9_Movement_15DD36
	waitmovement 0
	.ifdef SAPPHIRE
	msgbox UnknownString_81B41D5, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B486C, 4
	.endif
	applymovement VAR_SPECIAL_4, SeafloorCavern_Room9_Movement_1A0841
	waitmovement 0
	.ifdef SAPPHIRE
	msgbox UnknownString_81B4201, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B4897, 4
	.endif
	applymovement VAR_SPECIAL_4, SeafloorCavern_Room9_Movement_1A0839
	waitmovement 0
	.ifdef SAPPHIRE
	msgbox UnknownString_81B4289, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B491F, 4
	.endif
	.ifdef SAPPHIRE
	trainerbattle 3, OPPONENT_SEAFLOOR_CAVERN_GRUNT_5, 0, UnknownString_81B4319
	.else
	trainerbattle 3, OPPONENT_SEAFLOOR_CAVERN_GRUNT_5, 0, SeafloorCavern_Room9_Text_1B49AE
	.endif
	.ifdef SAPPHIRE
	msgbox UnknownString_81B432C, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B49C1, 4
	.endif
	setweather 0
	doweather
	special sub_8081924
	waitstate
	.ifdef SAPPHIRE
	msgbox UnknownString_81B43C4, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B4A5A, 4
	.endif
	special WaitWeather
	waitstate
	.ifdef SAPPHIRE
	setvar RESULT, 1
	.else
	setvar RESULT, 0
	.endif
	playse 209
	setfieldeffectargument 0, 16
	setfieldeffectargument 1, 42
	setfieldeffectargument 2, 0
	dofieldeffect 54
	waitfieldeffect 54
	.ifdef SAPPHIRE
	setvar RESULT, 0
	.else
	setvar RESULT, 1
	.endif
	playfanfare 388
	playse 107
	special sub_80818A4
	applymovement VAR_SPECIAL_4, SeafloorCavern_Room9_Movement_1A0841
	applymovement 255, SeafloorCavern_Room9_Movement_1A0841
	waitmovement 0
	delay 150
	removeobject 7
	addobject 1
	waitstate
	delay 60
	applymovement 1, SeafloorCavern_Room9_Movement_15DD4C
	waitmovement 0
	special sub_80818FC
	waitstate
	setvar VAR_SPECIAL_4, 1
	setvar VAR_SPECIAL_5, 1
	special sub_810F758
	waitstate
	applymovement 1, SeafloorCavern_Room9_Movement_15DD57
	waitmovement 0
	removeobject 1
	delay 4
	setvar VAR_SPECIAL_4, 2
	setvar VAR_SPECIAL_5, 2
	special sub_810F758
	waitstate
	delay 30
	setvar VAR_SPECIAL_4, 2
	setvar VAR_SPECIAL_5, 3
	setvar VAR_SPECIAL_6, 4
	setvar VAR_SPECIAL_7, 5
	.ifdef SAPPHIRE
	msgbox UnknownString_81B43F2, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B4A89, 4
	.endif
	playse 2
	applymovement 255, SeafloorCavern_Room9_Movement_1A083F
	waitmovement 0
	.ifdef SAPPHIRE
	msgbox UnknownString_81B4443, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B4ADB, 4
	.endif
	closemessage
	applymovement VAR_SPECIAL_4, SeafloorCavern_Room9_Movement_15DD41
	waitmovement 0
	.ifdef SAPPHIRE
	msgbox UnknownString_81B447A, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B4B11, 4
	.endif
	closemessage
	playse 3
	delay 20
	applymovement VAR_SPECIAL_4, SeafloorCavern_Room9_Movement_1A0845
	waitmovement 0
	.ifdef SAPPHIRE
	msgbox UnknownString_81B45C6, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B4C79, 4
	.endif
	closemessage
	addobject VAR_SPECIAL_5
	addobject VAR_SPECIAL_6
	addobject VAR_SPECIAL_7
	applymovement VAR_SPECIAL_7, SeafloorCavern_Room9_Movement_15DD63
	applymovement VAR_SPECIAL_6, SeafloorCavern_Room9_Movement_15DD63
	applymovement VAR_SPECIAL_5, SeafloorCavern_Room9_Movement_15DD5A
	waitmovement 0
	applymovement VAR_SPECIAL_4, SeafloorCavern_Room9_Movement_1A083F
	waitmovement 0
	.ifdef SAPPHIRE
	msgbox UnknownString_81B464D, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B4D02, 4
	.endif
	playse 21
	applymovement VAR_SPECIAL_4, SeafloorCavern_Room9_Movement_1A0833
	waitmovement 0
	applymovement VAR_SPECIAL_4, SeafloorCavern_Room9_Movement_1A0835
	waitmovement 0
	.ifdef SAPPHIRE
	msgbox UnknownString_81B4723, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B4DD3, 4
	.endif
	.ifdef SAPPHIRE
	msgbox UnknownString_81B4786, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B4E37, 4
	.endif
	closemessage
	applymovement VAR_SPECIAL_5, SeafloorCavern_Room9_Movement_15DD60
	applymovement VAR_SPECIAL_4, SeafloorCavern_Room9_Movement_15DD46
	waitmovement 0
	.ifdef SAPPHIRE
	msgbox UnknownString_81B4818, 4
	.else
	msgbox SeafloorCavern_Room9_Text_1B4ECA, 4
	.endif
	setvar VAR_ROUTE128_STATE, 1
	clearflag FLAG_HIDE_CAVE_OF_ORIGIN_ENTRANCE_WOMAN_1
	clearflag FLAG_HIDE_CAVE_OF_ORIGIN_ENTRANCE_WOMAN_2
	clearflag FLAG_HIDE_WALLACE_SOOTOPOLIS
	clearflag FLAG_HIDE_STEVEN_SOOTOPOLIS
	setvar VAR_SOOTOPOLIS_STATE, 1
	clearflag FLAG_HIDE_EVIL_LEADER_ROUTE128
	clearflag FLAG_HIDE_OTHER_LEADER_ROUTE128
	setflag FLAG_SYS_WEATHER_CTRL
	setflag FLAG_HIDE_SOOTOPOLIS_RESIDENTS
	setflag FLAG_LEGEND_ESCAPED_SEAFLOOR_CAVERN
	setflag FLAG_HIDE_STEVEN_STEVENS_HOUSE
	setvar VAR_STEVENS_HOUSE_STATE, 1
	setvar VAR_SEAFLOOR_CAVERN_STATE, 1
	setflag FLAG_HIDE_EVIL_LEADER_SEAFLOOR_CAVERN
	setflag FLAG_HIDE_OTHER_LEADER_SEAFLOOR_CAVERN
	setflag FLAG_HIDE_OTHER_TEAM_GRUNTS_SEAFLOOR_CAVERN
	setflag FLAG_HIDE_AWAKENED_MON_SEAFLOOR_CAVERN
	setflag FLAG_HIDE_EVIL_TEAM_GRUNTS_SEAFLOOR_CAVERN
	warp MAP_ROUTE128, 255, 38, 22
	waitstate
	releaseall
	end

SeafloorCavern_Room9_Movement_15DD36:: @ 815DD36
	step_right
	step_right
	step_right
	step_right
	step_right
	step_right
	step_right
	step_end

@ 815DD3E
	step_left
	step_left
	step_end

SeafloorCavern_Room9_Movement_15DD41:: @ 815DD41
	step_left
	step_14
	step_end

@ 815DD44
	step_right
	step_end

SeafloorCavern_Room9_Movement_15DD46:: @ 815DD46
	step_01
	step_40
	step_down
	step_41
	step_28
	step_end

SeafloorCavern_Room9_Movement_15DD4C:: @ 815DD4C
	step_14
	step_14
	slow_step_down
	step_14
	step_14
	step_14
	slow_step_down
	step_14
	step_14
	step_14
	step_end

SeafloorCavern_Room9_Movement_15DD57:: @ 815DD57
	step_32
	step_32
	step_end

SeafloorCavern_Room9_Movement_15DD5A:: @ 815DD5A
	step_18
	step_18
	step_18
	step_18
	step_18
	step_end

SeafloorCavern_Room9_Movement_15DD60:: @ 815DD60
	step_right
	step_right
	step_end

SeafloorCavern_Room9_Movement_15DD63:: @ 815DD63
	step_18
	step_18
	step_18
	step_18
	step_end

SeafloorCavern_Room9_Movement_15DD68:: @ 815DD68
	step_14
	step_14
	step_end