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
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
|
const_def 2 ; object constants
const RADIOTOWER1F_RECEPTIONIST
const RADIOTOWER1F_LASS
const RADIOTOWER1F_YOUNGSTER
const RADIOTOWER1F_ROCKET
const RADIOTOWER1F_GENTLEMAN
const RADIOTOWER1F_COOLTRAINER_F
RadioTower1F_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
RadioTower1FReceptionistScript:
faceplayer
opentext
checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
iftrue .Rockets
writetext UnknownText_0x5ce77
waitbutton
closetext
end
.Rockets:
writetext UnknownText_0x5ce81
waitbutton
closetext
end
RadioTower1FLuckyNumberManScript:
faceplayer
opentext
writetext UnknownText_0x5ceba
promptbutton
special CheckLuckyNumberShowFlag
iffalse .skip
special ResetLuckyNumberShowFlag
.skip
special PrintTodaysLuckyNumber
checkflag ENGINE_LUCKY_NUMBER_SHOW
iftrue .GameOver
writetext UnknownText_0x5cf3a
promptbutton
closetext
applymovement RADIOTOWER1F_GENTLEMAN, MovementData_0x5ce71
opentext
writetext UnknownText_0x5cf5a
promptbutton
waitsfx
writetext UnknownText_0x5cf79
playsound SFX_DEX_FANFARE_20_49
waitsfx
promptbutton
special CheckForLuckyNumberWinners
closetext
applymovement RADIOTOWER1F_GENTLEMAN, MovementData_0x5ce74
opentext
ifequal 1, .FirstPlace
ifequal 2, .SecondPlace
ifequal 3, .ThirdPlace
sjump .NoPrize
.GameOver:
writetext UnknownText_0x5cf7e
waitbutton
closetext
end
.FirstPlace:
writetext UnknownText_0x5cfb5
playsound SFX_1ST_PLACE
waitsfx
promptbutton
giveitem MASTER_BALL
iffalse .BagFull
itemnotify
setflag ENGINE_LUCKY_NUMBER_SHOW
sjump .GameOver
.SecondPlace:
writetext UnknownText_0x5d023
playsound SFX_2ND_PLACE
waitsfx
promptbutton
giveitem EXP_SHARE
iffalse .BagFull
itemnotify
setflag ENGINE_LUCKY_NUMBER_SHOW
sjump .GameOver
.ThirdPlace:
writetext UnknownText_0x5d076
playsound SFX_3RD_PLACE
waitsfx
promptbutton
giveitem PP_UP
iffalse .BagFull
itemnotify
setflag ENGINE_LUCKY_NUMBER_SHOW
sjump .GameOver
.NoPrize:
writetext UnknownText_0x5d0c0
waitbutton
closetext
end
.BagFull:
writetext UnknownText_0x5d0e6
waitbutton
closetext
end
RadioTower1FRadioCardWomanScript:
faceplayer
opentext
checkflag ENGINE_RADIO_CARD
iftrue .GotCard
writetext UnknownText_0x5d12d
yesorno
iffalse .NoQuiz
writetext UnknownText_0x5d1f2
yesorno
iffalse .WrongAnswer
playsound SFX_ELEVATOR_END
waitsfx
writetext UnknownText_0x5d231
yesorno
iffalse .WrongAnswer
playsound SFX_ELEVATOR_END
waitsfx
writetext UnknownText_0x5d282
yesorno
iftrue .WrongAnswer
playsound SFX_ELEVATOR_END
waitsfx
writetext UnknownText_0x5d2bc
yesorno
iffalse .WrongAnswer
playsound SFX_ELEVATOR_END
waitsfx
writetext UnknownText_0x5d30e
yesorno
iftrue .WrongAnswer
playsound SFX_ELEVATOR_END
waitsfx
writetext UnknownText_0x5d37b
promptbutton
getstring STRING_BUFFER_4, .RadioCardText
scall .ReceiveItem
writetext UnknownText_0x5d3c0
promptbutton
setflag ENGINE_RADIO_CARD
.GotCard:
writetext UnknownText_0x5d3e5
waitbutton
closetext
end
.RadioCardText:
db "RADIO CARD@"
.ReceiveItem:
jumpstd receiveitem
end
.WrongAnswer:
playsound SFX_WRONG
writetext UnknownText_0x5d409
waitbutton
closetext
end
.NoQuiz:
writetext UnknownText_0x5d443
waitbutton
closetext
end
RadioTower1FLassScript:
jumptextfaceplayer RadioTower1FLassText
RadioTower1FYoungsterScript:
jumptextfaceplayer RadioTower1FYoungsterText
TrainerGruntM3:
trainer GRUNTM, GRUNTM_3, EVENT_BEAT_ROCKET_GRUNTM_3, GruntM3SeenText, GruntM3BeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext GruntM3AfterBattleText
waitbutton
closetext
end
RadioTower1FDirectory:
jumptext RadioTower1FDirectoryText
RadioTower1FLuckyChannelSign:
jumptext RadioTower1FLuckyChannelSignText
MovementData_0x5ce71:
step RIGHT
turn_head UP
step_end
MovementData_0x5ce74:
step LEFT
turn_head UP
step_end
UnknownText_0x5ce77:
text "Welcome!"
done
UnknownText_0x5ce81:
text "Hello. I'm sorry,"
line "but we're not"
cont "offering any tours"
cont "today."
done
UnknownText_0x5ceba:
text "Hi, are you here"
line "for the LUCKY NUM-"
cont "BER SHOW?"
para "Want me to check"
line "the ID numbers of"
cont "your #MON?"
para "If you get lucky,"
line "you win a prize."
done
UnknownText_0x5cf3a:
text "This week's ID"
line "number is @"
text_ram wStringBuffer3
text "."
done
UnknownText_0x5cf5a:
text "Let's see if you"
line "have a match."
done
UnknownText_0x5cf79:
text "<……>"
line "<……>"
done
UnknownText_0x5cf7e:
text "Please come back"
line "next week for the"
cont "next LUCKY NUMBER."
done
UnknownText_0x5cfb5:
text "Wow! You have a"
line "perfect match of"
cont "all five numbers!"
para "We have a grand"
line "prize winner!"
para "You have won a"
line "MASTER BALL!"
done
UnknownText_0x5d023:
text "Hey! You've"
line "matched the last"
cont "three numbers!"
para "You've won second"
line "prize, an EXP."
cont "SHARE!"
done
UnknownText_0x5d076:
text "Ooh, you've"
line "matched the last"
cont "two numbers."
para "You've won third"
line "prize, a PP UP."
done
UnknownText_0x5d0c0:
text "Nope, none of your"
line "ID numbers match."
done
UnknownText_0x5d0e6:
text "You've got no room"
line "for your prize."
para "Make room and come"
line "back right away."
done
UnknownText_0x5d12d:
text "We have a special"
line "quiz campaign on"
cont "right now."
para "Answer five ques-"
line "tions correctly to"
cont "win a RADIO CARD."
para "Slide it into your"
line "#GEAR to play"
para "the radio anytime,"
line "anywhere."
para "Would you like to"
line "take the quiz?"
done
UnknownText_0x5d1f2:
text "Question 1:"
para "Can the TOWN MAP"
line "be displayed on a"
cont "#GEAR?"
done
UnknownText_0x5d231:
text "Correct!"
line "Question 2:"
para "Can NIDORINA be"
line "female only?"
done
UnknownText_0x5d282:
text "Bull's-eye!"
line "Question 3:"
para "Does KURT, the"
line "# BALL crafts-"
cont "man, use APRIKORN?"
done
UnknownText_0x5d2bc:
text "So far so good!"
line "Question 4:"
para "MAGIKARP won't"
line "learn any TM move?"
done
UnknownText_0x5d30e:
text "Wow! Right again!"
line "Here's the final"
cont "question:"
para "PROF.OAK'S #MON"
line "TALK is a very"
cont "popular program."
para "Is MARIE the co-"
line "host of the show?"
done
UnknownText_0x5d37b:
text "Bingo! You got it!"
line "Congratulations!"
para "Here's your prize,"
line "a RADIO CARD!"
done
UnknownText_0x5d3c0:
text "<PLAYER>'s #GEAR"
line "can now double as"
cont "a radio!"
done
UnknownText_0x5d3e5:
text "Please tune in to"
line "our radio shows."
done
UnknownText_0x5d409:
text "Oh, dear."
line "Sorry, but you"
para "got it wrong."
line "Please try again!"
done
UnknownText_0x5d443:
text "Oh. I see. Please"
line "try if you change"
cont "your mind."
done
RadioTower1FLassText:
text "BEN is a fabulous"
line "DJ."
para "His sweet voice"
line "makes me melt!"
done
RadioTower1FYoungsterText:
text "I love MARY, from"
line "#MON TALK."
para "I only know what"
line "she sounds like,"
cont "though."
done
GruntM3SeenText:
text "We've finally"
line "taken over the"
cont "RADIO TOWER!"
para "Now everyone will"
line "get to experience"
para "the true terror of"
line "TEAM ROCKET!"
para "We'll show you"
line "how scary we are!"
done
GruntM3BeatenText:
text "Too strong! We"
line "must watch you…"
done
GruntM3AfterBattleText:
text "You're too strong."
para "Our plan could be"
line "ruined. I must"
cont "warn the others…"
done
RadioTower1FDirectoryText:
text "1F RECEPTION"
line "2F SALES"
para "3F PERSONNEL"
line "4F PRODUCTION"
para "5F DIRECTOR'S"
line " OFFICE"
done
RadioTower1FLuckyChannelSignText:
text "LUCKY CHANNEL!"
para "Win with #MON"
line "ID numbers!"
para "Trade your #MON"
line "to collect differ-"
cont "ent ID numbers!"
done
RadioTower1F_MapEvents:
db 0, 0 ; filler
db 3 ; warp events
warp_event 2, 7, GOLDENROD_CITY, 12
warp_event 3, 7, GOLDENROD_CITY, 12
warp_event 15, 0, RADIO_TOWER_2F, 2
db 0 ; coord events
db 2 ; bg events
bg_event 3, 0, BGEVENT_READ, RadioTower1FDirectory
bg_event 13, 0, BGEVENT_READ, RadioTower1FLuckyChannelSign
db 6 ; object events
object_event 5, 6, SPRITE_RECEPTIONIST, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, RadioTower1FReceptionistScript, -1
object_event 16, 4, SPRITE_LASS, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, RadioTower1FLassScript, EVENT_GOLDENROD_CITY_CIVILIANS
object_event 15, 4, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, RadioTower1FYoungsterScript, EVENT_GOLDENROD_CITY_CIVILIANS
object_event 14, 1, SPRITE_ROCKET, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_TRAINER, 3, TrainerGruntM3, EVENT_RADIO_TOWER_ROCKET_TAKEOVER
object_event 8, 6, SPRITE_GENTLEMAN, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, RadioTower1FLuckyNumberManScript, EVENT_GOLDENROD_CITY_CIVILIANS
object_event 12, 6, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, RadioTower1FRadioCardWomanScript, EVENT_GOLDENROD_CITY_CIVILIANS
|