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
|
OaksLab_MapScriptHeader: ; 0x19b3c5
; trigger count
db 0
; callback count
db 0
; 0x19b3c7
UnknownScript_0x19b3c7: ; 0x19b3c7
end
; 0x19b3c8
Oak:
faceplayer
loadfont
checkevent EVENT_OPENED_MT_SILVER
iftrue .CheckPokedex
checkevent EVENT_TALKED_TO_OAK_IN_KANTO
iftrue .CheckBadges
writetext OakWelcomeKantoText
keeptextopen
setevent EVENT_TALKED_TO_OAK_IN_KANTO
.CheckBadges
checkcode $7
if_equal 16, .OpenMtSilver
if_equal 8, .Complain
jump .AhGood
.CheckPokedex
writetext OakLabDexCheckText
closetext
special ProfOaksPCBoot
writetext OakLabGoodbyeText
closetext
loadmovesprites
end
.OpenMtSilver
writetext OakOpenMtSilverText
keeptextopen
setevent EVENT_OPENED_MT_SILVER
jump .CheckPokedex
.Complain
writetext OakNoKantoBadgesText
keeptextopen
jump .CheckPokedex
.AhGood
writetext OakYesKantoBadgesText
keeptextopen
jump .CheckPokedex
ScientistScript_0x19b40f: ; 0x19b40f
jumptextfaceplayer UnknownText_0x19b7fb
; 0x19b412
ScientistScript_0x19b412: ; 0x19b412
jumptextfaceplayer UnknownText_0x19b859
; 0x19b415
ScientistScript_0x19b415: ; 0x19b415
jumptextfaceplayer UnknownText_0x19b8a7
; 0x19b418
OaksLabBookshelf:
jumpstd difficultbookshelf
OaksLabPoster1:
jumptext OaksLabPoster1Text
OaksLabPoster2:
jumptext OaksLabPoster2Text
OaksLabTrashcan:
jumptext OaksLabTrashcanText
OaksLabPC:
jumptext OaksLabPCText
OakWelcomeKantoText:
text "OAK: Ah, <PLAY_G>!"
line "It's good of you"
para "to come all this"
line "way to KANTO."
para "What do you think"
line "of the trainers"
para "out here?"
line "Pretty tough, huh?"
done
OakLabDexCheckText:
text "How is your #-"
line "DEX coming?"
para "Let's see…"
done
OakLabGoodbyeText:
text "If you're in the"
line "area, I hope you"
cont "come visit again."
done
OakOpenMtSilverText:
text "OAK: Wow! That's"
line "excellent!"
para "You collected the"
line "BADGES of GYMS in"
cont "KANTO. Well done!"
para "I was right in my"
line "assessment of you."
para "Tell you what,"
line "<PLAY_G>. I'll make"
para "arrangements so"
line "that you can go to"
cont "MT.SILVER."
para "MT.SILVER is a big"
line "mountain that is"
para "home to many wild"
line "#MON."
para "It's too dangerous"
line "for your average"
para "trainer, so it's"
line "off limits. But"
para "we can make an"
line "exception in your"
cont "case, <PLAY_G>."
para "Go up to INDIGO"
line "PLATEAU. You can"
para "reach MT.SILVER"
line "from there."
done
OakNoKantoBadgesText:
text "OAK: Hmm? You're"
line "not collecting"
cont "KANTO GYM BADGES?"
para "The GYM LEADERS in"
line "KANTO are as tough"
para "as any you battled"
line "in JOHTO."
para "I recommend that"
line "you challenge"
cont "them."
done
OakYesKantoBadgesText:
text "OAK: Ah, you're"
line "collecting KANTO"
cont "GYM BADGES."
para "I imagine that"
line "it's hard, but the"
para "experience is sure"
line "to help you."
para "Come see me when"
line "you get them all."
para "I'll have a gift"
line "for you."
para "Keep trying hard,"
line "<PLAY_G>!"
done
UnknownText_0x19b7fb: ; 0x19b7fb
text "The PROF's #MON"
line "TALK radio program"
para "isn't aired here"
line "in KANTO."
para "It's a shame--I'd"
line "like to hear it."
done
; 0x19b859
UnknownText_0x19b859: ; 0x19b859
text "Thanks to your"
line "work on the #-"
cont "DEX, the PROF's"
para "research is coming"
line "along great."
done
; 0x19b8a7
UnknownText_0x19b8a7: ; 0x19b8a7
text "Don't tell anyone,"
line "but PROF.OAK'S"
para "#MON TALK isn't"
line "a live broadcast."
done
; 0x19b8ea
OaksLabPoster1Text:
text "Press START to"
line "open the MENU."
done
OaksLabPoster2Text:
text "The SAVE option is"
line "on the MENU."
para "Use it in a timely"
line "manner."
done
OaksLabTrashcanText
text "There's nothing in"
line "here…"
done
OaksLabPCText:
text "There's an e-mail"
line "message on the PC."
para "…"
para "PROF.OAK, how is"
line "your research"
cont "coming along?"
para "I'm still plugging"
line "away."
para "I heard rumors"
line "that <PLAY_G> is"
para "getting quite a"
line "reputation."
para "I'm delighted to"
line "hear that."
para "ELM in NEW BARK"
line "TOWN 8-)"
done
; 0x19ba33
OaksLab_MapEventHeader: ; 0x19ba33
; filler
db 0, 0
; warps
db 2
warp_def $b, $4, 3, GROUP_PALLET_TOWN, MAP_PALLET_TOWN
warp_def $b, $5, 3, GROUP_PALLET_TOWN, MAP_PALLET_TOWN
; xy triggers
db 0
; signposts
db 16
signpost 1, 6, $0, OaksLabBookshelf
signpost 1, 7, $0, OaksLabBookshelf
signpost 1, 8, $0, OaksLabBookshelf
signpost 1, 9, $0, OaksLabBookshelf
signpost 7, 0, $0, OaksLabBookshelf
signpost 7, 1, $0, OaksLabBookshelf
signpost 7, 2, $0, OaksLabBookshelf
signpost 7, 3, $0, OaksLabBookshelf
signpost 7, 6, $0, OaksLabBookshelf
signpost 7, 7, $0, OaksLabBookshelf
signpost 7, 8, $0, OaksLabBookshelf
signpost 7, 9, $0, OaksLabBookshelf
signpost 0, 4, $0, OaksLabPoster1
signpost 0, 5, $0, OaksLabPoster2
signpost 3, 9, $0, OaksLabTrashcan
signpost 1, 0, $0, OaksLabPC
; people-events
db 4
person_event SPRITE_OAK, 6, 8, $6, $0, 255, 255, $0, 0, Oak, $ffff
person_event SPRITE_SCIENTIST, 12, 5, $5, $1, 255, 255, $90, 0, ScientistScript_0x19b40f, $ffff
person_event SPRITE_SCIENTIST, 13, 12, $4, $10, 255, 255, $90, 0, ScientistScript_0x19b412, $ffff
person_event SPRITE_SCIENTIST, 8, 5, $2, $11, 255, 255, $90, 0, ScientistScript_0x19b415, $ffff
; 0x19bac7
|
