pokecrystal-board/audio/music/evolution.asm

Music_Evolution:
	musicheader 4, 1, Music_Evolution_Ch1
	musicheader 1, 2, Music_Evolution_Ch2
	musicheader 1, 3, Music_Evolution_Ch3
	musicheader 1, 4, Music_Evolution_Ch4

Music_Evolution_Ch1:
	tempo 132
	volume $77
	vibrato $6, $34
	tone $0001
	dutycycle $2
	notetype $c, $92
	octave 3
	slidepitchto 1, 4, A_
	note C_, 1
	slidepitchto 1, 4, A_
	note G_, 1
	slidepitchto 1, 4, A_
	note C_, 1
	slidepitchto 1, 4, A_
	note G_, 1
	note __, 4
	dutycycle $3
	stereopanning $f
.mainloop:
.loop1:
	callchannel .sub1
	notetype $c, $a4
	note F#, 4
	callchannel .sub1
	notetype $c, $a4
	note F#, 4
	loopchannel 2, .loop1
	callchannel .sub2
	notetype $c, $a4
	note G#, 4
	callchannel .sub2
	notetype $c, $a4
	note G#, 4
	loopchannel 0, .mainloop

.sub1:
	notetype $c, $a2
	octave 3
	note C_, 4
	note G_, 4
	note C_, 4
	note G_, 4
	note C_, 4
	note G_, 4
	note C_, 4
	endchannel

.sub2:
	notetype $c, $a2
	octave 3
	note D_, 4
	note A_, 4
	note D_, 4
	note A_, 4
	note D_, 4
	note A_, 4
	note D_, 4
	endchannel

Music_Evolution_Ch2:
	dutycycle $2
	vibrato $8, $25
	notetype $c, $a2
	octave 4
	note G_, 1
	note D_, 1
	note G_, 1
	note D_, 1
	note __, 4
	dutycycle $3
	stereopanning $f0
.mainloop:
.loop1:
	callchannel .sub1
	notetype $c, $b5
	note A_, 4
	callchannel .sub1
	notetype $c, $b5
	note B_, 4
	loopchannel 2, .loop1
	callchannel .sub2
	notetype $c, $b5
	note B_, 4
	callchannel .sub2
	notetype $c, $b5
	octave 4
	note C#, 4
	octave 3
	loopchannel 0, .mainloop

.sub1:
	notetype $c, $b2
	octave 3
	note G_, 4
	note D_, 4
	note G_, 4
	note D_, 4
	note G_, 4
	note D_, 4
	note G_, 4
	endchannel

.sub2:
	notetype $c, $b2
	octave 3
	note A_, 4
	note E_, 4
	note A_, 4
	note E_, 4
	note A_, 4
	note E_, 4
	note A_, 4
	endchannel

Music_Evolution_Ch3:
	notetype $c, $16
	note __, 8
.mainloop:
.loop1:
	callchannel .sub1
	octave 3
	note A_, 4
	callchannel .sub1
	octave 3
	note B_, 4
	loopchannel 2, .loop1
	callchannel .sub2
	octave 3
	note B_, 4
	callchannel .sub2
	octave 4
	note C#, 4
	loopchannel 0, .mainloop

.sub1:
	octave 2
	note A_, 2
	note __, 2
	octave 3
	note D_, 2
	note __, 2
	octave 2
	note A_, 2
	note __, 2
	octave 3
	note D_, 2
	note __, 2
	octave 2
	note A_, 2
	note __, 2
	octave 3
	note D_, 2
	note __, 2
	octave 2
	note A_, 2
	note __, 2
	endchannel

.sub2:
	octave 2
	note B_, 2
	note __, 2
	octave 3
	note E_, 2
	note __, 2
	octave 2
	note B_, 2
	note __, 2
	octave 3
	note E_, 2
	note __, 2
	octave 2
	note B_, 2
	note __, 2
	octave 3
	note E_, 2
	note __, 2
	octave 2
	note A_, 2
	note __, 2
	endchannel

Music_Evolution_Ch4:
	togglenoise $5
	notetype $c
	note __, 8
.mainloop:
	stereopanning $f0
	note A#, 6
	note A#, 4
	stereopanning $f
	note E_, 2
	note E_, 2
	note E_, 2
	loopchannel 0, .mainloop
Remove all address comments 2018-06-24 07:09:41 -07:00			`Music_Evolution:`
new and updated music macros 2015-12-07 08:28:58 -08:00			`musicheader 4, 1, Music_Evolution_Ch1`
			`musicheader 1, 2, Music_Evolution_Ch2`
			`musicheader 1, 3, Music_Evolution_Ch3`
			`musicheader 1, 4, Music_Evolution_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_Evolution_Ch1:`
dump the music again 2013-11-06 22:18:50 -08:00			`tempo 132`
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			`vibrato $6, $34`
			`tone $0001`
			`dutycycle $2`
			`notetype $c, $92`
			`octave 3`
