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
|
CeladonGameCorner_MapScriptHeader: ; 0x7211b
; trigger count
db 0
; callback count
db 0
; 0x7211d
ClerkScript_0x7211d: ; 0x7211d
jumpstd $0032
; 0x72120
ReceptionistScript_0x72120: ; 0x72120
jumptextfaceplayer UnknownText_0x721d0
; 0x72123
PokefanMScript_0x72123: ; 0x72123
faceplayer
loadfont
2writetext UnknownText_0x72215
closetext
loadmovesprites
spriteface $4, $2
end
; 0x7212e
TeacherScript_0x7212e: ; 0x7212e
faceplayer
loadfont
2writetext UnknownText_0x72242
closetext
loadmovesprites
spriteface $5, $3
end
; 0x72139
FishingGuruScript_0x72139: ; 0x72139
faceplayer
loadfont
2writetext UnknownText_0x72295
closetext
loadmovesprites
spriteface $6, $3
end
; 0x72144
FisherScript_0x72144: ; 0x72144
faceplayer
loadfont
checkevent EVENT_GOT_COINS_FROM_GAMBLER_AT_CELADON
iftrue .UnknownScript_0x72169
2writetext UnknownText_0x722dc
keeptextopen
checkitem COIN_CASE
iffalse UnknownScript_0x7217b
checkcoins 9998
if_equal $0, UnknownScript_0x72184
stringtotext .coinname, $1
2call .UnknownScript_0x72172
givecoins 18
setevent EVENT_GOT_COINS_FROM_GAMBLER_AT_CELADON
.UnknownScript_0x72169 ; 0x72169
2writetext UnknownText_0x72345
closetext
loadmovesprites
spriteface $fe, $2
end
; 0x72172
.UnknownScript_0x72172 ; 0x72172
jumpstd $002f
end
; 0x72176
.coinname ; 0x72176
db "COIN@"
; 0x7217b
UnknownScript_0x7217b: ; 0x7217b
2writetext UnknownText_0x7238a
closetext
loadmovesprites
spriteface $fe, $2
end
; 0x72184
UnknownScript_0x72184: ; 0x72184
2writetext UnknownText_0x723d9
closetext
loadmovesprites
spriteface $fe, $2
end
; 0x7218d
CeladonGymGuyScript: ; 0x7218d
jumptextfaceplayer CeladonGymGuyText
; 0x72190
GrampsScript_0x72190: ; 0x72190
faceplayer
loadfont
2writetext UnknownText_0x724ad
closetext
loadmovesprites
spriteface $a, $2
end
; 0x7219b
MapCeladonGameCornerSignpost36Script: ; 0x7219b
jumptext UnknownText_0x724f3
; 0x7219e
MapCeladonGameCornerSignpost37Script: ; 0x7219e
jumptext UnknownText_0x72521
; 0x721a1
MapCeladonGameCornerSignpost35Script: ; 0x721a1
random $6
if_equal $0, MapCeladonGameCornerSignpost16Script
refreshscreen $0
writebyte $0
special $002a
loadmovesprites
end
; 0x721b0
MapCeladonGameCornerSignpost16Script: ; 0x721b0
refreshscreen $0
writebyte $1
special $002a
loadmovesprites
end
; 0x721b9
MapCeladonGameCornerSignpost11Script: ; 0x721b9
refreshscreen $0
special $002b
loadmovesprites
end
; 0x721c0
MapCeladonGameCornerSignpost32Script: ; 0x721c0
jumptext UnknownText_0x7254f
; 0x721c3
MapCeladonGameCornerSignpost9Script: ; 0x721c3
loadfont
2writetext UnknownText_0x72567
closetext
special $002b
loadmovesprites
end
; 0x721cd
INCBIN "baserom.gbc",$721cd,$721d0 - $721cd
UnknownText_0x721d0: ; 0x721d0
text "Welcome!"
para "You may exchange"
line "your coins for"
para "fabulous prizes"
line "next door."
done
; 0x72215
UnknownText_0x72215: ; 0x72215
text "The slot machines"
line "are all state of"
cont "the art."
done
; 0x72242
UnknownText_0x72242: ; 0x72242
text "It's this machine"
line "I want."
para "It cleaned me out"
line "yesterday, so it"
para "should pay out"
line "today."
done
; 0x72295
UnknownText_0x72295: ; 0x72295
text "I think this slot"
line "machine will pay"
cont "out…"
para "The odds vary"
line "among machines."
done
; 0x722dc
UnknownText_0x722dc: ; 0x722dc
text "Gahahaha!"
para "The coins just"
line "keep popping out!"
para "Hm? What, kid? You"
line "want to play?"
para "I'll share my luck"
line "with you!"
done
; 0x72345
UnknownText_0x72345: ; 0x72345
text "Gahahaha!"
para "It makes me feel"
line "good to do nice"
para "things for other"
line "people!"
done
; 0x7238a
UnknownText_0x7238a: ; 0x7238a
text "Hey, you don't"
line "have a COIN CASE."
para "How am I supposed"
line "to give you any"
cont "coins, kid?"
done
; 0x723d9
UnknownText_0x723d9: ; 0x723d9
text "Hey, your COIN"
line "CASE is full, kid."
para "You must be riding"
line "a winning streak"
cont "too."
done
; 0x72425
CeladonGymGuyText: ; 0x72425
text "Hey! CHAMP in"
line "making!"
para "Are you playing"
line "the slots too?"
para "I'm trying to get"
line "enough coins for a"
cont "prize #MON."
para "But I don't have"
line "enough coins yet…"
done
; 0x724ad
UnknownText_0x724ad: ; 0x724ad
text "Hmmm… The odds are"
line "surely better for"
para "PIKACHU's line,"
line "but… What to do?"
done
; 0x724f3
UnknownText_0x724f3: ; 0x724f3
text "Hey!"
para "Underneath this"
line "poster…"
para "There's nothing!"
done
; 0x72521
UnknownText_0x72521: ; 0x72521
text "Hey!"
para "Underneath this"
line "poster…"
para "There's nothing!"
done
; 0x7254f
UnknownText_0x7254f: ; 0x7254f
text "There's a lighter"
line "here."
done
; 0x72567
UnknownText_0x72567: ; 0x72567
text "A can of soda…"
para "Someone must be"
line "coming back…"
para "Huh? It's empty!"
done
; 0x725a4
CeladonGameCorner_MapEventHeader: ; 0x725a4
; filler
db 0, 0
; warps
db 2
warp_def $d, $e, 6, GROUP_CELADON_CITY, MAP_CELADON_CITY
warp_def $d, $f, 6, GROUP_CELADON_CITY, MAP_CELADON_CITY
; xy triggers
db 0
; signposts
db 38
signpost 6, 1, $0, MapCeladonGameCornerSignpost11Script
signpost 7, 1, $0, MapCeladonGameCornerSignpost11Script
signpost 8, 1, $0, MapCeladonGameCornerSignpost11Script
signpost 9, 1, $0, MapCeladonGameCornerSignpost11Script
signpost 10, 1, $0, MapCeladonGameCornerSignpost11Script
signpost 11, 1, $4, MapCeladonGameCornerSignpost11Script
signpost 6, 6, $0, MapCeladonGameCornerSignpost11Script
signpost 7, 6, $0, MapCeladonGameCornerSignpost11Script
signpost 8, 6, $0, MapCeladonGameCornerSignpost11Script
signpost 9, 6, $0, MapCeladonGameCornerSignpost9Script
signpost 10, 6, $0, MapCeladonGameCornerSignpost11Script
signpost 11, 6, $3, MapCeladonGameCornerSignpost11Script
signpost 6, 7, $0, MapCeladonGameCornerSignpost35Script
signpost 7, 7, $0, MapCeladonGameCornerSignpost35Script
signpost 8, 7, $0, MapCeladonGameCornerSignpost35Script
signpost 9, 7, $0, MapCeladonGameCornerSignpost35Script
signpost 10, 7, $0, MapCeladonGameCornerSignpost16Script
signpost 11, 7, $4, MapCeladonGameCornerSignpost35Script
signpost 6, 12, $0, MapCeladonGameCornerSignpost35Script
signpost 7, 12, $0, MapCeladonGameCornerSignpost35Script
signpost 8, 12, $0, MapCeladonGameCornerSignpost35Script
signpost 9, 12, $0, MapCeladonGameCornerSignpost35Script
signpost 10, 12, $0, MapCeladonGameCornerSignpost35Script
signpost 11, 12, $3, MapCeladonGameCornerSignpost35Script
signpost 6, 13, $0, MapCeladonGameCornerSignpost35Script
signpost 7, 13, $0, MapCeladonGameCornerSignpost35Script
signpost 8, 13, $0, MapCeladonGameCornerSignpost35Script
signpost 9, 13, $0, MapCeladonGameCornerSignpost35Script
signpost 10, 13, $0, MapCeladonGameCornerSignpost35Script
signpost 11, 13, $4, MapCeladonGameCornerSignpost35Script
signpost 6, 18, $0, MapCeladonGameCornerSignpost35Script
signpost 7, 18, $0, MapCeladonGameCornerSignpost35Script
signpost 8, 18, $0, MapCeladonGameCornerSignpost32Script
signpost 9, 18, $0, MapCeladonGameCornerSignpost35Script
signpost 10, 18, $0, MapCeladonGameCornerSignpost35Script
signpost 11, 18, $3, MapCeladonGameCornerSignpost35Script
signpost 0, 15, $0, MapCeladonGameCornerSignpost36Script
signpost 0, 9, $0, MapCeladonGameCornerSignpost37Script
; people-events
db 9
person_event SPRITE_CLERK, 6, 9, $6, $0, 255, 255, $a0, 0, ClerkScript_0x7211d, $ffff
person_event SPRITE_RECEPTIONIST, 6, 7, $6, $0, 255, 255, $a0, 0, ReceptionistScript_0x72120, $ffff
person_event SPRITE_POKEFAN_M, 14, 18, $8, $0, 255, 255, $80, 0, PokefanMScript_0x72123, $ffff
person_event SPRITE_TEACHER, 11, 21, $9, $0, 255, 255, $90, 0, TeacherScript_0x7212e, $ffff
person_event SPRITE_FISHING_GURU, 11, 15, $9, $0, 255, 255, $a0, 0, FishingGuruScript_0x72139, $ffff
person_event SPRITE_FISHER, 14, 12, $8, $0, 255, 2, $80, 0, FisherScript_0x72144, $ffff
person_event SPRITE_FISHER, 14, 12, $8, $0, 255, 4, $80, 0, FisherScript_0x72144, $ffff
person_event SPRITE_GYM_GUY, 7, 15, $6, $0, 255, 255, $80, 0, CeladonGymGuyScript, $ffff
person_event SPRITE_GRAMPS, 12, 6, $8, $0, 255, 255, $a0, 0, GrampsScript_0x72190, $ffff
; 0x726e7
|
