pokecrystal-board/audio/music/unioncave.asm

261 lines
3.4 KiB
NASM
Raw Normal View History

2018-06-24 07:09:41 -07:00
Music_UnionCave:
2015-12-07 08:28:58 -08:00
musicheader 4, 1, Music_UnionCave_Ch1
musicheader 1, 2, Music_UnionCave_Ch2
musicheader 1, 3, Music_UnionCave_Ch3
musicheader 1, 4, Music_UnionCave_Ch4
2012-11-30 02:52:23 -08:00
2018-06-24 07:09:41 -07:00
Music_UnionCave_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 $1
tone $0002
2012-11-30 02:52:23 -08:00
vibrato $18, $34
2013-11-06 22:18:50 -08:00
stereopanning $f
.mainloop:
2013-11-06 22:18:50 -08:00
notetype $c, $b3
.loop1:
callchannel .sub1
loopchannel 4, .loop1
.loop2:
2013-11-06 22:18:50 -08:00
octave 2
note G#, 2
2013-11-06 22:18:50 -08:00
octave 3
note C#, 2
note E_, 4
note C#, 2
note E_, 2
note F_, 4
loopchannel 8, .loop2
.loop3:
2013-11-06 22:18:50 -08:00
octave 2
note A_, 2
2013-11-06 22:18:50 -08:00
octave 3
note D_, 2
note F_, 4
note D_, 2
note F_, 2
note F#, 4
loopchannel 4, .loop3
note __, 4
2012-11-30 02:52:23 -08:00
intensity $80
note F_, 16
note F#, 16
note G_, 16
note F#, 16
note G_, 8
note F#, 8
note F_, 8
note E_, 8
note G_, 8
note F#, 8
2013-11-06 22:18:50 -08:00
octave 4
note C_, 8
2013-11-06 22:18:50 -08:00
octave 3
note A_, 8
2012-11-30 02:52:23 -08:00
intensity $95
2013-11-06 22:18:50 -08:00
tone $0004
callchannel .sub1
2013-11-06 22:18:50 -08:00
tone $0008
callchannel .sub1
2013-11-06 22:18:50 -08:00
tone $000c
callchannel .sub1
2013-11-06 22:18:50 -08:00
tone $0010
callchannel .sub1
2013-11-06 22:18:50 -08:00
tone $0002
loopchannel 0, .mainloop
2013-11-06 22:18:50 -08:00
.sub1:
2013-11-06 22:18:50 -08:00
octave 2
note G#, 2
2013-11-06 22:18:50 -08:00
octave 3
note C#, 2
note E_, 12
2013-11-06 22:18:50 -08:00
endchannel
2012-11-30 02:52:23 -08:00
2018-06-24 07:09:41 -07:00
Music_UnionCave_Ch2:
2013-11-06 22:18:50 -08:00
dutycycle $3
vibrato $8, $24
.mainloop:
2013-11-06 22:18:50 -08:00
notetype $c, $c4
callchannel .sub1
2012-11-30 02:52:23 -08:00
intensity $c5
callchannel .sub1
2012-11-30 02:52:23 -08:00
intensity $c7
callchannel .sub1
2012-11-30 02:52:23 -08:00
intensity $c4
note C#, 4
2013-11-06 22:18:50 -08:00
octave 3
note B_, 4
2013-11-06 22:18:50 -08:00
octave 4
note D_, 2
note E_, 2
note C#, 2
2013-11-06 22:18:50 -08:00
octave 3
note B_, 2
2013-11-06 22:18:50 -08:00
octave 4
note C#, 4
2013-11-06 22:18:50 -08:00
octave 3
note B_, 4
2013-11-06 22:18:50 -08:00
octave 4
note D_, 8
2013-11-06 22:18:50 -08:00
octave 3
note B_, 4
2013-11-06 22:18:50 -08:00
octave 4
note D_, 4
note F#, 2
note F_, 2
note C#, 2
2013-11-06 22:18:50 -08:00
octave 3
note B_, 2
2013-11-06 22:18:50 -08:00
octave 4
note C#, 8
note D_, 4
note C#, 4
note __, 4
2012-11-30 02:52:23 -08:00
intensity $a0
note C_, 16
note C#, 16
note D_, 16
note C#, 16
note E_, 16
note D#, 16
note A#, 16
note A_, 16
2012-11-30 02:52:23 -08:00
intensity $a5
2013-11-06 22:18:50 -08:00
vibrato $6, $44
callchannel .sub2
2013-11-06 22:18:50 -08:00
vibrato $4, $33
callchannel .sub2
2013-11-06 22:18:50 -08:00
vibrato $2, $22
callchannel .sub2
2013-11-06 22:18:50 -08:00
vibrato $1, $41
callchannel .sub2
2013-11-06 22:18:50 -08:00
vibrato $8, $24
loopchannel 0, .mainloop
2012-11-30 02:52:23 -08:00
.sub1:
2013-11-06 22:18:50 -08:00
octave 4
note C_, 4
2013-11-06 22:18:50 -08:00
octave 3
note A#, 4
2013-11-06 22:18:50 -08:00
octave 4
note C#, 2
note D#, 2
note C_, 2
2013-11-06 22:18:50 -08:00
octave 3
note A#, 2
2013-11-06 22:18:50 -08:00
octave 4
note C_, 4
2013-11-06 22:18:50 -08:00
octave 3
note A#, 4
2013-11-06 22:18:50 -08:00
octave 4
note C#, 8
2013-11-06 22:18:50 -08:00
octave 3
note A#, 4
2013-11-06 22:18:50 -08:00
octave 4
note C#, 4
note F_, 2
note E_, 2
note C_, 2
2013-11-06 22:18:50 -08:00
octave 3
note A#, 2
2013-11-06 22:18:50 -08:00
octave 4
note C_, 8
note C#, 4
note C_, 4
2013-11-06 22:18:50 -08:00
endchannel
2012-11-30 02:52:23 -08:00
.sub2:
2013-11-06 22:18:50 -08:00
octave 2
note G#, 2
2013-11-06 22:18:50 -08:00
octave 3
note C#, 2
note E_, 12
2013-11-06 22:18:50 -08:00
endchannel
2012-11-30 02:52:23 -08:00
2018-06-24 07:09:41 -07:00
Music_UnionCave_Ch3:
2013-11-06 22:18:50 -08:00
notetype $c, $16
2012-11-30 02:52:23 -08:00
stereopanning $f0
.mainloop:
.loop1:
note __, 16
loopchannel 7, .loop1
note __, 14
2013-11-06 22:18:50 -08:00
octave 4
note C_, 2
.loop2:
note __, 2
2013-11-06 22:18:50 -08:00
octave 3
note E_, 2
note __, 2
note E_, 2
note G#, 2
note E_, 2
note __, 2
2013-11-06 22:18:50 -08:00
octave 4
note C_, 2
loopchannel 4, .loop2
.loop3:
note __, 2
2013-11-06 22:18:50 -08:00
octave 3
note F_, 2
note __, 2
note F_, 2
note A_, 2
note F_, 2
note __, 2
2013-11-06 22:18:50 -08:00
octave 4
note C#, 2
loopchannel 4, .loop3
note __, 4
note C_, 8
2013-11-06 22:18:50 -08:00
octave 3
note B_, 8
note A#, 8
note A_, 8
2013-11-06 22:18:50 -08:00
octave 4
note C#, 8
note C_, 8
2013-11-06 22:18:50 -08:00
octave 3
note B_, 8
note A#, 8
.loop4:
note A_, 4
note G_, 4
note A#, 2
2013-11-06 22:18:50 -08:00
octave 4
note C_, 2
2013-11-06 22:18:50 -08:00
octave 3
note A_, 2
note G_, 2
loopchannel 3, .loop4
note A_, 4
note G_, 4
note A#, 8
.loop5:
note __, 16
loopchannel 4, .loop5
loopchannel 0, .mainloop
2013-11-06 22:18:50 -08:00
2018-06-24 07:09:41 -07:00
Music_UnionCave_Ch4:
2013-11-06 22:18:50 -08:00
togglenoise $1
notetype $c
.mainloop:
2012-11-30 02:52:23 -08:00
stereopanning $f0
note E_, 4
2012-11-30 02:52:23 -08:00
stereopanning $ff
note F_, 4
2013-11-06 22:18:50 -08:00
stereopanning $f
note G#, 4
note __, 8
2013-11-06 22:18:50 -08:00
stereopanning $f
note E_, 4
2012-11-30 02:52:23 -08:00
stereopanning $ff
note F_, 4
2012-11-30 02:52:23 -08:00
stereopanning $f0
note G#, 4
note __, 8
loopchannel 0, .mainloop
loopchannel 0, .mainloop ; unused