pitchoffset macro to replace forceoctave 2016-07-29 07:40:54 -07:00			`slidepitchto 1, 4, A_`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note C_, 1`
pitchoffset macro to replace forceoctave 2016-07-29 07:40:54 -07:00			`slidepitchto 1, 4, A_`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note G_, 1`
pitchoffset macro to replace forceoctave 2016-07-29 07:40:54 -07:00			`slidepitchto 1, 4, A_`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note C_, 1`
pitchoffset macro to replace forceoctave 2016-07-29 07:40:54 -07:00			`slidepitchto 1, 4, A_`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note G_, 1`
			`note __, 4`
dump the music again 2013-11-06 22:18:50 -08:00			`dutycycle $3`
			`stereopanning $f`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.mainloop:`
			`.loop1:`
			`callchannel .sub1`
dump the music again 2013-11-06 22:18:50 -08:00			`notetype $c, $a4`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note F#, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`callchannel .sub1`
dump the music again 2013-11-06 22:18:50 -08:00			`notetype $c, $a4`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note F#, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 2, .loop1`
			`callchannel .sub2`
dump the music again 2013-11-06 22:18:50 -08:00			`notetype $c, $a4`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note G#, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`callchannel .sub2`
dump the music again 2013-11-06 22:18:50 -08:00			`notetype $c, $a4`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note G#, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 0, .mainloop`
parse and dump music data 2012-11-30 02:52:23 -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			`notetype $c, $a2`
			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note C_, 4`
			`note G_, 4`
			`note C_, 4`
			`note G_, 4`
			`note C_, 4`
			`note G_, 4`
			`note C_, 4`
dump the music again 2013-11-06 22:18:50 -08:00			`endchannel`
parse and dump music data 2012-11-30 02:52:23 -08:00
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.sub2:`
dump the music again 2013-11-06 22:18:50 -08:00			`notetype $c, $a2`
			`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`
			`note A_, 4`
			`note D_, 4`
			`note A_, 4`
			`note D_, 4`
			`note A_, 4`
			`note D_, 4`
dump the music again 2013-11-06 22:18:50 -08:00			`endchannel`
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_Evolution_Ch2:`
dump the music again 2013-11-06 22:18:50 -08:00			`dutycycle $2`
			`vibrato $8, $25`
			`notetype $c, $a2`
			`octave 4`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note G_, 1`
			`note D_, 1`
			`note G_, 1`
			`note D_, 1`
			`note __, 4`
dump the music again 2013-11-06 22:18:50 -08:00			`dutycycle $3`
parse and dump music data 2012-11-30 02:52:23 -08:00			`stereopanning $f0`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.mainloop:`
			`.loop1:`
			`callchannel .sub1`
dump the music again 2013-11-06 22:18:50 -08:00			`notetype $c, $b5`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`callchannel .sub1`
dump the music again 2013-11-06 22:18:50 -08:00			`notetype $c, $b5`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note B_, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 2, .loop1`
			`callchannel .sub2`
dump the music again 2013-11-06 22:18:50 -08:00			`notetype $c, $b5`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note B_, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`callchannel .sub2`
dump the music again 2013-11-06 22:18:50 -08:00			`notetype $c, $b5`
			`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`
dump the music again 2013-11-06 22:18:50 -08:00			`octave 3`
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			`notetype $c, $b2`
			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note G_, 4`
			`note D_, 4`
			`note G_, 4`
			`note D_, 4`
			`note G_, 4`
			`note D_, 4`
			`note G_, 4`
dump the music again 2013-11-06 22:18:50 -08:00			`endchannel`

Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.sub2:`
dump the music again 2013-11-06 22:18:50 -08:00			`notetype $c, $b2`
			`octave 3`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 4`
			`note E_, 4`
			`note A_, 4`
			`note E_, 4`
			`note A_, 4`
			`note E_, 4`
			`note A_, 4`
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_Evolution_Ch3:`
dump the music again 2013-11-06 22:18:50 -08:00			`notetype $c, $16`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note __, 8`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.mainloop:`
			`.loop1:`
			`callchannel .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 A_, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`callchannel .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 B_, 4`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 2, .loop1`
			`callchannel .sub2`
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`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`callchannel .sub2`
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`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 0, .mainloop`
parse and dump music data 2012-11-30 02:52:23 -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 2`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note A_, 2`
			`note __, 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 D_, 2`
			`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_, 2`
			`note __, 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 D_, 2`
			`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_, 2`
			`note __, 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 D_, 2`
			`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_, 2`
			`note __, 2`
dump the music again 2013-11-06 22:18:50 -08:00			`endchannel`
parse and dump music data 2012-11-30 02:52:23 -08:00
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`.sub2:`
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`
			`note __, 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`
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`
			`note __, 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`
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`
			`note __, 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`
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`
			`note __, 2`
dump the music again 2013-11-06 22:18:50 -08:00			`endchannel`
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_Evolution_Ch4:`
dump the music again 2013-11-06 22:18:50 -08:00			`togglenoise $5`
			`notetype $c`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note __, 8`
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 A#, 6`
			`note A#, 4`
dump the music again 2013-11-06 22:18:50 -08:00			`stereopanning $f`
audio: note duration from 0-15 to 1-16 to match pokered 2013-12-28 17:32:05 -08:00			`note E_, 2`
			`note E_, 2`
			`note E_, 2`
Replace "branch" labels in music files with local names 2020-01-04 20:17:21 -08:00			`loopchannel 0, .mainloop`