286 lines
4.2 KiB
PHP
286 lines
4.2 KiB
PHP
@ commands
|
|
|
|
.macro loadspritegfx tag:req
|
|
.byte 0x0
|
|
.2byte \tag
|
|
.endm
|
|
|
|
.macro unloadspritegfx tag:req
|
|
.byte 0x1
|
|
.2byte \tag
|
|
.endm
|
|
|
|
.macro createsprite template:req, anim_battler:req, subpriority_offset:req, argv:vararg
|
|
.byte 0x02
|
|
.4byte \template
|
|
.if \anim_battler == ANIM_TARGET
|
|
.byte ANIMSPRITE_IS_TARGET | (\subpriority_offset & 0x7F)
|
|
.else
|
|
.byte (\subpriority_offset & 0x7F)
|
|
.endif
|
|
.byte (.Lsprite_\@_2 - .Lsprite_\@_1) / 2
|
|
.Lsprite_\@_1:
|
|
.2byte \argv
|
|
.Lsprite_\@_2:
|
|
.endm
|
|
|
|
.macro createvisualtask addr:req, priority:req, argv:vararg
|
|
.byte 0x03
|
|
.4byte \addr
|
|
.byte \priority
|
|
.byte (.Lcreatetask_\@_2 - .Lcreatetask_\@_1) / 2
|
|
.Lcreatetask_\@_1:
|
|
.2byte \argv
|
|
.Lcreatetask_\@_2:
|
|
.endm
|
|
|
|
.macro delay frames:req
|
|
.byte 0x4
|
|
.byte \frames
|
|
.endm
|
|
|
|
.macro waitforvisualfinish
|
|
.byte 0x5
|
|
.endm
|
|
|
|
.macro nop
|
|
.byte 0x6
|
|
.endm
|
|
|
|
.macro nop2
|
|
.byte 0x7
|
|
.endm
|
|
|
|
.macro end
|
|
.byte 0x8
|
|
.endm
|
|
|
|
.macro playse se:req
|
|
.byte 0x9
|
|
.2byte \se
|
|
.endm
|
|
|
|
.macro monbg battler:req
|
|
.byte 0xa
|
|
.byte \battler
|
|
.endm
|
|
|
|
.macro clearmonbg battler:req
|
|
.byte 0xb
|
|
.byte \battler
|
|
.endm
|
|
|
|
.macro setalpha eva:req, evb:req
|
|
.byte 0x0C
|
|
.2byte ((\evb) << 8) | (\eva)
|
|
.endm
|
|
|
|
.macro blendoff
|
|
.byte 0xd
|
|
.endm
|
|
|
|
.macro call ptr:req
|
|
.byte 0xe
|
|
.4byte \ptr
|
|
.endm
|
|
|
|
.macro return
|
|
.byte 0xf
|
|
.endm
|
|
|
|
.macro setarg argId:req, value:req
|
|
.byte 0x10
|
|
.byte \argId
|
|
.2byte \value
|
|
.endm
|
|
|
|
.macro choosetwoturnanim ptr1:req, ptr2:req
|
|
.byte 0x11
|
|
.4byte \ptr1
|
|
.4byte \ptr2
|
|
.endm
|
|
|
|
.macro jumpifmoveturn value:req, ptr:req
|
|
.byte 0x12
|
|
.byte \value
|
|
.4byte \ptr
|
|
.endm
|
|
|
|
.macro goto ptr:req
|
|
.byte 0x13
|
|
.4byte \ptr
|
|
.endm
|
|
|
|
.macro fadetobg bg:req
|
|
.byte 0x14
|
|
.byte \bg
|
|
.endm
|
|
|
|
.macro restorebg
|
|
.byte 0x15
|
|
.endm
|
|
|
|
.macro waitbgfadeout
|
|
.byte 0x16
|
|
.endm
|
|
|
|
.macro waitbgfadein
|
|
.byte 0x17
|
|
.endm
|
|
|
|
.macro changebg bg:req
|
|
.byte 0x18
|
|
.byte \bg
|
|
.endm
|
|
|
|
.macro playsewithpan se:req, pan:req
|
|
.byte 0x19
|
|
.2byte \se
|
|
.byte \pan
|
|
.endm
|
|
|
|
.macro setpan pan:req
|
|
.byte 0x1a
|
|
.byte \pan
|
|
.endm
|
|
|
|
.macro panse se:req, currentPan:req, targetPan:req, incrementPan:req, delay:req
|
|
.byte 0x1b
|
|
.2byte \se
|
|
.byte \currentPan
|
|
.byte \targetPan
|
|
.byte \incrementPan
|
|
.byte \delay
|
|
.endm
|
|
|
|
.macro loopsewithpan se:req, pan:req, wait:req, times:req
|
|
.byte 0x1c
|
|
.2byte \se
|
|
.byte \pan
|
|
.byte \wait
|
|
.byte \times
|
|
.endm
|
|
|
|
.macro waitplaysewithpan se:req, pan:req, wait:req
|
|
.byte 0x1d
|
|
.2byte \se
|
|
.byte \pan
|
|
.byte \wait
|
|
.endm
|
|
|
|
.macro setbldcnt bldcnt:req
|
|
.byte 0x1e
|
|
.2byte \bldcnt
|
|
.endm
|
|
|
|
.macro createsoundtask addr:req, argv:vararg
|
|
.byte 0x1F
|
|
.4byte \addr
|
|
.byte (.Lcreatetask_1F_\@_2 - .Lcreatetask_1F_\@_1) / 2
|
|
.Lcreatetask_1F_\@_1:
|
|
.2byte \argv
|
|
.Lcreatetask_1F_\@_2:
|
|
.endm
|
|
|
|
.macro waitsound
|
|
.byte 0x20
|
|
.endm
|
|
|
|
.macro jumpargeq argId:req, value:req, ptr:req
|
|
.byte 0x21
|
|
.byte \argId
|
|
.2byte \value
|
|
.4byte \ptr
|
|
.endm
|
|
|
|
.macro monbg_static battler:req
|
|
.byte 0x22
|
|
.byte \battler
|
|
.endm
|
|
|
|
.macro clearmonbg_static battler:req
|
|
.byte 0x23
|
|
.byte \battler
|
|
.endm
|
|
|
|
.macro jumpifcontest ptr:req
|
|
.byte 0x24
|
|
.4byte \ptr
|
|
.endm
|
|
|
|
.macro fadetobgfromset bgOpponent:req, bgPlayer:req, bgContest:req
|
|
.byte 0x25
|
|
.byte \bgOpponent
|
|
.byte \bgPlayer
|
|
.byte \bgContest
|
|
.endm
|
|
|
|
.macro panse_adjustnone se:req, currentPan:req, targetPan:req, incrementPan:req, delay:req
|
|
.byte 0x26
|
|
.2byte \se
|
|
.byte \currentPan
|
|
.byte \targetPan
|
|
.byte \incrementPan
|
|
.byte \delay
|
|
.endm
|
|
|
|
.macro panse_adjustall se:req, currentPan:req, targetPan:req, incrementPan:req, delay:req
|
|
.byte 0x27
|
|
.2byte \se
|
|
.byte \currentPan
|
|
.byte \targetPan
|
|
.byte \incrementPan
|
|
.byte \delay
|
|
.endm
|
|
|
|
.macro splitbgprio battler:req
|
|
.byte 0x28
|
|
.byte \battler
|
|
.endm
|
|
|
|
.macro splitbgprio_all
|
|
.byte 0x29
|
|
.endm
|
|
|
|
.macro splitbgprio_foes battler:req
|
|
.byte 0x2a
|
|
.byte \battler
|
|
.endm
|
|
|
|
.macro invisible battler:req
|
|
.byte 0x2b
|
|
.byte \battler
|
|
.endm
|
|
|
|
.macro visible battler:req
|
|
.byte 0x2c
|
|
.byte \battler
|
|
.endm
|
|
|
|
.macro teamattack_moveback battler:req
|
|
.byte 0x2d
|
|
.byte \battler
|
|
.endm
|
|
|
|
.macro teamattack_movefwd battler:req
|
|
.byte 0x2e
|
|
.byte \battler
|
|
.endm
|
|
|
|
.macro stopsound
|
|
.byte 0x2f
|
|
.endm
|
|
|
|
@ useful macros
|
|
.macro jumpreteq value:req, ptr:req
|
|
jumpargeq ARG_RET_ID, \value, \ptr
|
|
.endm
|
|
|
|
.macro jumprettrue ptr:req
|
|
jumpreteq TRUE, \ptr
|
|
.endm
|
|
|
|
.macro jumpretfalse ptr:req
|
|
jumpreteq FALSE, \ptr
|
|
.endm
|