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
|
.equ LOCALID_FERRY_SAILOR, 6
VermilionCity_MapScripts:: @ 81668DC
map_script MAP_SCRIPT_ON_TRANSITION, VermilionCity_OnTransition
map_script MAP_SCRIPT_ON_FRAME_TABLE, VermilionCity_OnFrame
.byte 0
VermilionCity_OnFrame:: @ 81668E7
map_script_2 VAR_MAP_SCENE_VERMILION_CITY, 2, VermilionCity_EventScript_ExitSSAnne
.2byte 0
VermilionCity_EventScript_ExitSSAnne:: @ 81668F1
lockall
applymovement OBJ_EVENT_ID_PLAYER, VermilionCity_Movement_ExitSSAnne
waitmovement 0
setvar VAR_MAP_SCENE_VERMILION_CITY, 3
releaseall
end
VermilionCity_Movement_ExitSSAnne:: @ 8166903
walk_up
walk_up
step_end
VermilionCity_OnTransition:: @ 8166906
setworldmapflag FLAG_WORLD_MAP_VERMILION_CITY
call_if_set FLAG_TALKED_TO_OAKS_AIDE_IN_VERMILION, VermilionCity_EventScript_HideOaksAide
end
VermilionCity_EventScript_HideOaksAide:: @ 8166913
setflag FLAG_HIDE_VERMILION_CITY_OAKS_AIDE
return
VermilionCity_EventScript_Woman:: @ 8166917
msgbox VermilionCity_Text_GrimerMultipliesInSludge, MSGBOX_NPC
end
VermilionCity_EventScript_OldMan1:: @ 8166920
lock
faceplayer
compare VAR_MAP_SCENE_VERMILION_CITY, 3
goto_if_eq VermilionCity_EventScript_OldMan1SSAnneLeft
msgbox VermilionCity_Text_DidYouSeeSSAnneInHarbor
release
end
VermilionCity_EventScript_OldMan1SSAnneLeft:: @ 8166937
msgbox VermilionCity_Text_SSAnneHasDepartedForYear
release
end
VermilionCity_EventScript_FerrySailor:: @ 8166941
lock
faceplayer
compare VAR_MAP_SCENE_VERMILION_CITY, 3
goto_if_eq VermilionCity_EventScript_CheckSeagallopPresent
msgbox VermilionCity_Text_WelcomeToTheSSAnne
release
end
VermilionCity_EventScript_CheckHasMysticTicket:: @ 8166958
goto_if_unset FLAG_ENABLE_SHIP_NAVEL_ROCK, EventScript_SetResultFalse
checkitem ITEM_MYSTIC_TICKET, 1
compare VAR_RESULT, FALSE
goto_if_eq EventScript_SetResultFalse
goto EventScript_SetResultTrue
end
VermilionCity_EventScript_CheckHasAuroraTicket:: @ 8166977
goto_if_unset FLAG_ENABLE_SHIP_BIRTH_ISLAND, EventScript_SetResultFalse
checkitem ITEM_AURORA_TICKET, 1
compare VAR_RESULT, FALSE
goto_if_eq EventScript_SetResultFalse
goto EventScript_SetResultTrue
end
VermilionCity_EventScript_CheckSeagallopPresent:: @ 8166996
setvar VAR_0x8004, SEAGALLOP_VERMILION_CITY
compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5
goto_if_ge VermilionCity_EventScript_ChooseSeagallopDestRainbowPass
compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 1
goto_if_ge VermilionCity_EventScript_ChooseSeagallopDestTriPass
msgbox VermilionCity_Text_TheShipSetSail
release
end
VermilionCity_EventScript_ChooseSeagallopDestRainbowPass:: @ 81669BB
goto_if_questlog EventScript_ReleaseEnd
special sub_8112364
call VermilionCity_EventScript_CheckHasMysticTicket
compare VAR_RESULT, TRUE
goto_if_eq VermilionCity_EventScript_HasMysticTicket
call VermilionCity_EventScript_CheckHasAuroraTicket
compare VAR_RESULT, TRUE
goto_if_eq VermilionCity_EventScript_HasAuroraTicket
setvar VAR_0x8004, SEAGALLOP_VERMILION_CITY
message VermilionCity_Text_BoardSeagallopRainbowPass
waitmessage
goto EventScript_SeviiDestinationsPage1
end
VermilionCity_EventScript_HasMysticTicket:: @ 81669FD
call VermilionCity_EventScript_CheckHasAuroraTicket
compare VAR_RESULT, TRUE
goto_if_eq VermilionCity_EventScript_HasMysticAndAuroraTickets
call_if_unset FLAG_SHOWN_MYSTIC_TICKET, VermilionCity_EventScript_ShowMysticTicket
message VermilionCity_Text_BoardSeagallopFerry
waitmessage
multichoice 17, 6, MULTICHOICE_SEVII_NAVEL, FALSE
switch VAR_RESULT
case 0, EventScript_SeviiDestinationsPage1
case 1, EventScript_SailToNavelRock
case 2, EventScript_CancelSail
case 127, EventScript_CancelSail
end
VermilionCity_EventScript_ShowMysticTicket:: @ 8166A53
setflag FLAG_SHOWN_MYSTIC_TICKET
msgbox VermilionCity_Text_OhMysticTicketTakeYouToNavelRock
return
VermilionCity_EventScript_HasAuroraTicket:: @ 8166A5F
call_if_unset FLAG_SHOWN_AURORA_TICKET, VermilionCity_EventScript_ShowAuroraTicket
message VermilionCity_Text_BoardSeagallopFerry
waitmessage
multichoice 13, 6, MULTICHOICE_SEVII_BIRTH, FALSE
switch VAR_RESULT
case 0, EventScript_SeviiDestinationsPage1
case 1, EventScript_SailToBirthIsland
case 2, EventScript_CancelSail
case 127, EventScript_CancelSail
end
VermilionCity_EventScript_ShowAuroraTicket:: @ 8166AA5
setflag FLAG_SHOWN_AURORA_TICKET
msgbox VermilionCity_Text_OhAuroraTicketTakeYouToBirthIsland
return
VermilionCity_EventScript_HasMysticAndAuroraTickets:: @ 8166AB1
call_if_unset FLAG_SHOWN_MYSTIC_TICKET, VermilionCity_EventScript_ShowMysticTicket
call_if_unset FLAG_SHOWN_AURORA_TICKET, VermilionCity_EventScript_ShowAuroraTicket
message VermilionCity_Text_BoardSeagallopFerry
waitmessage
multichoice 13, 5, MULTICHOICE_SEVII_NAVEL_BIRTH, FALSE
switch VAR_RESULT
case 0, EventScript_SeviiDestinationsPage1
case 1, EventScript_SailToNavelRock
case 2, EventScript_SailToBirthIsland
case 3, EventScript_CancelSail
case 127, EventScript_CancelSail
end
EventScript_SailToNavelRock:: @ 8166B0B
msgbox VermilionCity_Text_Seagallop10Departing
setvar VAR_0x8004, SEAGALLOP_VERMILION_CITY
setvar VAR_0x8006, SEAGALLOP_NAVEL_ROCK
goto EventScript_SetSail
end
EventScript_SailToBirthIsland:: @ 8166B23
msgbox VermilionCity_Text_Seagallop12Departing
setvar VAR_0x8004, SEAGALLOP_VERMILION_CITY
setvar VAR_0x8006, SEAGALLOP_BIRTH_ISLAND
goto EventScript_SetSail
end
VermilionCity_EventScript_ChooseSeagallopDestTriPass:: @ 8166B3B
message VermilionCity_Text_BoardSeagallopTriPass
waitmessage
setvar VAR_0x8004, SEAGALLOP_VERMILION_CITY
multichoice 19, 5, MULTICHOICE_SEAGALLOP_123, FALSE
switch VAR_RESULT
case 0, EventScript_SailToOneIsland2
case 1, EventScript_SailToTwoIsland2
case 2, EventScript_SailToThreeIsland2
case 3, EventScript_CancelSail
case 127, EventScript_CancelSail
end
@ Unreachable
Vermilion_EventScript_Unused:: @ 8166B88
release
end
VermilionCity_EventScript_CheckTicketLeft:: @ 8166B8A
lockall
goto VermilionCity_EventScript_CheckTicket
end
VermilionCity_EventScript_CheckTicketRight:: @ 8166B91
lockall
goto VermilionCity_EventScript_CheckTicket
end
VermilionCity_EventScript_ExitedTicketCheck:: @ 8166B98
lockall
setvar VAR_VERMILION_CITY_TICKET_CHECK_TRIGGER, 0
releaseall
end
VermilionCity_EventScript_CheckTicket:: @ 8166BA0
textcolor 0
applymovement LOCALID_FERRY_SAILOR, Movement_WalkInPlaceFastestLeft
applymovement OBJ_EVENT_ID_PLAYER, Movement_WalkInPlaceFastestRight
waitmovement 0
compare VAR_MAP_SCENE_VERMILION_CITY, 3
goto_if_eq VermilionCity_EventScript_CheckSeagallopPresentTrigger
msgbox VermilionCity_Text_DoYouHaveATicket
goto_if_unset FLAG_GOT_SS_TICKET, VermilionCity_EventScript_DontHaveSSTicket
msgbox VermilionCity_Text_FlashedSSTicket
setvar VAR_VERMILION_CITY_TICKET_CHECK_TRIGGER, 1
releaseall
end
VermilionCity_EventScript_DontHaveSSTicket:: @ 8166BDE
msgbox VermilionCity_Text_DontHaveNeededSSTicket
closemessage
goto VermilionCity_EventScript_WalkUpPier
end
VermilionCity_EventScript_CheckSeagallopPresentTrigger:: @ 8166BED
setvar VAR_0x8004, SEAGALLOP_VERMILION_CITY
compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5
goto_if_ge VermilionCity_EventScript_ChooseSeagallopDestRainbowPass
compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 1
goto_if_ge VermilionCity_EventScript_ChooseSeagallopDestTriPass
msgbox VermilionCity_Text_TheShipSetSail
closemessage
goto VermilionCity_EventScript_WalkUpPier
end
VermilionCity_EventScript_Sailor:: @ 8166C17
msgbox VermilionCity_Text_SSAnneVisitsOnceAYear, MSGBOX_NPC
end
VermilionCity_EventScript_OaksAide:: @ 8166C20
lock
faceplayer
setflag FLAG_TALKED_TO_OAKS_AIDE_IN_VERMILION
msgbox VermilionCity_Text_Route2AideHasPackageForYou
release
end
VermilionCity_EventScript_OldMan2:: @ 8166C2F
msgbox VermilionCity_Text_BuildingOnThisLand, MSGBOX_NPC
end
VermilionCity_EventScript_Machop:: @ 8166C38
lock
faceplayer
waitse
playmoncry SPECIES_MACHOP, 0
msgbox VermilionCity_Text_Machop
waitmoncry
msgbox VermilionCity_Text_MachopStompingLandFlat
release
end
VermilionCity_EventScript_CitySign:: @ 8166C53
msgbox VermilionCity_Text_CitySign, MSGBOX_SIGN
end
VermilionCity_EventScript_SnorlaxNotice:: @ 8166C5C
msgbox VermilionCity_Text_SnorlaxBlockingRoute12, MSGBOX_SIGN
end
VermilionCity_EventScript_PokemonFanClubSign:: @ 8166C65
msgbox VermilionCity_Text_PokemonFanClubSign, MSGBOX_SIGN
end
VermilionCity_EventScript_GymSign:: @ 8166C6E
lockall
famechecker FAMECHECKER_LTSURGE, 0
msgbox VermilionCity_Text_GymSign
releaseall
end
VermilionCity_EventScript_HarborSign:: @ 8166C86
msgbox VermilionCity_Text_VermilionHarbor, MSGBOX_SIGN
end
|
