battle animation scripts

1 files changed, 266 insertions, 0 deletions

diff --git a/asm/macros/battle_anim.s b/asm/macros/battle_anim.s
new file mode 100644
index 000000000..fc2777326
--- /dev/null
+++ b/asm/macros/battle_anim.s
@@ -0,0 +1,266 @@
+	.macro loadsprite id
+	.byte 0x00
+	.2byte \id
+	.endm
+
+	.macro unloadsprite id
+	.byte 0x01
+	.2byte \id
+	.endm
+
+	.macro sprite template, priority, argc=0, argv:vararg
+	.byte 0x02
+	.4byte \template
+	.byte \priority
+	.byte \argc
+	.if \argc > 0
+	.2byte \argv
+	.endif
+	.endm
+
+	.macro createtask addr, priority, argc=0, argv:vararg
+	.byte 0x03
+	.4byte \addr
+	.byte \priority
+	.byte \argc
+	.if \argc > 0
+	.2byte \argv
+	.endif
+	.endm
+
+	.macro pause delay
+	.byte 0x04
+	.byte \delay
+	.endm
+
+	.macro wait
+	.byte 0x05
+	.endm
+
+	.macro hang1
+	.byte 0x06
+	.endm
+
+	.macro hang2
+	.byte 0x07
+	.endm
+
+	.macro end
+	.byte 0x08
+	.endm
+
+	.macro playse id
+	.byte 0x09
+	.2byte \id
+	.endm
+
+	.macro monbg which
+	.byte 0x0A
+	.byte \which
+	.endm
+
+	.macro clearmonbg which
+	.byte 0x0B
+	.byte \which
+	.endm
+
+	.macro setalpha eva, evb
+	.byte 0x0C
+	.2byte ((\evb) << 8) | (\eva)
+	.endm
+
+	.macro blendoff
+	.byte 0x0D
+	.endm
+
+	.macro call addr
+	.byte 0x0E
+	.4byte \addr
+	.endm
+
+	.macro ret
+	.byte 0x0F
+	.endm
+
+	.macro setvar var_num, value
+	.byte 0x10
+	.byte \var_num
+	.2byte \value
+	.endm
+
+	.macro ifelse addr1, addr2
+	.byte 0x11
+	.4byte \addr1
+	.4byte \addr2
+	.endm
+
+	.macro jumpif cond, addr
+	.byte 0x12
+	.byte \cond
+	.4byte \addr
+	.endm
+
+	.macro jump addr
+	.byte 0x13
+	.4byte \addr
+	.endm
+
+	.macro fadetobg id
+	.byte 0x14
+	.byte \id
+	.endm
+
+	.macro restorebg
+	.byte 0x15
+	.endm
+
+	.macro waitbgfadeout
+	.byte 0x16
+	.endm
+
+	.macro waitbgfadein
+	.byte 0x17
+	.endm
+
+	.macro changebg id
+	.byte 0x18
+	.byte \id
+	.endm
+
+	.macro panse_19 id, pan
+	.byte 0x19
+	.2byte \id
+	.byte \pan
+	.endm
+
+	.macro setpan pan
+	.byte 0x1A
+	.byte \pan
+	.endm
+
+	.macro panse_1B id, pan_start, pan_end, step, delay
+	.byte 0x1B
+	.2byte \id
+	.byte \pan_start
+	.byte \pan_end
+	.byte \step
+	.byte \delay
+	.endm
+
+	.macro panse_1C id, pan, delay, count
+	.byte 0x1C
+	.2byte \id
+	.byte \pan
+	.byte \delay
+	.byte \count
+	.endm
+
+	.macro panse_1D id, pan, count
+	.byte 0x1D
+	.2byte \id
+	.byte \pan
+	.byte \count
+	.endm
+
+	.macro setbldcnt bldcnt
+	.byte 0x1E
+	.2byte \bldcnt
+	.endm
+
+	.macro createtask_1F addr, argc=0, argv:vararg
+	.byte 0x1F
+	.4byte \addr
+	.byte \argc
+	.if \argc > 0
+	.2byte \argv
+	.endif
+	.endm
+
+	.macro waitsound
+	.byte 0x20
+	.endm
+
+	.macro jumpvareq var_num, value, addr
+	.byte 0x21
+	.byte \var_num
+	.2byte \value
+	.4byte \addr
+	.endm
+
+	.macro monbg_22 unk
+	.byte 0x22
+	.byte \unk
+	.endm
+
+	.macro clearmonbg_23 unk
+	.byte 0x23
+	.byte \unk
+	.endm
+
+	.macro jumpunkcond addr
+	.byte 0x24
+	.4byte \addr
+	.endm
+
+	.macro fadetobg_25 a, b, c
+	.byte 0x25
+	.byte \a
+	.byte \b
+	.byte \c
+	.endm
+
+	.macro panse_26 id, pan_start, pan_end, step, delay
+	.byte 0x26
+	.2byte \id
+	.byte \pan_start
+	.byte \pan_end
+	.byte \step
+	.byte \delay
+	.endm
+
+	.macro panse_27 id, pan_start, pan_end, step, delay
+	.byte 0x27
+	.2byte \id
+	.byte \pan_start
+	.byte \pan_end
+	.byte \step
+	.byte \delay
+	.endm
+
+	.macro monbgprio_28 unk
+	.byte 0x28
+	.byte \unk
+	.endm
+
+	.macro monbgprio_29
+	.byte 0x29
+	.endm
+
+	.macro monbgprio_2A unk
+	.byte 0x2A
+	.byte \unk
+	.endm
+
+	.macro invisible side
+	.byte 0x2B
+	.byte \side
+	.endm
+
+	.macro visible side
+	.byte 0x2C
+	.byte \side
+	.endm
+
+	.macro doublebattle_2D unk
+	.byte 0x2D
+	.byte \unk
+	.endm
+
+	.macro doublebattle_2E unk
+	.byte 0x2E
+	.byte \unk
+	.endm
+
+	.macro stopsound
+	.byte 0x2F
+	.endm