pokecrystal-board/audio/music/ruinsofalphradio.asm

74 lines
1.2 KiB
NASM
Raw Normal View History

2018-06-24 07:09:41 -07:00
Music_RuinsOfAlphRadio:
2015-12-07 08:28:58 -08:00
musicheader 3, 1, Music_RuinsOfAlphRadio_Ch1
musicheader 1, 2, Music_RuinsOfAlphRadio_Ch2
musicheader 1, 3, Music_RuinsOfAlphRadio_Ch3
2012-11-30 02:52:23 -08:00
2018-06-24 07:09:41 -07:00
Music_RuinsOfAlphRadio_Ch1:
2013-11-06 22:18:50 -08:00
tempo 160
2012-11-30 02:52:23 -08:00
volume $77
2013-11-06 22:18:50 -08:00
dutycycle $0
tone $0118
vibrato $0, $f0
2012-11-30 02:52:23 -08:00
stereopanning $f0
.mainloop:
2013-11-06 22:18:50 -08:00
notetype $6, $71
callchannel .sub1
2013-11-06 22:18:50 -08:00
notetype $c, $a1
note __, 16
note __, 16
callchannel .sub2
2013-11-06 22:18:50 -08:00
notetype $c, $a1
note __, 16
note __, 16
callchannel .sub1
2013-11-06 22:18:50 -08:00
notetype $c, $a1
note __, 16
loopchannel 0, .mainloop
2013-11-06 22:18:50 -08:00
.sub1:
2013-11-06 22:18:50 -08:00
octave 4
note G_, 1
note F#, 1
note G_, 1
note F#, 1
note C_, 8
2013-11-06 22:18:50 -08:00
endchannel
.sub2:
2013-11-06 22:18:50 -08:00
octave 4
note G_, 1
note F#, 1
note G_, 1
note F#, 1
note C_, 4
note G_, 1
2013-11-06 22:18:50 -08:00
octave 5
note C_, 8
2013-11-06 22:18:50 -08:00
endchannel
2018-06-24 07:09:41 -07:00
Music_RuinsOfAlphRadio_Ch2:
2013-11-06 22:18:50 -08:00
dutycycle $1
vibrato $1, $e0
.mainloop:
2013-11-06 22:18:50 -08:00
stereopanning $f
notetype $6, $81
callchannel Music_RuinsOfAlphRadio_Ch1.sub1
2013-11-06 22:18:50 -08:00
notetype $c, $a1
note __, 16
note __, 16
2013-11-06 22:18:50 -08:00
notetype $6, $81
callchannel Music_RuinsOfAlphRadio_Ch1.sub2
2013-11-06 22:18:50 -08:00
notetype $c, $a1
note __, 16
loopchannel 0, .mainloop
2012-11-30 02:52:23 -08:00
2018-06-24 07:09:41 -07:00
Music_RuinsOfAlphRadio_Ch3:
2013-11-06 22:18:50 -08:00
notetype $6, $26
.mainloop:
2013-11-06 22:18:50 -08:00
octave 2
note C_, 1
note C#, 1
note C_, 1
note __, 16
loopchannel 0, .mainloop