-
Notifications
You must be signed in to change notification settings - Fork 853
/
Copy pathBlackthornCity.asm
346 lines (273 loc) · 7.6 KB
/
BlackthornCity.asm
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
object_const_def
const BLACKTHORNCITY_SUPER_NERD1
const BLACKTHORNCITY_SUPER_NERD2
const BLACKTHORNCITY_GRAMPS1
const BLACKTHORNCITY_GRAMPS2
const BLACKTHORNCITY_BLACK_BELT
const BLACKTHORNCITY_COOLTRAINER_F1
const BLACKTHORNCITY_YOUNGSTER1
const BLACKTHORNCITY_SANTOS
const BLACKTHORNCITY_COOLTRAINER_F2
BlackthornCity_MapScripts:
def_scene_scripts
def_callbacks
callback MAPCALLBACK_NEWMAP, BlackthornCityFlypointCallback
callback MAPCALLBACK_OBJECTS, BlackthornCitySantosCallback
BlackthornCityFlypointCallback:
setflag ENGINE_FLYPOINT_BLACKTHORN
endcallback
BlackthornCitySantosCallback:
readvar VAR_WEEKDAY
ifequal SATURDAY, .SantosAppears
disappear BLACKTHORNCITY_SANTOS
endcallback
.SantosAppears:
appear BLACKTHORNCITY_SANTOS
endcallback
BlackthornSuperNerdScript:
faceplayer
opentext
checkevent EVENT_BEAT_CLAIR
iftrue .BeatClair
checkevent EVENT_CLEARED_RADIO_TOWER
iftrue .ClearedRadioTower
writetext Text_ClairIsOut
waitbutton
closetext
end
.ClearedRadioTower:
writetext Text_ClairIsIn
waitbutton
closetext
end
.BeatClair:
writetext Text_ClairIsBeaten
waitbutton
closetext
end
BlackthornGramps1Script:
jumptextfaceplayer BlackthornGrampsRefusesEntryText
BlackthornGramps2Script:
jumptextfaceplayer BlackthornGrampsGrantsEntryText
BlackthornBlackBeltScript:
faceplayer
opentext
checkevent EVENT_CLEARED_RADIO_TOWER
iftrue .ClearedRadioTower
writetext BlackBeltText_WeirdRadio
waitbutton
closetext
end
.ClearedRadioTower:
writetext BlackBeltText_VoicesInMyHead
waitbutton
closetext
end
BlackthornCooltrainerF1Script:
jumptextfaceplayer BlackthornCooltrainerF1Text
BlackthornYoungsterScript:
jumptextfaceplayer BlackthornYoungsterText
BlackthornCooltrainerF2Script:
jumptextfaceplayer BlackthornCooltrainerF2Text
SantosScript:
faceplayer
opentext
checkevent EVENT_GOT_SPELL_TAG_FROM_SANTOS
iftrue .Saturday
readvar VAR_WEEKDAY
ifnotequal SATURDAY, .NotSaturday
checkevent EVENT_MET_SANTOS_OF_SATURDAY
iftrue .MetSantos
writetext MeetSantosText
promptbutton
setevent EVENT_MET_SANTOS_OF_SATURDAY
.MetSantos:
writetext SantosGivesGiftText
promptbutton
verbosegiveitem SPELL_TAG
iffalse .Done
setevent EVENT_GOT_SPELL_TAG_FROM_SANTOS
writetext SantosGaveGiftText
waitbutton
closetext
end
.Saturday:
writetext SantosSaturdayText
waitbutton
.Done:
closetext
end
.NotSaturday:
writetext SantosNotSaturdayText
waitbutton
closetext
end
BlackthornCitySign:
jumptext BlackthornCitySignText
BlackthornGymSign:
jumptext BlackthornGymSignText
MoveDeletersHouseSign:
jumptext MoveDeletersHouseSignText
DragonDensSign:
jumptext DragonDensSignText
BlackthornCityTrainerTips:
jumptext BlackthornCityTrainerTipsText
BlackthornCityPokecenterSign:
jumpstd PokecenterSignScript
BlackthornCityMartSign:
jumpstd MartSignScript
Text_ClairIsOut:
text "I am sorry."
para "CLAIR, our GYM"
line "LEADER, entered"
para "the DRAGON'S DEN"
line "behind the GYM."
para "I have no idea"
line "when our LEADER"
cont "will return."
done
Text_ClairIsIn:
text "CLAIR, our GYM"
line "LEADER, is waiting"
cont "for you."
para "However, it would"
line "be impossible for"
para "a run-of-the-mill"
line "trainer to win."
done
Text_ClairIsBeaten:
text "You defeated"
line "CLAIR?"
para "That's amazing!"
para "I've never heard"
line "of her losing to"
para "anyone other than"
line "LANCE."
done
BlackthornGrampsRefusesEntryText:
text "No. Only chosen"
line "trainers may train"
para "here."
line "Please leave."
done
BlackthornGrampsGrantsEntryText:
text "If CLAIR allows"
line "it, her grand-"
cont "father--our MASTER"
cont "--will also."
para "You may enter."
done
BlackBeltText_WeirdRadio:
text "My radio's busted?"
line "Lately, I only get"
cont "this weird signal."
done
BlackBeltText_VoicesInMyHead:
text "Arooo! Voices in"
line "my head!"
para "Huh? I'm listening"
line "to my radio!"
done
BlackthornCooltrainerF1Text:
text "Are you going to"
line "make your #MON"
cont "forget some moves?"
done
BlackthornYoungsterText:
text "Dragon masters all"
line "come from the city"
cont "of BLACKTHORN."
done
MeetSantosText:
text "SANTOS: …"
para "It's Saturday…"
para "I'm SANTOS of"
line "Saturday…"
done
SantosGivesGiftText:
text "You can have this…"
done
SantosGaveGiftText:
text "SANTOS: …"
para "SPELL TAG…"
para "Ghost-type moves"
line "get stronger…"
para "It will frighten"
line "you…"
done
SantosSaturdayText:
text "SANTOS: …"
para "See you again on"
line "another Saturday…"
para "I won't have any"
line "more gifts…"
done
SantosNotSaturdayText:
text "SANTOS: Today's"
line "not Saturday…"
done
BlackthornCooltrainerF2Text:
text "Wow, you came"
line "through the ICE"
cont "PATH?"
para "You must be a real"
line "hotshot trainer!"
done
BlackthornCitySignText:
text "BLACKTHORN CITY"
para "A Quiet Mountain"
line "Retreat"
done
BlackthornGymSignText:
text "BLACKTHORN CITY"
line "#MON GYM"
cont "LEADER: CLAIR"
para "The Blessed User"
line "of Dragon #MON"
done
MoveDeletersHouseSignText:
text "MOVE DELETER'S"
line "HOUSE"
done
DragonDensSignText:
text "DRAGON'S DEN"
line "AHEAD"
done
BlackthornCityTrainerTipsText:
text "TRAINER TIPS"
para "A #MON holding"
line "a MIRACLEBERRY"
para "will cure itself"
line "of any status"
cont "problem."
done
BlackthornCity_MapEvents:
db 0, 0 ; filler
def_warp_events
warp_event 18, 11, BLACKTHORN_GYM_1F, 1
warp_event 13, 21, BLACKTHORN_DRAGON_SPEECH_HOUSE, 1
warp_event 29, 23, BLACKTHORN_EMYS_HOUSE, 1
warp_event 15, 29, BLACKTHORN_MART, 2
warp_event 21, 29, BLACKTHORN_POKECENTER_1F, 1
warp_event 9, 31, MOVE_DELETERS_HOUSE, 1
warp_event 36, 9, ICE_PATH_1F, 2
warp_event 20, 1, DRAGONS_DEN_1F, 1
def_coord_events
def_bg_events
bg_event 34, 24, BGEVENT_READ, BlackthornCitySign
bg_event 17, 13, BGEVENT_READ, BlackthornGymSign
bg_event 7, 31, BGEVENT_READ, MoveDeletersHouseSign
bg_event 21, 3, BGEVENT_READ, DragonDensSign
bg_event 5, 25, BGEVENT_READ, BlackthornCityTrainerTips
bg_event 16, 29, BGEVENT_READ, BlackthornCityMartSign
bg_event 22, 29, BGEVENT_READ, BlackthornCityPokecenterSign
def_object_events
object_event 18, 12, SPRITE_SUPER_NERD, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, BlackthornSuperNerdScript, EVENT_BLACKTHORN_CITY_SUPER_NERD_BLOCKS_GYM
object_event 19, 12, SPRITE_SUPER_NERD, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, BlackthornSuperNerdScript, EVENT_BLACKTHORN_CITY_SUPER_NERD_DOES_NOT_BLOCK_GYM
object_event 20, 2, SPRITE_GRAMPS, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, BlackthornGramps1Script, EVENT_BLACKTHORN_CITY_GRAMPS_BLOCKS_DRAGONS_DEN
object_event 21, 2, SPRITE_GRAMPS, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, BlackthornGramps2Script, EVENT_BLACKTHORN_CITY_GRAMPS_NOT_BLOCKING_DRAGONS_DEN
object_event 24, 31, SPRITE_BLACK_BELT, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 1, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, BlackthornBlackBeltScript, -1
object_event 9, 25, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 2, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, BlackthornCooltrainerF1Script, -1
object_event 13, 15, SPRITE_YOUNGSTER, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 1, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, BlackthornYoungsterScript, -1
object_event 22, 20, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SantosScript, EVENT_BLACKTHORN_CITY_SANTOS_OF_SATURDAY
object_event 35, 19, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, BlackthornCooltrainerF2Script, -1