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
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
|
object_const_def
const OLIVINEPORT_SAILOR1
const OLIVINEPORT_SAILOR2
const OLIVINEPORT_SAILOR3
const OLIVINEPORT_FISHING_GURU1
const OLIVINEPORT_FISHING_GURU2
const OLIVINEPORT_YOUNGSTER
const OLIVINEPORT_COOLTRAINER_F
OlivinePort_MapScripts:
def_scene_scripts
scene_script .DummyScene0 ; SCENE_DEFAULT
scene_script .LeaveFastShip ; SCENE_OLIVINEPORT_LEAVE_SHIP
def_callbacks
.DummyScene0:
end
.LeaveFastShip:
sdefer .LeaveFastShipScript
end
.LeaveFastShipScript:
applymovement PLAYER, OlivinePortLeaveFastShipMovement
appear OLIVINEPORT_SAILOR1
setscene SCENE_DEFAULT
setevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
blackoutmod OLIVINE_CITY
end
OlivinePortSailorAtGangwayScript:
faceplayer
opentext
checkevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
iftrue OlivinePortAlreadyRodeScript
writetext OlivinePortSailorGetOnBoardText
waitbutton
closetext
turnobject OLIVINEPORT_SAILOR1, DOWN
pause 10
playsound SFX_EXIT_BUILDING
disappear OLIVINEPORT_SAILOR1
waitsfx
applymovement PLAYER, OlivinePortEnterFastShipMovement
playsound SFX_EXIT_BUILDING
special FadeOutPalettes
waitsfx
checkevent EVENT_FAST_SHIP_FIRST_TIME
iffalse .FirstTime
clearevent EVENT_FAST_SHIP_PASSENGERS_EASTBOUND
setevent EVENT_FAST_SHIP_PASSENGERS_WESTBOUND
clearevent EVENT_BEAT_COOLTRAINERM_SEAN
clearevent EVENT_BEAT_COOLTRAINERF_CAROL
clearevent EVENT_BEAT_GENTLEMAN_EDWARD
clearevent EVENT_BEAT_BEAUTY_CASSIE
clearevent EVENT_BEAT_PSYCHIC_RODNEY
clearevent EVENT_BEAT_SUPER_NERD_SHAWN
clearevent EVENT_BEAT_SAILOR_GARRETT
clearevent EVENT_BEAT_FISHER_JONAH
clearevent EVENT_BEAT_BLACKBELT_WAI
.FirstTime:
clearevent EVENT_FAST_SHIP_DESTINATION_OLIVINE
appear OLIVINEPORT_SAILOR1
setmapscene FAST_SHIP_1F, SCENE_FASTSHIP1F_ENTER_SHIP
warp FAST_SHIP_1F, 25, 1
end
OlivinePortAlreadyRodeScript:
writetext OlivinePortCantBoardText
waitbutton
closetext
end
OlivinePortWalkUpToShipScript:
turnobject OLIVINEPORT_SAILOR3, RIGHT
checkevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
iftrue .skip
checkevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_2
iftrue .skip
turnobject PLAYER, LEFT
opentext
checkevent EVENT_FAST_SHIP_FIRST_TIME
iffalse .FirstTime
readvar VAR_WEEKDAY
ifequal SUNDAY, .NextShipMonday
ifequal SATURDAY, .NextShipMonday
ifequal TUESDAY, .NextShipFriday
ifequal WEDNESDAY, .NextShipFriday
ifequal THURSDAY, .NextShipFriday
.FirstTime:
writetext OlivinePortAskBoardText
yesorno
iffalse OlivinePortNotRidingMoveAwayScript
writetext OlivinePortAskTicketText
promptbutton
checkitem S_S_TICKET
iffalse .NoTicket
writetext OlivinePortFlashTicketText
waitbutton
closetext
setevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_2
applymovement PLAYER, OlivinePortApproachFastShipFirstTimeMovement
sjump OlivinePortSailorAtGangwayScript
.NoTicket:
writetext OlivinePortNoTicketText
waitbutton
closetext
applymovement PLAYER, OlivinePortCannotEnterFastShipMovement
end
.NextShipMonday:
writetext OlivinePortMondayShipText
waitbutton
closetext
applymovement PLAYER, OlivinePortCannotEnterFastShipMovement
end
.NextShipFriday:
writetext OlivinePortFridayShipText
waitbutton
closetext
applymovement PLAYER, OlivinePortCannotEnterFastShipMovement
end
.skip:
end
OlivinePortNotRidingScript:
writetext OlivinePortComeAgainText
waitbutton
closetext
end
OlivinePortNotRidingMoveAwayScript:
writetext OlivinePortComeAgainText
waitbutton
closetext
applymovement PLAYER, OlivinePortCannotEnterFastShipMovement
end
OlivinePortSailorAfterHOFScript:
faceplayer
opentext
checkevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
iftrue OlivinePortAlreadyRodeScript
checkevent EVENT_FAST_SHIP_FIRST_TIME
iffalse .FirstTime
readvar VAR_WEEKDAY
ifequal SUNDAY, .NextShipMonday
ifequal SATURDAY, .NextShipMonday
ifequal TUESDAY, .NextShipFriday
ifequal WEDNESDAY, .NextShipFriday
ifequal THURSDAY, .NextShipFriday
.FirstTime:
writetext OlivinePortAskBoardText
yesorno
iffalse OlivinePortNotRidingScript
writetext OlivinePortAskTicketText
promptbutton
checkitem S_S_TICKET
iffalse .NoTicket
writetext OlivinePortFlashTicketText
waitbutton
closetext
setevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_2
readvar VAR_FACING
ifequal RIGHT, .Right
applymovement PLAYER, OlivinePortApproachFastShipAfterHOFMovement
sjump OlivinePortSailorAtGangwayScript
.Right:
applymovement PLAYER, OlivinePortApproachFastShipAfterHOFRightMovement
sjump OlivinePortSailorAtGangwayScript
.NoTicket:
writetext OlivinePortNoTicketText
waitbutton
closetext
end
.NextShipMonday:
writetext OlivinePortMondayShipText
waitbutton
closetext
end
.NextShipFriday:
writetext OlivinePortFridayShipText
waitbutton
closetext
end
OlivinePortSailorBeforeHOFScript:
jumptextfaceplayer OlivinePortSailorBeforeHOFText
OlivinePortFishingGuru1Script:
faceplayer
opentext
writetext OlivinePortFishingGuru1Text
waitbutton
closetext
turnobject OLIVINEPORT_FISHING_GURU1, UP
end
OlivinePortFishingGuru2Script:
faceplayer
opentext
writetext OlivinePortFishingGuru2Text
waitbutton
closetext
turnobject OLIVINEPORT_FISHING_GURU2, UP
end
OlivinePortYoungsterScript:
faceplayer
opentext
writetext OlivinePortYoungsterText
waitbutton
closetext
turnobject OLIVINEPORT_YOUNGSTER, DOWN
end
OlivinePortCooltrainerFScript:
faceplayer
opentext
writetext OlivinePortCooltrainerFText
waitbutton
closetext
turnobject OLIVINEPORT_COOLTRAINER_F, DOWN
end
OlivinePortHiddenProtein:
hiddenitem PROTEIN, EVENT_OLIVINE_PORT_HIDDEN_PROTEIN
OlivinePortEnterFastShipMovement:
step DOWN
step_end
OlivinePortLeaveFastShipMovement:
step UP
step_end
OlivinePortCannotEnterFastShipMovement:
step RIGHT
turn_head LEFT
step_end
OlivinePortApproachFastShipFirstTimeMovement:
step DOWN
step DOWN
step DOWN
step DOWN
step DOWN
step DOWN
step DOWN
step_end
OlivinePortApproachFastShipAfterHOFMovement:
step RIGHT
step DOWN
step DOWN
step DOWN
step DOWN
step DOWN
step DOWN
step DOWN
step DOWN
step_end
OlivinePortApproachFastShipAfterHOFRightMovement:
step UP
step RIGHT
step RIGHT
step DOWN
step DOWN
step DOWN
step DOWN
step DOWN
step DOWN
step DOWN
step DOWN
step_end
OlivinePortSailorGetOnBoardText:
text "We're departing"
line "soon. Please get"
cont "on board."
done
OlivinePortCantBoardText:
text "Sorry. You can't"
line "board now."
done
OlivinePortAskBoardText:
text "Welcome to FAST"
line "SHIP S.S.AQUA."
para "Will you be board-"
line "ing today?"
done
OlivinePortAskTicketText:
text "May I see your"
line "S.S.TICKET?"
done
OlivinePortComeAgainText:
text "We hope to see you"
line "again!"
done
OlivinePortFlashTicketText:
text "<PLAYER> flashed"
line "the S.S.TICKET."
para "That's it."
line "Thank you!"
done
OlivinePortNoTicketText:
text "<PLAYER> tried to"
line "show the S.S."
cont "TICKET…"
para "…But no TICKET!"
para "Sorry!"
line "You may board only"
para "if you have an"
line "S.S.TICKET."
done
OlivinePortMondayShipText:
text "The FAST SHIP will"
line "sail next Monday."
done
OlivinePortFridayShipText:
text "The FAST SHIP will"
line "sail next Friday."
done
OlivinePortFishingGuru1Text:
text "SHELLDER are easy"
line "to catch here."
para "They're kind of"
line "rare elsewhere."
done
OlivinePortFishingGuru2Text:
text "How many RODS do"
line "you have?"
para "Different RODS"
line "catch different"
cont "#MON."
done
OlivinePortYoungsterText:
text "S.S.AQUA uses jets"
line "to skim over the"
cont "waves!"
done
OlivinePortCooltrainerFText:
text "There are lots of"
line "#MON in KANTO."
para "I wish I could go…"
done
OlivinePortSailorBeforeHOFText:
text "We don't want you"
line "to fall into the"
para "sea, so you're not"
line "allowed in."
done
OlivinePort_MapEvents:
db 0, 0 ; filler
def_warp_events
warp_event 11, 7, OLIVINE_PORT_PASSAGE, 5
warp_event 7, 23, FAST_SHIP_1F, 1
def_coord_events
coord_event 7, 15, SCENE_DEFAULT, OlivinePortWalkUpToShipScript
def_bg_events
bg_event 1, 22, BGEVENT_ITEM, OlivinePortHiddenProtein
def_object_events
object_event 7, 23, SPRITE_SAILOR, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, OlivinePortSailorAtGangwayScript, EVENT_OLIVINE_PORT_SAILOR_AT_GANGWAY
object_event 7, 15, SPRITE_SAILOR, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, OlivinePortSailorBeforeHOFScript, EVENT_OLIVINE_PORT_SPRITES_BEFORE_HALL_OF_FAME
object_event 6, 15, SPRITE_SAILOR, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, OlivinePortSailorAfterHOFScript, EVENT_OLIVINE_PORT_SPRITES_AFTER_HALL_OF_FAME
object_event 4, 14, SPRITE_FISHING_GURU, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, OlivinePortFishingGuru1Script, EVENT_OLIVINE_PORT_SPRITES_BEFORE_HALL_OF_FAME
object_event 13, 14, SPRITE_FISHING_GURU, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, OlivinePortFishingGuru2Script, EVENT_OLIVINE_PORT_SPRITES_BEFORE_HALL_OF_FAME
object_event 4, 15, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, OlivinePortYoungsterScript, EVENT_OLIVINE_PORT_SPRITES_AFTER_HALL_OF_FAME
object_event 11, 15, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, OlivinePortCooltrainerFScript, EVENT_OLIVINE_PORT_SPRITES_AFTER_HALL_OF_FAME
|
