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
|
WaterClubMovePlayer:
ld a, [wPlayerYCoord]
cp $8
ret nz
get_event_value EVENT_JOSHUA_STATE
cp JOSHUA_DEFEATED
ret nc
ld a, NPC_JOSHUA
ld [wTempNPC], a
ld bc, Script_NotReadyToSeeAmy
jp SetNextNPCAndScript
WaterClubAfterDuel:
ld hl, .after_duel_table
call FindEndOfDuelScript
ret
.after_duel_table
db NPC_SARA
db NPC_SARA
dw Script_BeatSara
dw Script_LostToSara
db NPC_AMANDA
db NPC_AMANDA
dw Script_BeatAmanda
dw Script_LostToAmanda
db NPC_JOSHUA
db NPC_JOSHUA
dw Script_BeatJoshua
dw Script_LostToJoshua
db NPC_AMY
db NPC_AMY
dw Script_BeatAmy
dw Script_LostToAmy
db $00
Script_Sara:
start_script
print_npc_text Text042c
ask_question_jump Text042d, .start_duel
print_npc_text Text042e
quit_script_fully
.start_duel
print_npc_text Text042f
start_duel PRIZES_2, WATERFRONT_POKEMON_DECK_ID, MUSIC_DUEL_THEME_1
quit_script_fully
Script_BeatSara:
start_script
max_out_event_value EVENT_BEAT_SARA
print_npc_text Text0430
give_booster_packs BOOSTER_COLOSSEUM_WATER, BOOSTER_COLOSSEUM_WATER, NO_BOOSTER
print_npc_text Text0431
quit_script_fully
Script_LostToSara:
start_script
print_text_quit_fully Text0432
Script_Amanda:
start_script
print_npc_text Text0433
ask_question_jump Text0434, .start_duel
print_npc_text Text0435
quit_script_fully
.start_duel
print_npc_text Text0436
start_duel PRIZES_3, LONELY_FRIENDS_DECK_ID, MUSIC_DUEL_THEME_1
quit_script_fully
Script_BeatAmanda:
start_script
max_out_event_value EVENT_BEAT_AMANDA
print_npc_text Text0437
give_booster_packs BOOSTER_MYSTERY_LIGHTNING_COLORLESS, BOOSTER_MYSTERY_LIGHTNING_COLORLESS, NO_BOOSTER
print_npc_text Text0438
quit_script_fully
Script_LostToAmanda:
start_script
print_text_quit_fully Text0439
Script_NotReadyToSeeAmy:
start_script
jump_if_player_coords_match 18, 8, .ows_e1ec
jump_if_player_coords_match 20, 8, .ows_e1f2
jump_if_player_coords_match 24, 8, .ows_e1f8
.ows_e1d5
move_player SOUTH, 4
move_active_npc NPCMovement_e213
print_npc_text Text043a
jump_if_player_coords_match 18, 10, .ows_e1fe
jump_if_player_coords_match 20, 10, .ows_e202
move_active_npc NPCMovement_e215
quit_script_fully
.ows_e1ec
move_active_npc NPCMovement_e206
script_jump .ows_e1d5
.ows_e1f2
move_active_npc NPCMovement_e20b
script_jump .ows_e1d5
.ows_e1f8
move_active_npc NPCMovement_e20f
script_jump .ows_e1d5
.ows_e1fe
move_active_npc NPCMovement_e218
quit_script_fully
.ows_e202
move_active_npc NPCMovement_e219
quit_script_fully
NPCMovement_e206:
db NORTH
db WEST
db WEST
db SOUTH | NO_MOVE
db $ff
NPCMovement_e20b:
db NORTH
db WEST
db SOUTH | NO_MOVE
db $ff
NPCMovement_e20f:
db NORTH
db EAST
db SOUTH | NO_MOVE
db $ff
NPCMovement_e213:
db SOUTH
db $ff
NPCMovement_e215:
db WEST
db SOUTH | NO_MOVE
db $ff
NPCMovement_e218:
db EAST
NPCMovement_e219:
db EAST
db SOUTH | NO_MOVE
db $ff
Script_Joshua:
start_script
jump_if_event_false EVENT_BEAT_AMANDA, .sara_and_amanda_not_beaten
jump_if_event_false EVENT_BEAT_SARA, .sara_and_amanda_not_beaten
script_jump .beat_sara_and_amanda
.sara_and_amanda_not_beaten
set_event EVENT_JOSHUA_STATE, JOSHUA_TALKED
print_npc_text Text043b
quit_script_fully
.beat_sara_and_amanda
jump_if_event_nonzero EVENT_JOSHUA_STATE, .already_talked
set_event EVENT_JOSHUA_STATE, JOSHUA_TALKED
print_npc_text Text043b
print_npc_text Text043c
.already_talked
test_if_event_equal EVENT_JOSHUA_STATE, JOSHUA_TALKED
print_variable_npc_text Text043d, Text043e
ask_question_jump Text043f, .start_duel
test_if_event_equal EVENT_JOSHUA_STATE, JOSHUA_TALKED
print_variable_npc_text Text0440, Text0441
quit_script_fully
.start_duel
print_npc_text Text0442
try_give_pc_pack $04
start_duel PRIZES_4, SOUND_OF_THE_WAVES_DECK_ID, MUSIC_DUEL_THEME_1
quit_script_fully
Script_LostToJoshua:
start_script
test_if_event_equal EVENT_JOSHUA_STATE, JOSHUA_TALKED
print_variable_npc_text Text0443, Text0444
quit_script_fully
Script_BeatJoshua:
start_script
test_if_event_equal EVENT_JOSHUA_STATE, JOSHUA_TALKED
print_variable_npc_text Text0445, Text0446
give_booster_packs BOOSTER_MYSTERY_WATER_COLORLESS, BOOSTER_MYSTERY_WATER_COLORLESS, NO_BOOSTER
test_if_event_equal EVENT_JOSHUA_STATE, JOSHUA_TALKED
print_variable_npc_text Text0447, Text0448
jump_if_event_not_equal EVENT_JOSHUA_STATE, JOSHUA_DEFEATED, .first_joshua_win
quit_script_fully
.first_joshua_win
set_event EVENT_JOSHUA_STATE, JOSHUA_DEFEATED
print_npc_text Text0449
close_text_box
move_active_npc_by_direction NPCMovementTable_e2a1
print_npc_text Text044a
set_active_npc_direction NORTH
close_advanced_text_box
set_next_npc_and_script NPC_AMY, Script_MeetAmy
end_script
ret
NPCMovementTable_e2a1:
dw NPCMovement_e2a9
dw NPCMovement_e2a9
dw NPCMovement_e2a9
dw NPCMovement_e2a9
NPCMovement_e2a9:
db NORTH
db $ff
NPCMovement_e2ab:
db SOUTH
db $ff
Preload_Amy:
xor a
ld [wd3d0], a
ld a, [wActiveGameEvent]
or a
jr z, .asm_e2cf
ld a, [wPlayerXCoord]
cp $14
jr nz, .asm_e2cf
ld a, [wPlayerYCoord]
cp $06
jr nz, .asm_e2cf
ld a, $14
ld [wLoadNPCXPos], a
ld a, $01
ld [wd3d0], a
.asm_e2cf
scf
ret
Script_MeetAmy:
start_script
print_npc_text Text044b
set_dialog_npc NPC_JOSHUA
print_npc_text Text044c
set_dialog_npc NPC_AMY
print_npc_text Text044d
close_text_box
set_sprite_attributes $09, $2f, $10
do_frames 32
set_sprite_attributes $04, $0e, $00
set_active_npc_coords 20, 4
set_player_direction WEST
move_player WEST, 1
set_player_direction NORTH
move_player NORTH, 1
move_player NORTH, 1
move_npc NPC_JOSHUA, NPCMovement_e2ab
print_npc_text Text044e
script_jump Script_Amy.ask_for_duel
Script_Amy:
start_script
jump_if_event_true EVENT_BEAT_AMY, Script_Amy_AlreadyHaveMedal
print_npc_text Text044f
.ask_for_duel
ask_question_jump Text0450, .start_duel
.deny_duel
print_npc_text Text0451
jump_if_active_npc_coords_match 20, 4, Script_LostToAmy.ows_e34e
quit_script_fully
.start_duel
print_npc_text Text0452
start_duel PRIZES_6, GO_GO_RAIN_DANCE_DECK_ID, MUSIC_DUEL_THEME_2
quit_script_fully
Script_BeatAmy:
start_script
print_npc_text Text0453
jump_if_event_true EVENT_BEAT_AMY, .give_booster_packs
print_npc_text Text0454
max_out_event_value EVENT_BEAT_AMY
try_give_medal_pc_packs
show_medal_received_screen EVENT_BEAT_AMY
record_master_win $03
print_npc_text Text0455
.give_booster_packs
give_booster_packs BOOSTER_LABORATORY_WATER, BOOSTER_LABORATORY_WATER, NO_BOOSTER
print_npc_text Text0456
jump_if_active_npc_coords_match 20, 4, Script_LostToAmy.ows_e34e
quit_script_fully
Script_LostToAmy:
start_script
print_npc_text Text0457
jump_if_active_npc_coords_match 20, 4, .ows_e34e
quit_script_fully
.ows_e34e
set_sprite_attributes $08, $2e, $10
set_active_npc_coords 22, 4
quit_script_fully
Script_Amy_AlreadyHaveMedal:
print_npc_text Text0458
ask_question_jump Text0450, .start_duel
script_jump Script_Amy.deny_duel
.start_duel
print_npc_text Text0459
start_duel PRIZES_6, GO_GO_RAIN_DANCE_DECK_ID, MUSIC_DUEL_THEME_2
quit_script_fully
|
