pokecrystal-board/audio/music/burnedtower.asm

Music_BurnedTower:
	musicheader 4, 1, Music_BurnedTower_Ch1
	musicheader 1, 2, Music_BurnedTower_Ch2
	musicheader 1, 3, Music_BurnedTower_Ch3
	musicheader 1, 4, Music_BurnedTower_Ch4

Music_BurnedTower_Ch1:
	tempo 168
	volume $77
	dutycycle $1
	tone $0004
	vibrato $8, $45
	stereopanning $f0
	notetype $c, $91
	note __, 2
	octave 2
	note A_, 4
	note A_, 4
	note A_, 2
	intensity $80
	octave 3
	note D#, 6
	intensity $91
	note D_, 4
	note D_, 4
	note D_, 2
	intensity $80
	note C#, 6
.loop1:
	intensity $91
	octave 2
	note A_, 4
	note A_, 4
	note A_, 2
	intensity $80
	note A#, 6
	loopchannel 2, .loop1
	tempo 150
.mainloop:
	intensity $b1
	octave 2
	note A_, 4
	note A_, 4
	note A_, 2
	intensity $a0
	octave 3
	note D#, 6
	intensity $b1
	note D_, 4
	note D_, 4
	note D_, 2
	intensity $a0
	note C#, 6
	intensity $b1
	octave 2
	note A_, 4
	note A_, 4
	note A_, 2
	intensity $a0
	note A#, 6
	intensity $b1
	note A_, 4
	note A_, 4
	note A_, 2
	intensity $b3
	note A#, 16
	note A#, 16
	note A#, 16
	note G#, 6
	intensity $b1
	note A_, 4
	note A_, 4
	note A_, 2
	intensity $a0
	note A#, 6
	intensity $b1
	note B_, 4
	note B_, 4
	note B_, 2
	intensity $a0
	octave 3
	note F_, 6
	intensity $b1
	note E_, 4
	note E_, 4
	note E_, 2
	intensity $a0
	note D#, 6
.loop2:
	intensity $b1
	octave 2
	note B_, 4
	note B_, 4
	note B_, 2
	intensity $a0
	octave 3
	note C_, 6
	loopchannel 2, .loop2
	loopchannel 0, .mainloop

Music_BurnedTower_Ch2:
	dutycycle $2
	vibrato $20, $82
	tone $0002
	notetype $c, $70
	callchannel .sub1
	intensity $c5
.mainloop:
	callchannel .sub1
	intensity $c1
	dutycycle $3
	note __, 2
	octave 2
	note A_, 4
	note A_, 4
	note A_, 2
	intensity $b0
	octave 3
	note D#, 6
	intensity $c1
	note D_, 4
	note D_, 4
	note D_, 2
	intensity $b0
	note C#, 6
	intensity $c1
	octave 2
	note A_, 4
	note A_, 4
	note A_, 2
	intensity $b0
	note A#, 4
	intensity $c1
	intensity $c2
	octave 3
	note A_, 1
	note G_, 1
	note A_, 1
	octave 4
	note C_, 1
	vibrato $0, $0
	intensity $3d
	note E_, 8
	vibrato $20, $83
	intensity $b0
	octave 2
	note G_, 4
	dutycycle $2
	intensity $b0
	octave 3
	note F#, 4
	note E_, 2
	note F#, 2
	note G_, 4
	note B_, 4
	octave 4
	note C#, 4
	note D_, 2
	note C#, 2
	octave 3
	note B_, 4
	note G_, 4
	note F#, 4
	note E_, 2
	note F#, 2
	note G_, 4
	note E_, 4
	intensity $b7
	note F#, 16
	loopchannel 0, .mainloop

.sub1:
	octave 3
	note E_, 4
	note D_, 2
	note E_, 2
	note F_, 4
	note A_, 4
	note B_, 4
	octave 4
	note C_, 2
	octave 3
	note B_, 2
	note A_, 4
	note F_, 4
	note E_, 4
	note D_, 2
	note E_, 2
	note F_, 4
	note D_, 4
	note E_, 16
	endchannel

