mirror of https://github.com/pret/pokecrystal.git
266 lines
3.9 KiB
NASM
266 lines
3.9 KiB
NASM
musicheader: macro
|
|
; number of tracks, track idx, address
|
|
dbw ((\1 - 1) << 6) + (\2 - 1), \3
|
|
endm
|
|
|
|
note: MACRO
|
|
dn (\1), (\2) - 1
|
|
ENDM
|
|
|
|
sound: macro
|
|
note \1, \2
|
|
db \3 ; intensity
|
|
dw \4 ; frequency
|
|
endm
|
|
|
|
noise: macro
|
|
note \1, \2 ; duration
|
|
db \3 ; intensity
|
|
db \4 ; frequency
|
|
endm
|
|
|
|
; MusicCommands indexes (see audio/engine.asm)
|
|
enum_start $d8
|
|
|
|
enum notetype_cmd ; $d8
|
|
octave: macro
|
|
db notetype_cmd - (\1)
|
|
endm
|
|
|
|
notetype: macro
|
|
db notetype_cmd
|
|
db \1 ; note_length
|
|
if _NARG >= 2
|
|
db \2 ; intensity
|
|
endc
|
|
endm
|
|
|
|
enum pitchoffset_cmd ; $d9
|
|
pitchoffset: macro
|
|
db pitchoffset_cmd
|
|
dn \1, \2 - 1 ; octave, key
|
|
endm
|
|
|
|
enum tempo_cmd ; $da
|
|
tempo: macro
|
|
db tempo_cmd
|
|
bigdw \1 ; tempo
|
|
endm
|
|
|
|
enum dutycycle_cmd ; $db
|
|
dutycycle: macro
|
|
db dutycycle_cmd
|
|
db \1 ; duty_cycle
|
|
endm
|
|
|
|
enum intensity_cmd ; $dc
|
|
intensity: macro
|
|
db intensity_cmd
|
|
db \1 ; intensity
|
|
endm
|
|
|
|
enum soundinput_cmd ; $dd
|
|
soundinput: macro
|
|
db soundinput_cmd
|
|
db \1 ; input
|
|
endm
|
|
|
|
enum sound_duty_cmd ; $de
|
|
sound_duty: macro
|
|
db sound_duty_cmd
|
|
if _NARG == 4
|
|
db \1 | (\2 << 2) | (\3 << 4) | (\4 << 6) ; duty sequence
|
|
else
|
|
db \1 ; one-byte duty value for legacy support
|
|
endc
|
|
endm
|
|
|
|
enum togglesfx_cmd ; $df
|
|
togglesfx: macro
|
|
db togglesfx_cmd
|
|
endm
|
|
|
|
enum slidepitchto_cmd ; $e0
|
|
slidepitchto: macro
|
|
db slidepitchto_cmd
|
|
db \1 - 1 ; duration
|
|
dn \2, \3 ; octave, pitch
|
|
endm
|
|
|
|
enum vibrato_cmd ; $e1
|
|
vibrato: macro
|
|
db vibrato_cmd
|
|
db \1 ; delay
|
|
db \2 ; extent
|
|
endm
|
|
|
|
enum unknownmusic0xe2_cmd ; $e2
|
|
unknownmusic0xe2: macro
|
|
db unknownmusic0xe2_cmd
|
|
db \1 ; unknown
|
|
endm
|
|
|
|
enum togglenoise_cmd ; $e3
|
|
togglenoise: macro
|
|
db togglenoise_cmd
|
|
db \1 ; id
|
|
endm
|
|
|
|
enum panning_cmd ; $e4
|
|
panning: macro
|
|
db panning_cmd
|
|
db \1 ; tracks
|
|
endm
|
|
|
|
enum volume_cmd ; $e5
|
|
volume: macro
|
|
db volume_cmd
|
|
db \1 ; volume
|
|
endm
|
|
|
|
enum tone_cmd ; $e6
|
|
tone: macro
|
|
db tone_cmd
|
|
bigdw \1 ; tone
|
|
endm
|
|
|
|
enum unknownmusic0xe7_cmd ; $e7
|
|
unknownmusic0xe7: macro
|
|
db unknownmusic0xe7_cmd
|
|
db \1 ; unknown
|
|
endm
|
|
|
|
enum unknownmusic0xe8_cmd ; $e8
|
|
unknownmusic0xe8: macro
|
|
db unknownmusic0xe8_cmd
|
|
db \1 ; unknown
|
|
endm
|
|
|
|
enum tempo_relative_cmd ; $e9
|
|
tempo_relative: macro
|
|
db tempo_relative_cmd
|
|
bigdw \1 ; value
|
|
endm
|
|
|
|
enum restartchannel_cmd ; $ea
|
|
restartchannel: macro
|
|
db restartchannel_cmd
|
|
dw \1 ; address
|
|
endm
|
|
|
|
enum newsong_cmd ; $eb
|
|
newsong: macro
|
|
db newsong_cmd
|
|
bigdw \1 ; id
|
|
endm
|
|
|
|
enum sfxpriorityon_cmd ; $ec
|
|
sfxpriorityon: macro
|
|
db sfxpriorityon_cmd
|
|
endm
|
|
|
|
enum sfxpriorityoff_cmd ; $ed
|
|
sfxpriorityoff: macro
|
|
db sfxpriorityoff_cmd
|
|
endm
|
|
|
|
enum unknownmusic0xee_cmd ; $ee
|
|
unknownmusic0xee: macro
|
|
db unknownmusic0xee_cmd
|
|
dw \1 ; address
|
|
endm
|
|
|
|
enum stereopanning_cmd ; $ef
|
|
stereopanning: macro
|
|
db stereopanning_cmd
|
|
db \1 ; tracks
|
|
endm
|
|
|
|
enum sfxtogglenoise_cmd ; $f0
|
|
sfxtogglenoise: macro
|
|
db sfxtogglenoise_cmd
|
|
db \1 ; id
|
|
endm
|
|
|
|
enum music0xf1_cmd ; $f1
|
|
music0xf1: macro
|
|
db music0xf1_cmd
|
|
endm
|
|
|
|
enum music0xf2_cmd ; $f2
|
|
music0xf2: macro
|
|
db music0xf2_cmd
|
|
endm
|
|
|
|
enum music0xf3_cmd ; $f3
|
|
music0xf3: macro
|
|
db music0xf3_cmd
|
|
endm
|
|
|
|
enum music0xf4_cmd ; $f4
|
|
music0xf4: macro
|
|
db music0xf4_cmd
|
|
endm
|
|
|
|
enum music0xf5_cmd ; $f5
|
|
music0xf5: macro
|
|
db music0xf5_cmd
|
|
endm
|
|
|
|
enum music0xf6_cmd ; $f6
|
|
music0xf6: macro
|
|
db music0xf6_cmd
|
|
endm
|
|
|
|
enum music0xf7_cmd ; $f7
|
|
music0xf7: macro
|
|
db music0xf7_cmd
|
|
endm
|
|
|
|
enum music0xf8_cmd ; $f8
|
|
music0xf8: macro
|
|
db music0xf8_cmd
|
|
endm
|
|
|
|
enum unknownmusic0xf9_cmd ; $f9
|
|
unknownmusic0xf9: macro
|
|
db unknownmusic0xf9_cmd
|
|
endm
|
|
|
|
enum setcondition_cmd ; $fa
|
|
setcondition: macro
|
|
db setcondition_cmd
|
|
db \1 ; condition
|
|
endm
|
|
|
|
enum jumpif_cmd ; $fb
|
|
jumpif: macro
|
|
db jumpif_cmd
|
|
db \1 ; condition
|
|
dw \2 ; address
|
|
endm
|
|
|
|
enum jumpchannel_cmd ; $fc
|
|
jumpchannel: macro
|
|
db jumpchannel_cmd
|
|
dw \1 ; address
|
|
endm
|
|
|
|
enum loopchannel_cmd ; $fd
|
|
loopchannel: macro
|
|
db loopchannel_cmd
|
|
db \1 ; count
|
|
dw \2 ; address
|
|
endm
|
|
|
|
enum callchannel_cmd ; $fe
|
|
callchannel: macro
|
|
db callchannel_cmd
|
|
dw \1 ; address
|
|
endm
|
|
|
|
enum endchannel_cmd ; $ff
|
|
endchannel: macro
|
|
db endchannel_cmd
|
|
endm
|