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
|
Route12_Script:
call EnableAutoTextBoxDrawing
ld hl, Route12TrainerHeaders
ld de, Route12_ScriptPointers
ld a, [wRoute12CurScript]
call ExecuteCurMapScriptInTable
ld [wRoute12CurScript], a
ret
Route12ResetScripts:
xor a
ld [wJoyIgnore], a
ld [wRoute12CurScript], a
ld [wCurMapScript], a
ret
Route12_ScriptPointers:
def_script_pointers
dw_const Route12DefaultScript, SCRIPT_ROUTE12_DEFAULT
dw_const DisplayEnemyTrainerTextAndStartBattle, SCRIPT_ROUTE12_START_BATTLE
dw_const EndTrainerBattle, SCRIPT_ROUTE12_END_BATTLE
dw_const Route12SnorlaxPostBattleScript, SCRIPT_ROUTE12_SNORLAX_POST_BATTLE
Route12DefaultScript:
CheckEventHL EVENT_BEAT_ROUTE12_SNORLAX
jp nz, CheckFightingMapTrainers
CheckEventReuseHL EVENT_FIGHT_ROUTE12_SNORLAX
ResetEventReuseHL EVENT_FIGHT_ROUTE12_SNORLAX
jp z, CheckFightingMapTrainers
ld a, TEXT_ROUTE12_SNORLAX_WOKE_UP
ldh [hTextID], a
call DisplayTextID
ld a, SNORLAX
ld [wCurOpponent], a
ld a, 30
ld [wCurEnemyLevel], a
ld a, TOGGLE_ROUTE_12_SNORLAX
ld [wToggleableObjectIndex], a
predef HideObject
ld a, SCRIPT_ROUTE12_SNORLAX_POST_BATTLE
ld [wRoute12CurScript], a
ld [wCurMapScript], a
ret
Route12SnorlaxPostBattleScript:
ld a, [wIsInBattle]
cp $ff
jr z, Route12ResetScripts
call UpdateSprites
ld a, [wBattleResult]
cp $2
jr z, .caught_snorlax
ld a, TEXT_ROUTE12_SNORLAX_CALMED_DOWN
ldh [hTextID], a
call DisplayTextID
.caught_snorlax
SetEvent EVENT_BEAT_ROUTE12_SNORLAX
call Delay3
ld a, SCRIPT_ROUTE12_DEFAULT
ld [wRoute12CurScript], a
ld [wCurMapScript], a
ret
Route12_TextPointers:
def_text_pointers
dw_const Route12SnorlaxText, TEXT_ROUTE12_SNORLAX
dw_const Route12Fisher1Text, TEXT_ROUTE12_FISHER1
dw_const Route12Fisher2Text, TEXT_ROUTE12_FISHER2
dw_const Route12CooltrainerMText, TEXT_ROUTE12_COOLTRAINER_M
dw_const Route12SuperNerdText, TEXT_ROUTE12_SUPER_NERD
dw_const Route12Fisher3Text, TEXT_ROUTE12_FISHER3
dw_const Route12Fisher4Text, TEXT_ROUTE12_FISHER4
dw_const Route12Fisher5Text, TEXT_ROUTE12_FISHER5
dw_const PickUpItemText, TEXT_ROUTE12_TM_PAY_DAY
dw_const PickUpItemText, TEXT_ROUTE12_IRON
dw_const Route12SignText, TEXT_ROUTE12_SIGN
dw_const Route12SportFishingSignText, TEXT_ROUTE12_SPORT_FISHING_SIGN
dw_const Route12SnorlaxWokeUpText, TEXT_ROUTE12_SNORLAX_WOKE_UP
dw_const Route12SnorlaxCalmedDownText, TEXT_ROUTE12_SNORLAX_CALMED_DOWN
Route12TrainerHeaders:
def_trainers 2
Route12TrainerHeader0:
trainer EVENT_BEAT_ROUTE_12_TRAINER_0, 4, Route12Fisher1BattleText, Route12Fisher1EndBattleText, Route12Fisher1AfterBattleText
Route12TrainerHeader1:
trainer EVENT_BEAT_ROUTE_12_TRAINER_1, 4, Route12Fisher2BattleText, Route12Fisher2EndBattleText, Route12Fisher2AfterBattleText
Route12TrainerHeader2:
trainer EVENT_BEAT_ROUTE_12_TRAINER_2, 4, Route12CooltrainerMBattleText, Route12CooltrainerMEndBattleText, Route12CooltrainerMAfterBattleText
Route12TrainerHeader3:
trainer EVENT_BEAT_ROUTE_12_TRAINER_3, 4, Route12SuperNerdBattleText, Route12SuperNerdEndBattleText, Route12SuperNerdAfterBattleText
Route12TrainerHeader4:
trainer EVENT_BEAT_ROUTE_12_TRAINER_4, 4, Route12Fisher3BattleText, Route12Fisher3EndBattleText, Route12Fisher3AfterBattleText
Route12TrainerHeader5:
trainer EVENT_BEAT_ROUTE_12_TRAINER_5, 4, Route12Fisher4BattleText, Route12Fisher4EndBattleText, Route12Fisher4AfterBattleText
Route12TrainerHeader6:
trainer EVENT_BEAT_ROUTE_12_TRAINER_6, 1, Route12Fisher5BattleText, Route12Fisher5EndBattleText, Route12Fisher5AfterBattleText
db -1 ; end
Route12SnorlaxText:
text_far _Route12SnorlaxText
text_end
Route12SnorlaxWokeUpText:
text_far _Route12SnorlaxWokeUpText
text_end
Route12SnorlaxCalmedDownText:
text_far _Route12SnorlaxCalmedDownText
text_end
Route12Fisher1Text:
text_asm
ld hl, Route12TrainerHeader0
call TalkToTrainer
jp TextScriptEnd
Route12Fisher1BattleText:
text_far _Route12Fisher1BattleText
text_end
Route12Fisher1EndBattleText:
text_far _Route12Fisher1EndBattleText
text_end
Route12Fisher1AfterBattleText:
text_far _Route12Fisher1AfterBattleText
text_end
Route12Fisher2Text:
text_asm
ld hl, Route12TrainerHeader1
call TalkToTrainer
jp TextScriptEnd
Route12Fisher2BattleText:
text_far _Route12Fisher2BattleText
text_end
Route12Fisher2EndBattleText:
text_far _Route12Fisher2EndBattleText
text_end
Route12Fisher2AfterBattleText:
text_far _Route12Fisher2AfterBattleText
text_end
Route12CooltrainerMText:
text_asm
ld hl, Route12TrainerHeader2
call TalkToTrainer
jp TextScriptEnd
Route12CooltrainerMBattleText:
text_far _Route12CooltrainerMBattleText
text_end
Route12CooltrainerMEndBattleText:
text_far _Route12CooltrainerMEndBattleText
text_end
Route12CooltrainerMAfterBattleText:
text_far _Route12CooltrainerMAfterBattleText
text_end
Route12SuperNerdText:
text_asm
ld hl, Route12TrainerHeader3
call TalkToTrainer
jp TextScriptEnd
Route12SuperNerdBattleText:
text_far _Route12SuperNerdBattleText
text_end
Route12SuperNerdEndBattleText:
text_far _Route12SuperNerdEndBattleText
text_end
Route12SuperNerdAfterBattleText:
text_far _Route12SuperNerdAfterBattleText
text_end
Route12Fisher3Text:
text_asm
ld hl, Route12TrainerHeader4
call TalkToTrainer
jp TextScriptEnd
Route12Fisher3BattleText:
text_far _Route12Fisher3BattleText
text_end
Route12Fisher3EndBattleText:
text_far _Route12Fisher3EndBattleText
text_end
Route12Fisher3AfterBattleText:
text_far _Route12Fisher3AfterBattleText
text_end
Route12Fisher4Text:
text_asm
ld hl, Route12TrainerHeader5
call TalkToTrainer
jp TextScriptEnd
Route12Fisher4BattleText:
text_far _Route12Fisher4BattleText
text_end
Route12Fisher4EndBattleText:
text_far _Route12Fisher4EndBattleText
text_end
Route12Fisher4AfterBattleText:
text_far _Route12Fisher4AfterBattleText
text_end
Route12Fisher5Text:
text_asm
ld hl, Route12TrainerHeader6
call TalkToTrainer
jp TextScriptEnd
Route12Fisher5BattleText:
text_far _Route12Fisher5BattleText
text_end
Route12Fisher5EndBattleText:
text_far _Route12Fisher5EndBattleText
text_end
Route12Fisher5AfterBattleText:
text_far _Route12Fisher5AfterBattleText
text_end
Route12SignText:
text_far _Route12SignText
text_end
Route12SportFishingSignText:
text_far _Route12SportFishingSignText
text_end
|