Music_BurnedTower_Ch3:
	stereopanning $f
	notetype $c, $14
	note __, 16
	note __, 16
	note __, 16
	note __, 12
	octave 3
	note D#, 4
.mainloop:
.loop1:
	octave 2
	note A_, 2
	octave 3
	note E_, 2
	note __, 2
	note E_, 2
	note __, 2
	note E_, 2
	note F_, 4
	octave 2
	note A_, 2
	octave 3
	note E_, 2
	note __, 2
	note E_, 2
	note __, 2
	note E_, 2
	note D#, 4
	loopchannel 4, .loop1
.loop2:
	octave 2
	note B_, 2
	octave 3
	note F#, 2
	note __, 2
	note F#, 2
	note __, 2
	note F#, 2
	note G_, 4
	octave 2
	note B_, 2
	octave 3
	note F#, 2
	note __, 2
	note F#, 2
	note __, 2
	note F#, 2
	note F_, 4
	loopchannel 2, .loop2
	loopchannel 0, .mainloop

Music_BurnedTower_Ch4:
	togglenoise $0
	notetype $c
.loop1:
	note __, 16
	loopchannel 4, .loop1
	note __, 2
.mainloop:
	stereopanning $f0
	note G_, 2
	note G#, 2
	note G_, 4
	note G#, 2
	note G_, 4
	loopchannel 0, .mainloop
Remove all address comments 2018-06-24 07:09:41 -07:00			`Music_BurnedTower:`
new and updated music macros 2015-12-07 08:28:58 -08:00			`musicheader 4, 1, Music_BurnedTower_Ch1`
			`musicheader 1, 2, Music_BurnedTower_Ch2`
			`musicheader 1, 3, Music_BurnedTower_Ch3`
			`musicheader 1, 4, Music_BurnedTower_Ch4`
parse and dump music data 2012-11-30 02:52:23 -08:00
Remove all address comments 2018-06-24 07:09:41 -07:00			`Music_BurnedTower_Ch1:`
dump the music again 2013-11-06 22:18:50 -08:00			`tempo 168`
parse and dump music data 2012-11-30 02:52:23 -08:00			`volume $77`
dump the music again 2013-11-06 22:18:50 -08:00			`dutycycle $1`
			`tone $0004`
			`vibrato $8, $45`
parse and dump music data 2012-11-30 02:52:23 -08:00			`stereopanning $f0`
dump the music again 2013-11-06 22:18:50 -08:00			`notetype $c, $91`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note __, 2`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 4`
			`note A_, 4`
			`note A_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $80`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note D#, 6`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $91`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note D_, 4`
			`note D_, 4`
			`note D_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $80`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note C#, 6`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.loop1:`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $91`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 4`
			`note A_, 4`
			`note A_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $80`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A#, 6`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 2, .loop1`
dump the music again 2013-11-06 22:18:50 -08:00			`tempo 150`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.mainloop:`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b1`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 4`
			`note A_, 4`
			`note A_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $a0`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note D#, 6`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b1`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note D_, 4`
			`note D_, 4`
			`note D_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $a0`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note C#, 6`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b1`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 4`
			`note A_, 4`
			`note A_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $a0`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A#, 6`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b1`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 4`
			`note A_, 4`
			`note A_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A#, 16`
			`note A#, 16`
			`note A#, 16`
			`note G#, 6`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b1`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 4`
			`note A_, 4`
			`note A_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $a0`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A#, 6`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b1`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note B_, 4`
			`note B_, 4`
			`note B_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $a0`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note F_, 6`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b1`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note E_, 4`
			`note E_, 4`
			`note E_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $a0`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note D#, 6`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.loop2:`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b1`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note B_, 4`
			`note B_, 4`
			`note B_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $a0`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note C_, 6`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 2, .loop2`
			`loopchannel 0, .mainloop`
parse and dump music data 2012-11-30 02:52:23 -08:00
Remove all address comments 2018-06-24 07:09:41 -07:00			`Music_BurnedTower_Ch2:`
dump the music again 2013-11-06 22:18:50 -08:00			`dutycycle $2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`vibrato $20, $82`
dump the music again 2013-11-06 22:18:50 -08:00			`tone $0002`
			`notetype $c, $70`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`callchannel .sub1`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $c5`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.mainloop:`
			`callchannel .sub1`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $c1`
dump the music again 2013-11-06 22:18:50 -08:00			`dutycycle $3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note __, 2`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 4`
			`note A_, 4`
			`note A_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b0`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note D#, 6`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $c1`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note D_, 4`
			`note D_, 4`
			`note D_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b0`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note C#, 6`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $c1`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 4`
			`note A_, 4`
			`note A_, 2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b0`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A#, 4`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $c1`
			`intensity $c2`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 1`
			`note G_, 1`
			`note A_, 1`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 4`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note C_, 1`
dump the music again 2013-11-06 22:18:50 -08:00			`vibrato $0, $0`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $3d`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note E_, 8`
parse and dump music data 2012-11-30 02:52:23 -08:00			`vibrato $20, $83`
			`intensity $b0`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note G_, 4`
