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
|
INCROM $20000, $200e5
; 0 - e4 is a big set of data, seems to be one entry for each card
Func_200e5: ; 200e5 (8:40e5)
ld [wce18], a
call CreateHandCardList
ld hl, wDuelTempList
ld de, wTempHandCardList
call CopyBuffer
ld hl, wTempHandCardList
ld a, [hli]
ld [wce16], a
cp $ff
ret z
push hl
ld a, [wce18]
ld d, a
ld hl, $4000
.asm_4106
xor a
ld [wce21], a
ld a, [hli]
cp $ff
jp z, $41b1
cp d
jp nz, .incHL5
ld a, [hli]
ld [wce17], a
ld a, [wce16]
call LoadCardDataToBuffer1_FromDeckIndex
cp $d2
jr nz, .asm_2012b
ld b, a
ld a, [wce20]
and $2
jr nz, .incHL4
ld a, b
.asm_2012b
ld b, a
ld a, [wce17]
cp b
jr nz, .incHL4
push hl
push de
ld a, [wce16]
ldh [hTempCardIndex_ff9f], a
bank1call CheckCantUseTrainerDueToHeadache
jp c, $41a8
call LoadNonPokemonCardEffectCommands
ld a, EFFECTCMDTYPE_INITIAL_EFFECT_1
call TryExecuteEffectCommandFunction
jp c, $41a8
farcall $5, $743b
jr c, .asm_201a8
pop de
pop hl
push hl
call CallIndirect
pop hl
jr nc, .incHL4
inc hl
inc hl
ld [wce19], a
push de
push hl
ld a, [wce16]
ldh [hTempCardIndex_ff9f], a
ld a, $6
bank1call $67be
pop hl
pop de
jr c, .incHL2
push hl
call CallIndirect
pop hl
inc hl
inc hl
ld a, [wce20]
ld b, a
ld a, [wce21]
or b
ld [wce20], a
pop hl
and $8
jp z, $40f7
call CreateHandCardList
ld hl, wDuelTempList
ld de, wTempHandCardList
call $697b
ld hl, wTempHandCardList
ld a, [wce20]
and $f7
ld [wce20], a
jp $40f7
.incHL5
inc hl
.incHL4
inc hl
inc hl
.incHL2
inc hl
inc hl
jp .asm_4106
.asm_201a8
pop de
pop hl
inc hl
inc hl
inc hl
inc hl
jp .asm_4106
; 0x201b1
INCROM $201b1, $2297b
; copies $ff terminated buffer from hl to de
CopyBuffer: ; 2297b (8:697b)
ld a, [hli]
ld [de], a
cp $ff
ret z
inc de
jr CopyBuffer
; 0x22983
INCROM $22983, $24000
|
