pokecrystal/macros/scripts/gfx_anims.asm

; pic + oam animations

frame: MACRO
	db \1
x = \2
if _NARG > 2
rept _NARG - 2
x |= 1 << (\3 + 1)
	shift
endr
endc
	db x
ENDM

	const_def -1, -1

	const endanim_command ; $ff
endanim: MACRO
	db endanim_command
ENDM

	const dorestart_command ; $fe
dorestart: MACRO
	db dorestart_command
ENDM

	const dowait_command ; $fd
dowait: MACRO
	db dowait_command
	db \1 ; frames
ENDM

	const delanim_command ; $fc
delanim: MACRO
; Removes the object from the screen, as opposed to `endanim` which just stops all motion
	db delanim_command
ENDM


; Used for pic animations
	const_def -2, -1

	const setrepeat_command ; $fe
setrepeat: MACRO
	db setrepeat_command
	db \1 ; amount of times to repeat
ENDM

	const dorepeat_command ; $fd
dorepeat: MACRO
	db dorepeat_command
	db \1 ; command offset to jump to
ENDM
Clarify which gfx anim commands are for oam 2017-12-14 05:38:08 +00:00			`; pic + oam animations`
Reorganize macros 2017-12-14 05:36:24 +00:00
Uppercase MACRO and EQU(S) according to the style guide 2017-12-28 12:23:44 +00:00			`frame: MACRO`
Reorganize macros 2017-12-14 05:36:24 +00:00			`db \1`
			`x = \2`
			`if _NARG > 2`
rgbds supports 'X - 1' instead of 'X + -1' 2020-03-21 18:01:05 +00:00			`rept _NARG - 2`
Use compound assignment operators 2021-11-24 01:18:08 +00:00			`x \|= 1 << (\3 + 1)`
Reorganize macros 2017-12-14 05:36:24 +00:00			`shift`
			`endr`
			`endc`
			`db x`
endm -> ENDM 2017-12-28 21:31:16 +00:00			`ENDM`
Reorganize macros 2017-12-14 05:36:24 +00:00
Use const_skip and const_next macros for brevity 2020-07-08 20:20:15 +00:00			`const_def -1, -1`
Reorganize macros 2017-12-14 05:36:24 +00:00
Use const_skip and const_next macros for brevity 2020-07-08 20:20:15 +00:00			`const endanim_command ; $ff`
			`endanim: MACRO`
			`db endanim_command`
			`ENDM`

			`const dorestart_command ; $fe`
			`dorestart: MACRO`
			`db dorestart_command`
endm -> ENDM 2017-12-28 21:31:16 +00:00			`ENDM`
Reorganize macros 2017-12-14 05:36:24 +00:00
Eliminate enum: use const instead, with case-by-case parallel const implementations 2020-07-08 19:30:23 +00:00			`const dowait_command ; $fd`
dorepeat -> dowait for oam animations Having the pic animation macros be the same as the oam animation macros isn't really turning out so well... I wonder if we should split them up eventually. 2019-02-15 01:54:35 +00:00			`dowait: MACRO`
			`db dowait_command`
			`db \1 ; frames`
endm -> ENDM 2017-12-28 21:31:16 +00:00			`ENDM`
Reorganize macros 2017-12-14 05:36:24 +00:00
Use const_skip and const_next macros for brevity 2020-07-08 20:20:15 +00:00			`const delanim_command ; $fc`
			`delanim: MACRO`
			; Removes the object from the screen, as opposed to `endanim` which just stops all motion
			`db delanim_command`
endm -> ENDM 2017-12-28 21:31:16 +00:00			`ENDM`
Reorganize macros 2017-12-14 05:36:24 +00:00

dorepeat -> dowait for oam animations Having the pic animation macros be the same as the oam animation macros isn't really turning out so well... I wonder if we should split them up eventually. 2019-02-15 01:54:35 +00:00			`; Used for pic animations`
Use const_skip and const_next macros for brevity 2020-07-08 20:20:15 +00:00			`const_def -2, -1`
dorepeat -> dowait for oam animations Having the pic animation macros be the same as the oam animation macros isn't really turning out so well... I wonder if we should split them up eventually. 2019-02-15 01:54:35 +00:00
Eliminate enum: use const instead, with case-by-case parallel const implementations 2020-07-08 19:30:23 +00:00			`const setrepeat_command ; $fe`
dorepeat -> dowait for oam animations Having the pic animation macros be the same as the oam animation macros isn't really turning out so well... I wonder if we should split them up eventually. 2019-02-15 01:54:35 +00:00			`setrepeat: MACRO`
			`db setrepeat_command`
			`db \1 ; amount of times to repeat`
endm -> ENDM 2017-12-28 21:31:16 +00:00			`ENDM`
Use const_skip and const_next macros for brevity 2020-07-08 20:20:15 +00:00
			`const dorepeat_command ; $fd`
			`dorepeat: MACRO`
			`db dorepeat_command`
			`db \1 ; command offset to jump to`
			`ENDM`