Use labels for pic animation setup macros.

This commit is contained in:
yenatch 2015-04-13 21:28:04 -07:00
parent 64331ffe10
commit 50734c961c

View File

@ -54,26 +54,42 @@ Functiond003a: ; d003a
; d0042 ; d0042
Unknown_d0042: ; d0042 POKEANIM: MACRO
dw Unknown_d0054 rept _NARG
dw Unknown_d0058
dw Unknown_d005c
dw Unknown_d0064
dw Unknown_d006e
dw Unknown_d0076
dw Unknown_d0080
dw Unknown_d0088
dw Unknown_d008b
Unknown_d0054: db 11, 5, 7, 0 ; Workaround for a bug where macro args can't come after the start of a symbol
Unknown_d0058: db 11, 4, 7, 0 if !def(\1_POKEANIM)
Unknown_d005c: db 10, 4, 7, 2, 3, 6, 7, 0 \1_POKEANIM equs "PokeAnim_\1_"
Unknown_d0064: db 6, 8, 6, 7, 2, 3, 9, 4, 7, 0 endc
Unknown_d006e: db 6, 7, 2, 3,10, 4, 7, 0
Unknown_d0076: db 6, 7,10, 4, 7, 2, 3, 6, 7, 0 db (\1_POKEANIM - PokeAnim_SetupCommands) / 2
Unknown_d0080: db 10, 4, 7, 2, 3, 6, 7, 0 shift
Unknown_d0088: db 4, 7, 0 endr
Unknown_d008b: db 6, 7, 0
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 Functiond008e: ; d008e
@ -93,7 +109,7 @@ Functiond00a3: ; d00a3
push hl push hl
ld c, e ld c, e
ld b, 0 ld b, 0
ld hl, Unknown_d0042 ld hl, PokeAnims
add hl, bc add hl, bc
add hl, bc add hl, bc
ld a, [hli] ld a, [hli]
@ -118,7 +134,7 @@ Functiond00b4: ; d00b4
ld l, a ld l, a
add hl, bc add hl, bc
ld a, [hl] ld a, [hl]
ld hl, Jumptable_d00da ld hl, PokeAnim_SetupCommands
rst JumpTable rst JumpTable
ld a, [w2_d168] ld a, [w2_d168]
ld c, a ld c, a
@ -131,29 +147,32 @@ Functiond00b4: ; d00b4
ret ret
; d00da ; d00da
Jumptable_d00da: ; d00da PokeAnim_SetupCommands: ; d00da
dw Functiond0171 setup_command: macro
dw Functiond0166 \1_: dw \1
dw Functiond00f2 endm
dw Functiond00fe setup_command PokeAnim_Finish
dw Functiond010b setup_command PokeAnim_Nop
dw Functiond011d setup_command PokeAnim_SetWait
dw Functiond012f setup_command PokeAnim_Wait
dw Functiond0141 setup_command PokeAnim_Setup
dw Functiond0155 setup_command PokeAnim_Setup2
dw Functiond017a setup_command PokeAnim_Extra
dw Functiond0188 setup_command PokeAnim_Play
dw Functiond0196 setup_command PokeAnim_Play2
setup_command PokeAnim_Cry
setup_command PokeAnim_Cry2
setup_command PokeAnim_Cry3
; d00f2 ; d00f2
Functiond00f2: ; d00f2 PokeAnim_SetWait: ; d00f2
ld a, $12 ld a, $12
ld [w2_d181], a ld [w2_d181], a
ld a, [w2_d168] ld a, [w2_d168]
inc a inc a
ld [w2_d168], a ld [w2_d168], a
Functiond00fe: ; d00fe PokeAnim_Wait: ; d00fe
ld hl, w2_d181 ld hl, w2_d181
dec [hl] dec [hl]
ret nz ret nz
@ -163,7 +182,7 @@ Functiond00fe: ; d00fe
ret ret
; d010b ; d010b
Functiond010b: ; d010b PokeAnim_Setup: ; d010b
ld c, $0 ld c, $0
ld b, $0 ld b, $0
call Functiond0228 call Functiond0228
@ -174,7 +193,7 @@ Functiond010b: ; d010b
ret ret
; d011d ; d011d
Functiond011d: ; d011d PokeAnim_Setup2: ; d011d
ld c, $0 ld c, $0
ld b, $4 ld b, $4
call Functiond0228 call Functiond0228
@ -185,7 +204,7 @@ Functiond011d: ; d011d
ret ret
; d012f ; d012f
Functiond012f: ; d012f PokeAnim_Extra: ; d012f
ld c, $1 ld c, $1
ld b, $0 ld b, $0
call Functiond0228 call Functiond0228
@ -196,7 +215,7 @@ Functiond012f: ; d012f
ret ret
; d0141 ; d0141
Functiond0141: ; d0141 PokeAnim_Play: ; d0141
call Functiond0250 call Functiond0250
ld a, [w2_d17e] ld a, [w2_d17e]
bit 7, a bit 7, a
@ -208,7 +227,7 @@ Functiond0141: ; d0141
ret ret
; d0155 ; d0155
Functiond0155: ; d0155 PokeAnim_Play2: ; d0155
call Functiond0250 call Functiond0250
ld a, [w2_d17e] ld a, [w2_d17e]
bit 7, a bit 7, a
@ -219,7 +238,7 @@ Functiond0155: ; d0155
ret ret
; d0166 ; d0166
Functiond0166: ; d0166 PokeAnim_Nop: ; d0166
call Functiond01a9 call Functiond01a9
ld a, [w2_d168] ld a, [w2_d168]
inc a inc a
@ -227,14 +246,14 @@ Functiond0166: ; d0166
ret ret
; d0171 ; d0171
Functiond0171: ; d0171 PokeAnim_Finish: ; d0171
call Functiond01a9 call Functiond01a9
ld hl, w2_d168 ld hl, w2_d168
set 7, [hl] set 7, [hl]
ret ret
; d017a ; d017a
Functiond017a: ; d017a PokeAnim_Cry: ; d017a
ld a, [w2_d16b] ld a, [w2_d16b]
call _PlayCry call _PlayCry
ld a, [w2_d168] ld a, [w2_d168]
@ -243,7 +262,7 @@ Functiond017a: ; d017a
ret ret
; d0188 ; d0188
Functiond0188: ; d0188 PokeAnim_Cry2: ; d0188
ld a, [w2_d16b] ld a, [w2_d16b]
call PlayCry2 call PlayCry2
ld a, [w2_d168] ld a, [w2_d168]
@ -252,7 +271,7 @@ Functiond0188: ; d0188
ret ret
; d0196 ; d0196
Functiond0196: ; d0196 PokeAnim_Cry3: ; d0196
ld a, $f ld a, $f
ld [CryTracks], a ld [CryTracks], a
ld a, [w2_d16b] ld a, [w2_d16b]
@ -346,7 +365,7 @@ Functiond0228: ; d0228
call ByteFill call ByteFill
pop bc pop bc
ld a, b ld a, b
ld [w2_d172 + 1], a ld [w2_d173], a
ld a, c ld a, c
ld [w2_d172], a ld [w2_d172], a
call Functiond055c call Functiond055c
@ -378,11 +397,11 @@ Functiond0261: ; d0261
call Functiond02f8 call Functiond02f8
ld a, [w2_d182] ld a, [w2_d182]
cp $ff cp $ff
jr z, Functiond02a8 jr z, PokeAnim_End
cp $fe cp $fe
jr z, Functiond028e jr z, PokeAnim_SetRepeat
cp $fd cp $fd
jr z, Functiond0296 jr z, PokeAnim_DoRepeat
call Functiond02c8 call Functiond02c8
ld a, [w2_d183] ld a, [w2_d183]
call Functiond02ae call Functiond02ae
@ -398,13 +417,13 @@ Functiond0282: ; d0282
ret ret
; d028e ; d028e
Functiond028e: ; d028e PokeAnim_SetRepeat: ; d028e
ld a, [w2_d183] ld a, [w2_d183]
ld [w2_d17f], a ld [w2_d17f], a
jr Functiond0253 jr Functiond0253
; d0296 ; d0296
Functiond0296: ; d0296 PokeAnim_DoRepeat: ; d0296
ld a, [w2_d17f] ld a, [w2_d17f]
and a and a
ret z ret z
@ -416,7 +435,7 @@ Functiond0296: ; d0296
jr Functiond0253 jr Functiond0253
; d02a8 ; d02a8
Functiond02a8: ; d02a8 PokeAnim_End: ; d02a8
ld hl, w2_d17e ld hl, w2_d17e
set 7, [hl] set 7, [hl]
ret ret