summaryrefslogtreecommitdiff
path: root/src/engine/bank6.asm
blob: 82fb58938e9dcb0eebb27f5656ec6a829ddc7294 (plain)
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
	INCROM $18000, $186f7

INCLUDE "data/effect_commands.asm"

	INCROM $18f9c, $1996e

Func_1996e: ; 1996e (6:596e)
	call EnableExtRAM
	ld a, PLAYER_TURN
	ldh [hWhoseTurn], a
	ld hl, $a100
	ld bc, $1607
.asm_1997b
	xor a
	ld [hli], a
	dec bc
	ld a, c
	or b
	jr nz, .asm_1997b
	ld a, $5
	ld hl, $a350
	call Func_199e0
	ld a, $7
	ld hl, $a3a4
	call Func_199e0
	ld a, $9
	ld hl, $a3f8
	call Func_199e0
	call EnableExtRAM
	ld hl, $a100
	ld a, $80
.asm_199a2
	ld [hl], a
	inc l
	jr nz, .asm_199a2
	ld hl, $bc00
	xor a
	ld [hli], a
	ld [hli], a
	ld [hl], a
	ld hl, $bb00
	ld c, $10
.asm_199b2
	ld [hl], $0
	ld de, $0010
	add hl, de
	dec c
	jr nz, .asm_199b2
	ld a, $2
	ld [$a003], a
	ld a, $2
	ld [$a006], a
	ld [wTextSpeed], a
	xor a
	ld [$a007], a
	ld [$a009], a
	ld [$a004], a
	ld [$a005], a
	ld [$a00a], a
	farcall Func_8cf9
	call DisableExtRAM
	ret

Func_199e0: ; 199e0 (6:59e0)
	push de
	push bc
	push hl
	call LoadDeck
	jr c, .asm_19a0e
	call Func_19a12
	pop hl
	call EnableExtRAM
	push hl
	ld de, wc590
.asm_199f3
	ld a, [de]
	inc de
	ld [hli], a
	or a
	jr nz, .asm_199f3
	pop hl
	push hl
	ld de, $0018
	add hl, de
	ld de, wPlayerDeck
	ld c, $3c
.asm_19a04
	ld a, [de]
	inc de
	ld [hli], a
	dec c
	jr nz, .asm_19a04
	call DisableExtRAM
	or a
.asm_19a0e
	pop hl
	pop bc
	pop de
	ret

Func_19a12: ; 19a12 (6:5a12)
	ld hl, $cce9
	ld a, [hli]
	ld h, [hl]
	ld l, a
	ld de, wc590
	call PrintTextBoxBorderLabel
	ret
; 0x19a1f

	INCROM $19a1f, $1a61f

Func_1a61f: ; 1a61f (6:661f)
	push af
	ld de, $389f
	call Func_2275
	pop af
	or a
	jr nz, .asm_1a640
	ld a, $40
	call $663b
	ld a, $5f
	call $663b
	ld a, $76
	call $663b
	ld a, $c1
	text_hl ReceivedLegendaryCardText
	jr .asm_1a660
.asm_1a640
	text_hl ReceivedCardText
	cp $1e
	jr z, .asm_1a660
	cp $43
	jr z, .asm_1a660
	text_hl ReceivedPromotionalFlyingPikachuText
	cp $64
	jr z, .asm_1a660
	text_hl ReceivedPromotionalSurfingPikachuText
	cp $65
	jr z, .asm_1a660
	cp $66
	jr z, .asm_1a660
	text_hl ReceivedPromotionalCardText
.asm_1a660
	push hl
	ld e, a
	ld d, $0
	call LoadCardDataToBuffer1
	call Func_379b
	ld a, MUSIC_MEDAL
	call PlaySong
	ld hl, $cc27
	ld a, [hli]
	ld h, [hl]
	ld l, a
	bank1call Func_2ebb ; switch to bank 1, but call a home func
	ld a, PLAYER_TURN
	ldh [hWhoseTurn], a
	pop hl
	bank1call $5e5f
.asm_1a680
	call Func_378a
	or a
	jr nz, .asm_1a680
	call Func_37a0
	bank1call $5773
	ret
; 0x1a68d

	INCROM $1a68d, $1a6cc

Func_1a6cc: ; 1a6cc (6:66cc)
	ret
; 0x1a6cd

	INCROM $1a6cd, $1ad89

Func_1ad89: ; 1ad89 (6:6d89)
	INCROM $1ad89, $1c000