pokecrystal/gfx/pics/animation.asm

1122 lines
14 KiB
NASM
Raw Normal View History

; Pic animation arrangement.
Functiond0000: ; d0000
hlcoord 12, 0
ld a, [IsInBattle]
cp $1
jr z, .asm_d0012
ld e, $0
ld d, $0
call Functiond008e
ret
.asm_d0012
ld e, $1
ld d, $0
call Functiond008e
ret
; d001a
Functiond001a: ; d001a
ld e, $2
ld d, $0
call Functiond008e
ret
; d0022
Functiond0022: ; d0022
ld e, $3
ld d, $0
call Functiond008e
ret
; d002a
Functiond002a: ; d002a
ld e, $4
ld d, $0
call Functiond008e
ret
; d0032
Functiond0032: ; d0032
ld e, $5
ld d, $0
call Functiond008e
ret
; d003a
Functiond003a: ; d003a
ld e, $6
ld d, $0
call Functiond008e
ret
; d0042
POKEANIM: MACRO
rept _NARG
; Workaround for a bug where macro args can't come after the start of a symbol
if !def(\1_POKEANIM)
\1_POKEANIM equs "PokeAnim_\1_"
endc
db (\1_POKEANIM - PokeAnim_SetupCommands) / 2
shift
endr
db (PokeAnim_Finish_ - PokeAnim_SetupCommands) / 2
ENDM
PokeAnims: ; d0042
dw .Slow
dw .Normal
dw .Menu
dw .Trade
dw .Evolve
dw .Hatch
dw .Unused ; same as .Menu
dw .Egg1
dw .Egg2
.Slow: POKEANIM Cry3, Setup2, Play
.Normal: POKEANIM Cry3, Setup, Play
.Menu: POKEANIM Cry2, Setup, Play, SetWait, Wait, Extra, Play
.Trade: POKEANIM Extra, Play2, Extra, Play, SetWait, Wait, Cry, Setup, Play
.Evolve: POKEANIM Extra, Play, SetWait, Wait, Cry2, Setup, Play
.Hatch: POKEANIM Extra, Play, Cry2, Setup, Play, SetWait, Wait, Extra, Play
.Unused: POKEANIM Cry2, Setup, Play, SetWait, Wait, Extra, Play
.Egg1: POKEANIM Setup, Play
.Egg2: POKEANIM Extra, Play
Functiond008e: ; d008e
call Functiond01c6
ret c
call Functiond00a3
.asm_d0095
call Functiond00b4
push af
callba Function10402d
pop af
jr nc, .asm_d0095
ret
; d00a3
Functiond00a3: ; d00a3
push hl
ld c, e
ld b, 0
ld hl, PokeAnims
add hl, bc
add hl, bc
ld a, [hli]
ld b, [hl]
ld c, a
pop hl
call Functiond01d6
ret
; d00b4
Functiond00b4: ; d00b4
ld a, [rSVBK]
push af
ld a, $2
ld [rSVBK], a
2015-02-10 23:14:21 +00:00
ld a, [w2_d168]
ld c, a
ld b, 0
2015-02-10 23:14:21 +00:00
ld hl, w2_d169
ld a, [hli]
ld h, [hl]
ld l, a
add hl, bc
ld a, [hl]
ld hl, PokeAnim_SetupCommands
rst JumpTable
2015-02-10 23:14:21 +00:00
ld a, [w2_d168]
ld c, a
pop af
ld [rSVBK], a
ld a, c
and $80
ret z
scf
ret
; d00da
PokeAnim_SetupCommands: ; d00da
setup_command: macro
\1_: dw \1
endm
setup_command PokeAnim_Finish
setup_command PokeAnim_Nop
setup_command PokeAnim_SetWait
setup_command PokeAnim_Wait
setup_command PokeAnim_Setup
setup_command PokeAnim_Setup2
setup_command PokeAnim_Extra
setup_command PokeAnim_Play
setup_command PokeAnim_Play2
setup_command PokeAnim_Cry
setup_command PokeAnim_Cry2
setup_command PokeAnim_Cry3
; d00f2
PokeAnim_SetWait: ; d00f2
ld a, $12
2015-02-10 23:14:21 +00:00
ld [w2_d181], a
ld a, [w2_d168]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d168], a
PokeAnim_Wait: ; d00fe
2015-02-10 23:14:21 +00:00
ld hl, w2_d181
dec [hl]
ret nz
2015-02-10 23:14:21 +00:00
ld a, [w2_d168]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d168], a
ret
; d010b
PokeAnim_Setup: ; d010b
ld c, $0
ld b, $0
call Functiond0228
call Functiond0504
2015-02-10 23:14:21 +00:00
ld a, [w2_d168]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d168], a
ret
; d011d
PokeAnim_Setup2: ; d011d
ld c, $0
ld b, $4
call Functiond0228
call Functiond0504
2015-02-10 23:14:21 +00:00
ld a, [w2_d168]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d168], a
ret
; d012f
PokeAnim_Extra: ; d012f
ld c, $1
ld b, $0
call Functiond0228
call Functiond0504
2015-02-10 23:14:21 +00:00
ld a, [w2_d168]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d168], a
ret
; d0141
PokeAnim_Play: ; d0141
call Functiond0250
2015-02-10 23:14:21 +00:00
ld a, [w2_d17e]
bit 7, a
ret z
call Functiond04bd
2015-02-10 23:14:21 +00:00
ld a, [w2_d168]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d168], a
ret
; d0155
PokeAnim_Play2: ; d0155
call Functiond0250
2015-02-10 23:14:21 +00:00
ld a, [w2_d17e]
bit 7, a
ret z
2015-02-10 23:14:21 +00:00
ld a, [w2_d168]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d168], a
ret
; d0166
PokeAnim_Nop: ; d0166
call Functiond01a9
2015-02-10 23:14:21 +00:00
ld a, [w2_d168]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d168], a
ret
; d0171
PokeAnim_Finish: ; d0171
call Functiond01a9
2015-02-10 23:14:21 +00:00
ld hl, w2_d168
set 7, [hl]
ret
; d017a
PokeAnim_Cry: ; d017a
2015-02-10 23:14:21 +00:00
ld a, [w2_d16b]
2014-07-18 17:25:03 +00:00
call _PlayCry
2015-02-10 23:14:21 +00:00
ld a, [w2_d168]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d168], a
ret
; d0188
PokeAnim_Cry2: ; d0188
2015-02-10 23:14:21 +00:00
ld a, [w2_d16b]
2014-07-18 17:25:03 +00:00
call PlayCry2
2015-02-10 23:14:21 +00:00
ld a, [w2_d168]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d168], a
ret
; d0196
PokeAnim_Cry3: ; d0196
ld a, $f
ld [CryTracks], a
2015-02-10 23:14:21 +00:00
ld a, [w2_d16b]
2014-07-18 17:25:03 +00:00
call PlayStereoCry2
2015-02-10 23:14:21 +00:00
ld a, [w2_d168]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d168], a
ret
; d01a9
Functiond01a9: ; d01a9
ld a, [rSVBK]
push af
ld a, $2
ld [rSVBK], a
call Functiond04bd
callba Function10402d
call Functiond0536
callba Function104047
pop af
ld [rSVBK], a
ret
; d01c6
Functiond01c6: ; d01c6
ld a, [CurPartySpecies]
cp EGG
jr z, .asm_d01d4
call IsAPokemon
jr c, .asm_d01d4
and a
ret
.asm_d01d4
scf
ret
; d01d6
Functiond01d6: ; d01d6
ld a, [rSVBK]
push af
ld a, $2
ld [rSVBK], a
push bc
push de
push hl
2015-02-10 23:14:21 +00:00
ld hl, w2_d168
ld bc, $0029
xor a
call ByteFill
pop hl
pop de
pop bc
ld a, c
2015-02-10 23:14:21 +00:00
ld [w2_d169], a
ld a, b
2015-02-10 23:14:21 +00:00
ld [w2_d16a], a
ld a, l
2015-02-10 23:14:21 +00:00
ld [w2_d16f], a
ld a, h
2015-02-10 23:14:21 +00:00
ld [w2_d170], a
ld a, d
2015-02-10 23:14:21 +00:00
ld [w2_d16e], a
ld a, $1
ld hl, CurPartySpecies
call GetFarWRAMByte
2015-02-10 23:14:21 +00:00
ld [w2_d16b], a
ld a, $1
ld hl, UnownLetter
call GetFarWRAMByte
2015-02-10 23:14:21 +00:00
ld [w2_d16c], a
call Functiond065c
2015-02-10 23:14:21 +00:00
ld [w2_d16d], a
call Functiond05b4
ld a, c
2015-02-10 23:14:21 +00:00
ld [w2_d171], a
pop af
ld [rSVBK], a
ret
; d0228
Functiond0228: ; d0228
ld a, [rSVBK]
push af
ld a, $2
ld [rSVBK], a
push bc
2015-02-10 23:14:21 +00:00
ld hl, w2_d172
ld bc, $001f
xor a
call ByteFill
pop bc
ld a, b
ld [w2_d173], a
ld a, c
2015-02-10 23:14:21 +00:00
ld [w2_d172], a
call Functiond055c
call Functiond05ce
call Functiond061b
pop af
ld [rSVBK], a
ret
; d0250
Functiond0250: ; d0250
xor a
ld [hBGMapMode], a
Functiond0253: ; d0253
2015-02-10 23:14:21 +00:00
ld a, [w2_d17e]
and $7f
ld hl, Tabled025d
rst JumpTable
ret
; d025d
Tabled025d: ; d025d
dw Functiond0261
dw Functiond0282
; d0261
Functiond0261: ; d0261
call Functiond02f8
2015-02-10 23:14:21 +00:00
ld a, [w2_d182]
cp $ff
jr z, PokeAnim_End
cp $fe
jr z, PokeAnim_SetRepeat
cp $fd
jr z, PokeAnim_DoRepeat
call Functiond02c8
2015-02-10 23:14:21 +00:00
ld a, [w2_d183]
call Functiond02ae
2015-02-10 23:14:21 +00:00
ld [w2_d181], a
call Functiond02dc
Functiond0282: ; d0282
2015-02-10 23:14:21 +00:00
ld a, [w2_d181]
dec a
2015-02-10 23:14:21 +00:00
ld [w2_d181], a
ret nz
call Functiond02e4
ret
; d028e
PokeAnim_SetRepeat: ; d028e
2015-02-10 23:14:21 +00:00
ld a, [w2_d183]
ld [w2_d17f], a
jr Functiond0253
; d0296
PokeAnim_DoRepeat: ; d0296
2015-02-10 23:14:21 +00:00
ld a, [w2_d17f]
and a
ret z
dec a
2015-02-10 23:14:21 +00:00
ld [w2_d17f], a
ret z
2015-02-10 23:14:21 +00:00
ld a, [w2_d183]
ld [w2_d17d], a
jr Functiond0253
; d02a8
PokeAnim_End: ; d02a8
2015-02-10 23:14:21 +00:00
ld hl, w2_d17e
set 7, [hl]
ret
; d02ae
Functiond02ae: ; d02ae
ld c, a
ld b, $0
ld hl, $0000
2015-02-10 23:14:21 +00:00
ld a, [w2_d173]
call AddNTimes
ld a, h
swap a
and $f0
ld h, a
ld a, l
swap a
and $f
or h
add c
ret
; d02c8
Functiond02c8: ; d02c8
call Functiond04bd
2015-02-10 23:14:21 +00:00
ld a, [w2_d182]
and a
ret z
call Functiond031b
push hl
call Functiond033b
pop hl
call Functiond036b
ret
; d02dc
Functiond02dc: ; d02dc
2015-02-10 23:14:21 +00:00
ld a, [w2_d17e]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d17e], a
ret
; d02e4
Functiond02e4: ; d02e4
2015-02-10 23:14:21 +00:00
ld a, [w2_d17e]
dec a
2015-02-10 23:14:21 +00:00
ld [w2_d17e], a
ret
; d02ec
Functiond02ec: ; d02ec
2015-02-10 23:14:21 +00:00
ld a, [w2_d16b]
cp UNOWN
ret
; d02f2
Functiond02f2: ; d02f2
2015-02-10 23:14:21 +00:00
ld a, [w2_d16b]
cp EGG
ret
; d02f8
Functiond02f8: ; d02f8
push hl
2015-02-10 23:14:21 +00:00
ld a, [w2_d17d]
ld e, a
ld d, $0
2015-02-10 23:14:21 +00:00
ld hl, w2_d175
ld a, [hli]
ld h, [hl]
ld l, a
add hl, de
add hl, de
2015-02-10 23:14:21 +00:00
ld a, [w2_d174]
call GetFarHalfword
ld a, l
2015-02-10 23:14:21 +00:00
ld [w2_d182], a
ld a, h
2015-02-10 23:14:21 +00:00
ld [w2_d183], a
ld hl, w2_d17d
inc [hl]
pop hl
ret
; d031b
Functiond031b: ; d031b
2015-02-10 23:14:21 +00:00
ld a, [w2_d182]
dec a
ld c, a
ld b, $0
2015-02-10 23:14:21 +00:00
ld hl, w2_d178
ld a, [hli]
ld h, [hl]
ld l, a
add hl, bc
add hl, bc
2015-02-10 23:14:21 +00:00
ld a, [w2_d177]
call GetFarHalfword
2015-02-10 23:14:21 +00:00
ld a, [w2_d177]
call GetFarByte
2015-02-10 23:14:21 +00:00
ld [w2_d180], a
inc hl
ret
; d033b
Functiond033b: ; d033b
call Functiond0356
push bc
2015-02-10 23:14:21 +00:00
ld hl, w2_d17b
ld a, [hli]
ld h, [hl]
ld l, a
2015-02-10 23:14:21 +00:00
ld a, [w2_d180]
call AddNTimes
pop bc
2015-02-10 23:14:21 +00:00
ld de, w2_d188
ld a, [w2_d17a]
call FarCopyBytes
ret
; d0356
Functiond0356: ; d0356
push hl
2015-02-10 23:14:21 +00:00
ld a, [w2_d171]
sub 5
ld c, a
ld b, 0
ld hl, Unknown_d0368
add hl, bc
ld c, [hl]
ld b, 0
pop hl
ret
; d0368
Unknown_d0368: db 4, 5, 7
Functiond036b: ; d036b
xor a
2015-02-10 23:14:21 +00:00
ld [w2_d187], a
ld [w2_d186], a
ld [w2_d185], a
.asm_d0375
push hl
call Functiond0392
pop hl
ld a, b
and a
jr z, .asm_d038a
2015-02-10 23:14:21 +00:00
ld a, [w2_d177]
call GetFarByte
inc hl
push hl
call Functiond03bd
pop hl
.asm_d038a
push hl
call Functiond0499
pop hl
jr nc, .asm_d0375
ret
; d0392
Functiond0392: ; d0392
2015-02-10 23:14:21 +00:00
ld a, [w2_d187]
and $f8
rrca
rrca
rrca
ld e, a
ld d, 0
2015-02-10 23:14:21 +00:00
ld hl, w2_d188
add hl, de
ld b, [hl]
2015-02-10 23:14:21 +00:00
ld a, [w2_d187]
and 7
jr z, .asm_d03b0
ld c, a
ld a, b
.asm_d03ab
rrca
dec c
jr nz, .asm_d03ab
ld b, a
.asm_d03b0
xor a
bit 0, b
jr z, .asm_d03b7
ld a, 1
.asm_d03b7
ld b, a
2015-02-10 23:14:21 +00:00
ld hl, w2_d187
inc [hl]
ret
; d03bd
Functiond03bd: ; d03bd
push af
call Functiond03cd
pop af
push hl
call Functiond03f7
2015-02-10 23:14:21 +00:00
ld hl, w2_d16e
add [hl]
pop hl
ld [hl], a
ret
; d03cd
Functiond03cd: ; d03cd
call Functiond046c
2015-02-10 23:14:21 +00:00
ld a, [w2_d186]
ld bc, $0014
call AddNTimes
2015-02-10 23:14:21 +00:00
ld a, [wc2c6]
and a
jr nz, .asm_d03e8
2015-02-10 23:14:21 +00:00
ld a, [w2_d185]
ld e, a
ld d, 0
add hl, de
jr .asm_d03f3
.asm_d03e8
2015-02-10 23:14:21 +00:00
ld a, [w2_d185]
ld e, a
ld a, l
sub e
ld l, a
ld a, h
sbc 0
ld h, a
.asm_d03f3
ret
; d03f4
Unknown_d03f4: db 6, 5, 4
Functiond03f7: ; d03f7
push af
2015-02-10 23:14:21 +00:00
ld a, [w2_d171]
cp 5
jr z, .asm_d0405
cp 6
jr z, .asm_d041a
pop af
ret
.asm_d0405
pop af
cp 5 * 5
jr nc, .asm_d0417
push hl
push de
ld hl, Unknown_d042f
ld e, a
ld d, 0
add hl, de
ld a, [hl]
pop de
pop hl
ret
.asm_d0417
add 24
ret
.asm_d041a
pop af
cp 6 * 6
jr nc, .asm_d042c
push hl
push de
ld hl, Unknown_d0448
ld e, a
ld d, 0
add hl, de
ld a, [hl]
pop de
pop hl
ret
.asm_d042c
add 13
ret
; d042f
Unknown_d042f:
db 9, 10, 11, 12, 13
db 16, 17, 18, 19, 20
db 23, 24, 25, 26, 27
db 30, 31, 32, 33, 34
db 37, 38, 39, 40, 41
Unknown_d0448:
db 8, 9, 10, 11, 12, 13
db 15, 16, 17, 18, 19, 20
db 22, 23, 24, 25, 26, 27
db 29, 30, 31, 32, 33, 34
db 36, 37, 38, 39, 40, 41
db 43, 44, 45, 46, 47, 48
Functiond046c: ; d046c
2015-02-10 23:14:21 +00:00
ld hl, w2_d16f
ld a, [hli]
ld h, [hl]
ld l, a
2015-02-10 23:14:21 +00:00
ld a, [w2_d171]
ld de, 0
ld bc, 6
cp 7
jr z, .asm_d048f
ld de, 21
ld bc, 25
cp 6
jr z, .asm_d048f
ld de, 41
ld bc, 45
.asm_d048f
2015-02-10 23:14:21 +00:00
ld a, [wc2c6]
and a
jr nz, .asm_d0497
add hl, de
ret
.asm_d0497
add hl, bc
ret
; d0499
Functiond0499: ; d0499
2015-02-10 23:14:21 +00:00
ld a, [w2_d186]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d186], a
ld c, a
2015-02-10 23:14:21 +00:00
ld a, [w2_d171]
cp c
jr nz, .asm_d04bb
xor a
2015-02-10 23:14:21 +00:00
ld [w2_d186], a
ld a, [w2_d185]
inc a
2015-02-10 23:14:21 +00:00
ld [w2_d185], a
ld c, a
2015-02-10 23:14:21 +00:00
ld a, [w2_d171]
cp c
jr nz, .asm_d04bb
scf
ret
.asm_d04bb
xor a
ret
; d04bd
Functiond04bd: ; d04bd
call Functiond04f6
2015-02-10 23:14:21 +00:00
ld a, [wc2c6]
and a
jr nz, .asm_d04ce
ld de, 1
ld bc, 0
jr .asm_d04d4
.asm_d04ce
ld de, -1
ld bc, 6
.asm_d04d4
2015-02-10 23:14:21 +00:00
ld hl, w2_d16f
ld a, [hli]
ld h, [hl]
ld l, a
add hl, bc
ld c, 7
ld b, 7
2015-02-10 23:14:21 +00:00
ld a, [w2_d16e]
.asm_d04e2
push bc
push hl
push de
ld de, $0014
.asm_d04e8
ld [hl], a
inc a
add hl, de
dec b
jr nz, .asm_d04e8
pop de
pop hl
add hl, de
pop bc
dec c
jr nz, .asm_d04e2
ret
; d04f6
Functiond04f6: ; d04f6
2015-02-10 23:14:21 +00:00
ld hl, w2_d16f
ld a, [hli]
ld h, [hl]
ld l, a
ld b, 7
ld c, 7
call ClearBox
ret
; d0504
Functiond0504: ; d0504
ld a, [rSVBK]
push af
ld a, $2
ld [rSVBK], a
xor a
ld [hBGMapMode], a
call Functiond051b
callba Function104047
pop af
ld [rSVBK], a
ret
; d051b
Functiond051b: ; d051b
call Functiond0551
ld b, 7
ld c, 7
ld de, $0014
.asm_d0525
push bc
push hl
.asm_d0527
ld a, [hl]
or 8
ld [hl], a
add hl, de
dec c
jr nz, .asm_d0527
pop hl
inc hl
pop bc
dec b
jr nz, .asm_d0525
ret
; d0536
Functiond0536: ; d0536
call Functiond0551
ld b, 7
ld c, 7
ld de, $0014
.asm_d0540
push bc
push hl
.asm_d0542
ld a, [hl]
and $f7
ld [hl], a
add hl, de
dec c
jr nz, .asm_d0542
pop hl
inc hl
pop bc
dec b
jr nz, .asm_d0540
ret
; d0551
Functiond0551: ; d0551
2015-02-10 23:14:21 +00:00
ld hl, w2_d16f
ld a, [hli]
ld h, [hl]
ld l, a
ld de, AttrMap - TileMap
add hl, de
ret
; d055c
Functiond055c: ; d055c
call Functiond02f2
jr z, .egg
ld c, BANK(UnownAnimations)
ld hl, UnownAnimationPointers
ld de, UnownAnimationExtraPointers
call Functiond02ec
jr z, .asm_d0576
ld c, BANK(PicAnimations)
ld hl, AnimationPointers
ld de, AnimationExtraPointers
.asm_d0576
2015-02-10 23:14:21 +00:00
ld a, [w2_d172]
and a
jr z, .asm_d057e
ld h, d
ld l, e
.asm_d057e
2015-02-10 23:14:21 +00:00
ld a, [w2_d16d]
dec a
ld e, a
ld d, 0
add hl, de
add hl, de
ld a, c
2015-02-10 23:14:21 +00:00
ld [w2_d174], a
call GetFarHalfword
ld a, l
2015-02-10 23:14:21 +00:00
ld [w2_d175], a
ld a, h
2015-02-10 23:14:21 +00:00
ld [w2_d176], a
ret
.egg
ld hl, EggAnimation
ld c, BANK(EggAnimation)
2015-02-10 23:14:21 +00:00
ld a, [w2_d172]
and a
jr z, .asm_d05a7
ld hl, EggAnimationExtra
ld c, BANK(EggAnimationExtra)
.asm_d05a7
ld a, c
2015-02-10 23:14:21 +00:00
ld [w2_d174], a
ld a, l
2015-02-10 23:14:21 +00:00
ld [w2_d175], a
ld a, h
2015-02-10 23:14:21 +00:00
ld [w2_d176], a
ret
; d05b4
Functiond05b4: ; d05b4
ld a, [rSVBK]
push af
ld a, $1
ld [rSVBK], a
ld a, [CurPartySpecies]
ld [CurSpecies], a
call GetBaseData
ld a, [BasePicSize]
and $f
ld c, a
pop af
ld [rSVBK], a
ret
; d05ce
Functiond05ce: ; d05ce
call Functiond02f2
jr z, .egg
call Functiond02ec
ld b, BANK(UnownFramesPointers)
ld c, BANK(UnownsFrames)
ld hl, UnownFramesPointers
jr z, .asm_d05ef
2015-02-10 23:14:21 +00:00
ld a, [w2_d16b]
cp 151 + 1
ld b, BANK(FramesPointers)
ld c, BANK(KantoFrames)
ld hl, FramesPointers
jr c, .asm_d05ef
ld c, BANK(JohtoFrames)
.asm_d05ef
ld a, c
2015-02-10 23:14:21 +00:00
ld [w2_d177], a
2015-02-10 23:14:21 +00:00
ld a, [w2_d16d]
dec a
ld e, a
ld d, 0
add hl, de
add hl, de
ld a, b
call GetFarHalfword
ld a, l
2015-02-10 23:14:21 +00:00
ld [w2_d178], a
ld a, h
2015-02-10 23:14:21 +00:00
ld [w2_d179], a
ret
.egg
ld hl, EggFrames
ld c, BANK(EggFrames)
ld a, c
2015-02-10 23:14:21 +00:00
ld [w2_d177], a
ld a, l
2015-02-10 23:14:21 +00:00
ld [w2_d178], a
ld a, h
2015-02-10 23:14:21 +00:00
ld [w2_d179], a
ret
; d061b
Functiond061b: ; d061b
call Functiond02f2
jr z, .egg
call Functiond02ec
ld a, BANK(UnownBitmasksPointers)
ld hl, UnownBitmasksPointers
jr z, .asm_d062f
ld a, BANK(BitmasksPointers)
ld hl, BitmasksPointers
.asm_d062f
2015-02-10 23:14:21 +00:00
ld [w2_d17a], a
2015-02-10 23:14:21 +00:00
ld a, [w2_d16d]
dec a
ld e, a
ld d, 0
add hl, de
add hl, de
2015-02-10 23:14:21 +00:00
ld a, [w2_d17a]
call GetFarHalfword
ld a, l
2015-02-10 23:14:21 +00:00
ld [w2_d17b], a
ld a, h
2015-02-10 23:14:21 +00:00
ld [w2_d17c], a
ret
.egg
ld c, BANK(EggBitmasks)
ld hl, EggBitmasks
ld a, c
2015-02-10 23:14:21 +00:00
ld [w2_d17a], a
ld a, l
2015-02-10 23:14:21 +00:00
ld [w2_d17b], a
ld a, h
2015-02-10 23:14:21 +00:00
ld [w2_d17c], a
ret
; d065c
Functiond065c: ; d065c
call Functiond02ec
jr z, .asm_d0665
2015-02-10 23:14:21 +00:00
ld a, [w2_d16b]
ret
.asm_d0665
2015-02-10 23:14:21 +00:00
ld a, [w2_d16c]
ret
; d0669
Functiond0669: ; d0669
ld a, $1
2015-02-10 23:14:21 +00:00
ld [wc2c6], a
Functiond066e: ; d066e
call Functiond01c6
jr c, .asm_d068c
ld h, d
ld l, e
push bc
push hl
ld de, VTiles2
predef Function5108b
pop hl
pop bc
ld d, 0
ld e, c
call Functiond008e
xor a
2015-02-10 23:14:21 +00:00
ld [wc2c6], a
ret
.asm_d068c
xor a
2015-02-10 23:14:21 +00:00
ld [wc2c6], a
inc a
ld [CurPartySpecies], a
ret
; d0695