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
|
PointerTable_14000: ; 14000 (05:4000)
dw $47bd ; SAMS_PRACTICE_DECK
dw PointerTable_14668 ; PRACTICE_PLAYER_DECK
dw PointerTable_14668 ; SAMS_NORMAL_DECK
dw PointerTable_14668 ; CHARMANDER_AND_FRIENDS_DECK
dw PointerTable_14668 ; CHARMANDER_EXTRA_DECK
dw PointerTable_14668 ; SQUIRTLE_AND_FRIENDS_DECK
dw PointerTable_14668 ; SQUIRTLE_EXTRA_DECK
dw PointerTable_14668 ; BULBASAUR_AND_FRIENDS_DECK
dw PointerTable_14668 ; BULBASAUR_EXTRA_DECK
dw PointerTable_14668 ; LIGHTNING_AND_FIRE_DECK
dw PointerTable_14668 ; WATER_AND_FIGHTING_DECK
dw PointerTable_14668 ; GRASS_AND_PSYCHIC_DECK
dw $49e8 ; LEGENDARY_MOLTRES_DECK
dw $4b0f ; LEGENDARY_ZAPDOS_DECK
dw $4c0b ; LEGENDARY_ARTICUNO_DECK
dw $4d60 ; LEGENDARY_DRAGONITE_DECK
dw $4e89 ; FIRST_STRIKE_DECK
dw $4f0e ; ROCK_CRUSHER_DECK
dw $4f8f ; GO_GO_RAIN_DANCE_DECK
dw $5019 ; ZAPPING_SELFDESTRUCT_DECK
dw $509b ; FLOWER_POWER_DECK
dw $5122 ; STRANGE_PSYSHOCK_DECK
dw $51ad ; WONDERS_OF_SCIENCE_DECK
dw $5232 ; FIRE_CHARGE_DECK
dw $52bd ; IM_RONALD_DECK
dw $534b ; POWERFUL_RONALD_DECK
dw $53e8 ; INVINCIBLE_RONALD_DECK
dw $546f ; LEGENDARY_RONALD_DECK
dw $48dc ; MUSCLES_FOR_BRAINS_DECK
dw PointerTable_14668 ; HEATED_BATTLE_DECK
dw PointerTable_14668 ; LOVE_TO_BATTLE_DECK
dw PointerTable_14668 ; EXCAVATION_DECK
dw PointerTable_14668 ; BLISTERING_POKEMON_DECK
dw PointerTable_14668 ; HARD_POKEMON_DECK
dw PointerTable_14668 ; WATERFRONT_POKEMON_DECK
dw PointerTable_14668 ; LONELY_FRIENDS_DECK
dw PointerTable_14668 ; SOUND_OF_THE_WAVES_DECK
dw PointerTable_14668 ; PIKACHU_DECK
dw PointerTable_14668 ; BOOM_BOOM_SELFDESTRUCT_DECK
dw PointerTable_14668 ; POWER_GENERATOR_DECK
dw PointerTable_14668 ; ETCETERA_DECK
dw PointerTable_14668 ; FLOWER_GARDEN_DECK
dw PointerTable_14668 ; KALEIDOSCOPE_DECK
dw PointerTable_14668 ; GHOST_DECK
dw PointerTable_14668 ; NAP_TIME_DECK
dw PointerTable_14668 ; STRANGE_POWER_DECK
dw PointerTable_14668 ; FLYIN_POKEMON_DECK
dw PointerTable_14668 ; LOVELY_NIDORAN_DECK
dw PointerTable_14668 ; POISON_DECK
dw PointerTable_14668 ; ANGER_DECK
dw PointerTable_14668 ; FLAMETHROWER_DECK
dw PointerTable_14668 ; RESHUFFLE_DECK
dw $48dc ; IMAKUNI_DECK
; 1406a
INCROM $1406a, $14226
Func_14226: ; 14226 (5:4226)
call CreateHandCardList
ld hl, wDuelTempList
.check_for_next_pokemon
ld a, [hli]
ldh [hTempCardIndex_ff98], a
cp $ff
ret z
call LoadCardDataToBuffer1_FromDeckIndex
ld a, [wLoadedCard1Type]
cp TYPE_ENERGY
jr nc, .check_for_next_pokemon
ld a, [wLoadedCard1Stage]
or a
jr nz, .check_for_next_pokemon
push hl
ldh a, [hTempCardIndex_ff98]
call PutHandPokemonCardInPlayArea
pop hl
jr .check_for_next_pokemon
; 0x1424b
INCROM $1424b, $14663
Func_14663: ; 14663 (5:4663)
farcall Func_200e5
ret
; GENERAL DECK POINTER LIST - Not sure on all of these.
; This is an example of an AI pointer table, there's one for each AI type.
PointerTable_14668: ; 14668 (05:4668)
dw Func_14674 ; not used
dw Func_14674 ; general AI for battles
dw Func_14678 ; basic pokemon placement / cheater shuffling on better AI
dw Func_1467f
dw Func_14683
dw Func_14687
; when battle AI gets called
Func_14674: ; 14674 (5:4674)
call Func_1468b
ret
Func_14678: ; 14678 (5:4678)
call Func_15636
call $4226
ret
Func_1467f: ; 1467f (5:467f)
call $5b72
ret
Func_14683: ; 14683 (5:4683)
call $5b72
ret
Func_14687: ; 14687 (5:4687)
call $41e5
ret
; AI for general decks i think
Func_1468b: ; 1468b (5:468b)
call Func_15649
ld a, $1
call Func_14663
farcall $8, $67d3
jp nc, $4776
farcall $8, $6790
farcall $8, $66a3
farcall $8, $637f
ret c
farcall $8, $662d
ld a, $2
call Func_14663
ld a, $3
call Func_14663
ld a, $4
call Func_14663
call $5eae
ret c
ld a, $5
call Func_14663
ld a, $6
call Func_14663
ld a, $7
call Func_14663
ld a, $8
call Func_14663
call $4786
ld a, $a
call Func_14663
ld a, $b
call Func_14663
ld a, $c
call Func_14663
ld a, [wAlreadyPlayedEnergy]
or a
jr nz, .asm_146ed
call $64e8
.asm_146ed
call $5eae
farcall $8, $66a3
farcall $8, $637f
ret c
farcall $8, $6790
ld a, $d
farcall $8, $619b
ld a, $d
call Func_14663
ld a, $f
call Func_14663
ld a, [wce20]
and $4
jr z, .asm_14776
ld a, $1
call Func_14663
ld a, $2
call Func_14663
ld a, $3
call Func_14663
ld a, $4
call Func_14663
call $5eae
ret c
ld a, $5
call Func_14663
ld a, $6
call Func_14663
ld a, $7
call Func_14663
ld a, $8
call Func_14663
call $4786
ld a, $a
call Func_14663
ld a, $b
call Func_14663
ld a, $c
call Func_14663
ld a, [wAlreadyPlayedEnergy]
or a
jr nz, .asm_1475b
call $64e8
.asm_1475b
call $5eae
farcall $8, $66a3
farcall $8, $637f
ret c
farcall $8, $6790
ld a, $d
farcall $8, $619b
ld a, $d
call Func_14663
.asm_14776
ld a, $e
farcall $8, $619b
call $69f8
ret c
ld a, $5
bank1call $67be
ret
; 0x14786
INCROM $14786, $15636
Func_15636: ; 15636 (5:5636)
ld a, $10
ld hl, wcda5
call ZeroData
ld a, $5
ld [wcda6], a
ld a, $ff
ld [wcda5], a
ret
Func_15649: ; 15649 (5:5649)
ld a, [wcda6]
inc a
ld [wcda6], a
xor a
ld [wce20], a
ld [wcddb], a
ld [wcddc], a
ld [wce03], a
ld a, [wPlayerAttackingMoveIndex]
cp $ff
jr z, .asm_156b1
or a
jr z, .asm_156b1
ld a, [wPlayerAttackingCardIndex]
cp $ff
jr z, .asm_156b1
call SwapTurn
call GetCardIDFromDeckIndex
call SwapTurn
ld a, e
cp MEWTWO1 ; I believe this is a check for Mewtwo1's Barrier move
jr nz, .asm_156b1
ld a, [wcda7]
bit 7, a
jr nz, .asm_156aa
inc a
ld [wcda7], a
cp $3
jr c, .asm_156c2
ld a, DUELVARS_ARENA_CARD
call GetNonTurnDuelistVariable
call SwapTurn
call GetCardIDFromDeckIndex
call SwapTurn
ld a, e
cp MEWTWO1
jr nz, .asm_156a4
farcall $8, $67a9
jr nc, .asm_156aa
.asm_156a4
xor a
ld [wcda7], a
jr .asm_156c2
.asm_156aa
ld a, $80
ld [wcda7], a
jr .asm_156c2
.asm_156b1
ld a, [wcda7]
bit 7, a
jr z, .asm_156be
inc a
ld [wcda7], a
jr .asm_156c2
.asm_156be
xor a
ld [wcda7], a
.asm_156c2
ret
; 0x156c3
INCROM $156c3, $1575e
; zeroes a bytes starting at hl
ZeroData: ; 1575e (5:575e)
push af
push bc
push hl
ld b, a
xor a
.clear_loop
ld [hli], a
dec b
jr nz, .clear_loop
pop hl
pop bc
pop af
ret
; 0x1576b
INCROM $1576b, $18000
|