dump the music again 2013-11-06 22:18:50 -08:00			`dutycycle $2`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b0`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note F#, 4`
			`note E_, 2`
			`note F#, 2`
			`note G_, 4`
			`note B_, 4`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 4`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note C#, 4`
			`note D_, 2`
			`note C#, 2`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note B_, 4`
			`note G_, 4`
			`note F#, 4`
			`note E_, 2`
			`note F#, 2`
			`note G_, 4`
			`note E_, 4`
parse and dump music data 2012-11-30 02:52:23 -08:00			`intensity $b7`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note F#, 16`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 0, .mainloop`
dump the music again 2013-11-06 22:18:50 -08:00
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.sub1:`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note E_, 4`
			`note D_, 2`
			`note E_, 2`
			`note F_, 4`
			`note A_, 4`
			`note B_, 4`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 4`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note C_, 2`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note B_, 2`
			`note A_, 4`
			`note F_, 4`
			`note E_, 4`
			`note D_, 2`
			`note E_, 2`
			`note F_, 4`
			`note D_, 4`
			`note E_, 16`
dump the music again 2013-11-06 22:18:50 -08:00			`endchannel`

Remove all address comments 2018-06-24 07:09:41 -07:00			`Music_BurnedTower_Ch3:`
dump the music again 2013-11-06 22:18:50 -08:00			`stereopanning $f`
			`notetype $c, $14`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note __, 16`
			`note __, 16`
			`note __, 16`
			`note __, 12`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note D#, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.mainloop:`
			`.loop1:`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 2`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note E_, 2`
			`note __, 2`
			`note E_, 2`
			`note __, 2`
			`note E_, 2`
			`note F_, 4`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 2`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note E_, 2`
			`note __, 2`
			`note E_, 2`
			`note __, 2`
			`note E_, 2`
			`note D#, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 4, .loop1`
			`.loop2:`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note B_, 2`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note F#, 2`
			`note __, 2`
			`note F#, 2`
			`note __, 2`
			`note F#, 2`
			`note G_, 4`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note B_, 2`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note F#, 2`
			`note __, 2`
			`note F#, 2`
			`note __, 2`
			`note F#, 2`
			`note F_, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 2, .loop2`
			`loopchannel 0, .mainloop`
parse and dump music data 2012-11-30 02:52:23 -08:00
Remove all address comments 2018-06-24 07:09:41 -07:00			`Music_BurnedTower_Ch4:`
dump the music again 2013-11-06 22:18:50 -08:00			`togglenoise $0`
			`notetype $c`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.loop1:`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note __, 16`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 4, .loop1`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note __, 2`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.mainloop:`
parse and dump music data 2012-11-30 02:52:23 -08:00			`stereopanning $f0`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note G_, 2`
			`note G#, 2`
			`note G_, 4`
			`note G#, 2`
			`note G_, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 0, .mainloop`