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
|
.set LOCALID_FOSSIL_SCIENTIST, 5
RustboroCity_DevonCorp_2F_MapScripts:: @ 8211857
map_script MAP_SCRIPT_ON_TRANSITION, RustboroCity_DevonCorp_2F_OnTransition
.byte 0
RustboroCity_DevonCorp_2F_OnTransition: @ 821185D
compare VAR_FOSSIL_RESURRECTION_STATE, 1
call_if_eq RustboroCity_DevonCorp_2F_EventScript_SetFossilReady
end
RustboroCity_DevonCorp_2F_EventScript_SetFossilReady:: @ 8211869
setvar VAR_FOSSIL_RESURRECTION_STATE, 2
return
RustboroCity_DevonCorp_2F_EventScript_TalkToPokemonScientist:: @ 821186F
lock
faceplayer
compare VAR_FOSSIL_RESURRECTION_STATE, 1
call_if_eq RustboroCity_DevonCorp_2F_EventScript_SetFossilReady
msgbox RustboroCity_DevonCorp_2F_Text_DeviceForTalkingToPokemon, MSGBOX_DEFAULT
release
end
RustboroCity_DevonCorp_2F_EventScript_BallScientist:: @ 8211886
lock
faceplayer
compare VAR_FOSSIL_RESURRECTION_STATE, 1
call_if_eq RustboroCity_DevonCorp_2F_EventScript_SetFossilReady
goto_if_set FLAG_MET_DEVON_EMPLOYEE, RustboroCity_DevonCorp_2F_EventScript_DevelopedBalls
msgbox RustboroCity_DevonCorp_2F_Text_DevelopingNewBalls, MSGBOX_DEFAULT
release
end
RustboroCity_DevonCorp_2F_EventScript_DevelopedBalls:: @ 82118A6
msgbox RustboroCity_DevonCorp_2F_Text_WeFinallyMadeNewBalls, MSGBOX_DEFAULT
release
end
RustboroCity_DevonCorp_2F_EventScript_PokenavScientist:: @ 82118B0
lock
faceplayer
compare VAR_FOSSIL_RESURRECTION_STATE, 1
call_if_eq RustboroCity_DevonCorp_2F_EventScript_SetFossilReady
goto_if_set FLAG_RECEIVED_POKENAV, RustboroCity_DevonCorp_2F_EventScript_HasPokenav
msgbox RustboroCity_DevonCorp_2F_Text_IMadePokenav, MSGBOX_DEFAULT
release
end
RustboroCity_DevonCorp_2F_EventScript_HasPokenav:: @ 82118D0
msgbox RustboroCity_DevonCorp_2F_Text_WowThatsAPokenav, MSGBOX_DEFAULT
release
end
RustboroCity_DevonCorp_2F_EventScript_PokemonDreamsScientist:: @ 82118DA
lock
faceplayer
compare VAR_FOSSIL_RESURRECTION_STATE, 1
call_if_eq RustboroCity_DevonCorp_2F_EventScript_SetFossilReady
msgbox RustboroCity_DevonCorp_2F_Text_DeviceToVisualizePokemonDreams, MSGBOX_DEFAULT
release
end
RustboroCity_DevonCorp_2F_EventScript_FossilScientist:: @ 82118F1
lock
faceplayer
compare VAR_FOSSIL_RESURRECTION_STATE, 2
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_FossilMonReady
compare VAR_FOSSIL_RESURRECTION_STATE, 1
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_StillRegenerating
msgbox RustboroCity_DevonCorp_2F_Text_DevelopDeviceToResurrectFossils, MSGBOX_DEFAULT
checkitem ITEM_ROOT_FOSSIL, 1
compare VAR_RESULT, TRUE
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_NoticeRootFossil
checkitem ITEM_CLAW_FOSSIL, 1
compare VAR_RESULT, TRUE
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_NoticeClawFossil
release
end
@ This whole section has needless duplication and could be condensed considerably
RustboroCity_DevonCorp_2F_EventScript_NoticeRootFossil:: @ 8211933
closemessage
playse SE_PIN
applymovement LOCALID_FOSSIL_SCIENTIST, Common_Movement_ExclamationMark
waitmovement 0
applymovement LOCALID_FOSSIL_SCIENTIST, Common_Movement_Delay48
waitmovement 0
msgbox RustboroCity_DevonCorp_2F_Text_WantToBringFossilBackToLife, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_DeclineGiveFossil
checkitem ITEM_CLAW_FOSSIL, 1
compare VAR_RESULT, TRUE
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_ChooseFossil
goto RustboroCity_DevonCorp_2F_EventScript_GiveRootFossil
end
RustboroCity_DevonCorp_2F_EventScript_GiveRootFossil:: @ 8211974
bufferitemname 0, ITEM_ROOT_FOSSIL
msgbox RustboroCity_DevonCorp_2F_Text_HandedFossilToResearcher, MSGBOX_DEFAULT
removeitem ITEM_ROOT_FOSSIL
setvar VAR_FOSSIL_RESURRECTION_STATE, 1
setvar VAR_WHICH_FOSSIL_REVIVED, 1
release
end
RustboroCity_DevonCorp_2F_EventScript_NoticeClawFossil:: @ 8211991
closemessage
playse SE_PIN
applymovement LOCALID_FOSSIL_SCIENTIST, Common_Movement_ExclamationMark
waitmovement 0
applymovement LOCALID_FOSSIL_SCIENTIST, Common_Movement_Delay48
waitmovement 0
msgbox RustboroCity_DevonCorp_2F_Text_WantToBringFossilBackToLife, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_DeclineGiveFossil
checkitem ITEM_ROOT_FOSSIL, 1
compare VAR_RESULT, TRUE
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_ChooseFossil
goto RustboroCity_DevonCorp_2F_EventScript_GiveClawFossil
end
RustboroCity_DevonCorp_2F_EventScript_GiveClawFossil:: @ 82119D2
bufferitemname 0, ITEM_CLAW_FOSSIL
msgbox RustboroCity_DevonCorp_2F_Text_HandedFossilToResearcher, MSGBOX_DEFAULT
removeitem ITEM_CLAW_FOSSIL
setvar VAR_FOSSIL_RESURRECTION_STATE, 1
setvar VAR_WHICH_FOSSIL_REVIVED, 2
release
end
RustboroCity_DevonCorp_2F_EventScript_DeclineGiveFossil:: @ 82119EF
msgbox RustboroCity_DevonCorp_2F_Text_OhIsThatSo, MSGBOX_DEFAULT
release
end
RustboroCity_DevonCorp_2F_EventScript_StillRegenerating:: @ 82119F9
msgbox RustboroCity_DevonCorp_2F_Text_FossilRegeneratorTakesTime, MSGBOX_DEFAULT
release
end
RustboroCity_DevonCorp_2F_EventScript_FossilMonReady:: @ 8211A03
compare VAR_WHICH_FOSSIL_REVIVED, 1
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_LileepReady
compare VAR_WHICH_FOSSIL_REVIVED, 2
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_AnorithReady
end
RustboroCity_DevonCorp_2F_EventScript_LileepReady:: @ 8211A1A
bufferspeciesname 1, SPECIES_LILEEP
msgbox RustboroCity_DevonCorp_2F_Text_FossilizedMonBroughtBackToLife, MSGBOX_DEFAULT
goto RustboroCity_DevonCorp_2F_EventScript_ReceiveLileep
end
RustboroCity_DevonCorp_2F_EventScript_AnorithReady:: @ 8211A2C
bufferspeciesname 1, SPECIES_ANORITH
msgbox RustboroCity_DevonCorp_2F_Text_FossilizedMonBroughtBackToLife, MSGBOX_DEFAULT
goto RustboroCity_DevonCorp_2F_EventScript_ReceiveAnorith
end
RustboroCity_DevonCorp_2F_EventScript_ReceiveLileep:: @ 8211A3E
setvar VAR_TEMP_1, SPECIES_LILEEP
givemon SPECIES_LILEEP, 20, ITEM_NONE
compare VAR_RESULT, 0
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_ReceiveLileepParty
compare VAR_RESULT, 1
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_ReceiveLileepPC
goto Common_EventScript_NoMoreRoomForPokemon
end
RustboroCity_DevonCorp_2F_EventScript_ReceiveLileepParty:: @ 8211A6E
call RustboroCity_DevonCorp_2F_EventScript_ReceivedLileepFanfare
msgbox gText_NicknameThisPokemon, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_FinishReceivingLileep
call Common_EventScript_GetGiftMonPartySlot
call Common_EventScript_NameReceivedPartyMon
goto RustboroCity_DevonCorp_2F_EventScript_FinishReceivingLileep
end
RustboroCity_DevonCorp_2F_EventScript_ReceiveLileepPC:: @ 8211A96
call RustboroCity_DevonCorp_2F_EventScript_ReceivedLileepFanfare
msgbox gText_NicknameThisPokemon, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_TransferLileepToPC
call Common_EventScript_NameReceivedBoxMon
goto RustboroCity_DevonCorp_2F_EventScript_TransferLileepToPC
end
RustboroCity_DevonCorp_2F_EventScript_TransferLileepToPC:: @ 8211AB9
call Common_EventScript_TransferredToPC
goto RustboroCity_DevonCorp_2F_EventScript_FinishReceivingLileep
end
RustboroCity_DevonCorp_2F_EventScript_ReceivedLileepFanfare:: @ 8211AC4
bufferspeciesname 1, SPECIES_LILEEP
playfanfare MUS_OBTAIN_ITEM
message RustboroCity_DevonCorp_2F_Text_ReceivedMonFromResearcher
waitmessage
waitfanfare
bufferspeciesname 0, SPECIES_LILEEP
return
RustboroCity_DevonCorp_2F_EventScript_FinishReceivingLileep:: @ 8211AD7
setvar VAR_FOSSIL_RESURRECTION_STATE, 0
setflag FLAG_RECEIVED_REVIVED_FOSSIL_MON
release
end
RustboroCity_DevonCorp_2F_EventScript_ReceiveAnorith:: @ 8211AE1
setvar VAR_TEMP_1, SPECIES_ANORITH
givemon SPECIES_ANORITH, 20, ITEM_NONE
compare VAR_RESULT, 0
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_ReceiveAnorithParty
compare VAR_RESULT, 1
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_ReceiveAnorithPC
goto Common_EventScript_NoMoreRoomForPokemon
end
RustboroCity_DevonCorp_2F_EventScript_ReceiveAnorithParty:: @ 8211B11
call RustboroCity_DevonCorp_2F_EventScript_ReceivedAnorithFanfare
msgbox gText_NicknameThisPokemon, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_FinishReceivingAnorith
call Common_EventScript_GetGiftMonPartySlot
call Common_EventScript_NameReceivedPartyMon
goto RustboroCity_DevonCorp_2F_EventScript_FinishReceivingAnorith
end
RustboroCity_DevonCorp_2F_EventScript_ReceiveAnorithPC:: @ 8211B39
call RustboroCity_DevonCorp_2F_EventScript_ReceivedAnorithFanfare
msgbox gText_NicknameThisPokemon, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq RustboroCity_DevonCorp_2F_EventScript_TransferAnorithToPC
call Common_EventScript_NameReceivedBoxMon
goto RustboroCity_DevonCorp_2F_EventScript_TransferAnorithToPC
end
RustboroCity_DevonCorp_2F_EventScript_TransferAnorithToPC:: @ 8211B5C
call Common_EventScript_TransferredToPC
goto RustboroCity_DevonCorp_2F_EventScript_FinishReceivingAnorith
end
RustboroCity_DevonCorp_2F_EventScript_ReceivedAnorithFanfare:: @ 8211B67
bufferspeciesname 1, SPECIES_ANORITH
playfanfare MUS_OBTAIN_ITEM
message RustboroCity_DevonCorp_2F_Text_ReceivedMonFromResearcher
waitmessage
waitfanfare
bufferspeciesname 0, SPECIES_ANORITH
return
RustboroCity_DevonCorp_2F_EventScript_FinishReceivingAnorith:: @ 8211B7A
setvar VAR_FOSSIL_RESURRECTION_STATE, 0
setflag FLAG_RECEIVED_REVIVED_FOSSIL_MON
release
end
RustboroCity_DevonCorp_2F_EventScript_ChooseFossil:: @ 8211B84
message RustboroCity_DevonCorp_2F_Text_TwoFossilsPickOne
waitmessage
multichoice 17, 6, MULTI_FOSSIL, 0
switch VAR_RESULT
case 0, RustboroCity_DevonCorp_2F_EventScript_ChooseClawFossil
case 1, RustboroCity_DevonCorp_2F_EventScript_ChooseRootFossil
case 2, RustboroCity_DevonCorp_2F_EventScript_CancelFossilSelect
case MULTI_B_PRESSED, RustboroCity_DevonCorp_2F_EventScript_CancelFossilSelect
end
RustboroCity_DevonCorp_2F_EventScript_ChooseClawFossil:: @ 8211BC1
goto RustboroCity_DevonCorp_2F_EventScript_GiveClawFossil
end
RustboroCity_DevonCorp_2F_EventScript_ChooseRootFossil:: @ 8211BC7
goto RustboroCity_DevonCorp_2F_EventScript_GiveRootFossil
end
RustboroCity_DevonCorp_2F_EventScript_CancelFossilSelect:: @ 8211BCD
release
end
RustboroCity_DevonCorp_2F_EventScript_MatchCallScientist:: @ 8211BCF
lock
faceplayer
compare VAR_FOSSIL_RESURRECTION_STATE, 1
call_if_eq RustboroCity_DevonCorp_2F_EventScript_SetFossilReady
compare VAR_RUSTBORO_CITY_STATE, 6
goto_if_ge RustboroCity_DevonCorp_2F_EventScript_WorkOnNext
msgbox RustboroCity_DevonCorp_2F_Text_DevelopNewPokenavFeature, MSGBOX_DEFAULT
release
end
RustboroCity_DevonCorp_2F_EventScript_WorkOnNext:: @ 8211BF1
msgbox RustboroCity_DevonCorp_2F_Text_WhatToWorkOnNext, MSGBOX_DEFAULT
release
end
RustboroCity_DevonCorp_2F_Text_DeviceForTalkingToPokemon: @ 8211BFB
.string "We're developing a device for talking\n"
.string "with POKéMON.\p"
.string "But we haven't had much success…$"
RustboroCity_DevonCorp_2F_Text_DevelopingNewBalls: @ 8211C50
.string "I'm developing new kinds of\n"
.string "POKé BALLS…\p"
.string "But I haven't made much headway…$"
RustboroCity_DevonCorp_2F_Text_WeFinallyMadeNewBalls: @ 8211C99
.string "We finally made new kinds of\n"
.string "POKé BALLS!\p"
.string "The REPEAT BALL makes it easier to\n"
.string "catch POKéMON you've caught before.\p"
.string "The TIMER BALL gets better at catching\n"
.string "POKéMON the longer a battle runs.\p"
.string "Both are proudly developed by\n"
.string "the DEVON CORPORATION.\p"
.string "Please give them a try!$"
RustboroCity_DevonCorp_2F_Text_IMadePokenav: @ 8211D9F
.string "I made the POKéNAV!\p"
.string "As an engineer, I feel blessed to have\n"
.string "made something so great!$"
RustboroCity_DevonCorp_2F_Text_WowThatsAPokenav: @ 8211DF3
.string "Oh, wow!\n"
.string "That's a POKéNAV!\p"
.string "It came about as a result of our\n"
.string "PRESIDENT's desire to learn about\l"
.string "the feelings of POKéMON.\p"
.string "Would you like me to describe its\n"
.string "features in detail?\p"
.string "No, no. I think you'll find out just by\n"
.string "trying the POKéNAV out.$"
RustboroCity_DevonCorp_2F_Text_DeviceToVisualizePokemonDreams: @ 8211EE0
.string "I'm trying to develop a device that\n"
.string "visually reproduces the dreams of\l"
.string "POKéMON…\p"
.string "But it's not going well.$"
RustboroCity_DevonCorp_2F_Text_DevelopDeviceToResurrectFossils: @ 8211F48
.string "I've been trying to develop a device\n"
.string "that resurrects POKéMON from fossils…\p"
.string "And, it's working!$"
RustboroCity_DevonCorp_2F_Text_WantToBringFossilBackToLife: @ 8211FA6
.string "Wait! That thing you have there…\n"
.string "Is that a POKéMON fossil?\p"
.string "Would you like to bring that POKéMON\n"
.string "back to life?\p"
.string "I can with my newly developed\n"
.string "FOSSIL REGENERATOR.$"
RustboroCity_DevonCorp_2F_Text_OhIsThatSo: @ 8212046
.string "Oh, is that so?\p"
.string "DEVON's technological expertise\n"
.string "is outstanding, I tell you.$"
RustboroCity_DevonCorp_2F_Text_TwoFossilsPickOne: @ 8212092
.string "Oh, now that's a surprise!\n"
.string "You have not one, but two, fossils?\p"
.string "Unfortunately, my machine can only\n"
.string "regenerate one POKéMON at a time.\p"
.string "Would you like to pick one of your\n"
.string "fossils for regeneration?$"
RustboroCity_DevonCorp_2F_Text_HandedFossilToResearcher: @ 8212153
.string "Excellent!\n"
.string "Let's do this right away.\p"
.string "{PLAYER} handed the {STR_VAR_1} to\n"
.string "the DEVON RESEARCHER.$"
RustboroCity_DevonCorp_2F_Text_FossilRegeneratorTakesTime: @ 82121A2
.string "The FOSSIL REGENERATOR, which I made,\n"
.string "is incredible.\p"
.string "But it has one drawback--it takes\n"
.string "a long time to work.\p"
.string "So, uh… How about you go for a stroll\n"
.string "and look around for a while?$"
RustboroCity_DevonCorp_2F_Text_FossilizedMonBroughtBackToLife: @ 8212251
.string "Thanks for waiting!\p"
.string "Your fossilized POKéMON has been\n"
.string "brought back to life!\p"
.string "The fossil was an ancient POKéMON.\n"
.string "{STR_VAR_2}, it was!$"
RustboroCity_DevonCorp_2F_Text_ReceivedMonFromResearcher: @ 82122CB
.string "{PLAYER} received {STR_VAR_2} from\n"
.string "the DEVON RESEARCHER.$"
@ Unused
RustboroCity_DevonCorp_2F_Text_TooManyPokemon: @ 82122F5
.string "Uh-oh, you've got too many POKéMON.\n"
.string "You have no room for this one.$"
RustboroCity_DevonCorp_2F_Text_DevelopNewPokenavFeature: @ 8212338
.string "I'm trying to develop a new feature\n"
.string "for the POKéNAV…\p"
.string "But it's not going well.$"
RustboroCity_DevonCorp_2F_Text_WhatToWorkOnNext: @ 8212386
.string "Well, now what shall I work on\n"
.string "developing next?\p"
.string "Our company allows us to make our\n"
.string "inspirations into reality.\p"
.string "One couldn't ask for a better\n"
.string "environment as an engineer.$"
|
