#define stereo

#include "notes2.inc"
tempo .equ 137
#include "tempo2.inc"

	ret
	.db "Calcmod",0
	.db "Music from Casper",0
	.dw 1,0
	.db 3
ds:
	.dw channel1-ds
	.dw channel2-ds

channel1:
	note(e4,quarter)
	note(e4,eighth)
	note(c5,eighth)
	note(e4,quarter)
	note(e4,eighth)
	note(c5,eighth)

	note(e4,eighth)
	note(c5,eighth)
	note(b4,eighth)
	note(a4,eighth)
	note(g4,eighth)
	note(a4,eighth)
	note(b4,eighth)
	note(g4,eighth)

	note(e4,quarter)
	note(e4,eighth)
	note(b4,eighth)
	note(e4,quarter)
	note(e4,eighth)
	note(b4,eighth)

	note(e4,eighth)
	note(b4,eighth)
	note(e4,eighth)
	note(b4,eighth)
	note(e4,quarter)
	note(rest,quarter)

	note(e4,quarter)
	note(e4,eighth)
	note(c5,eighth)
	note(e4,quarter)
	note(e4,eighth)
	note(c5,eighth)

	note(e4,eighth)
	note(c5,eighth)
	note(b4,eighth)
	note(a4,eighth)
	note(g4,eighth)
	note(a4,eighth)
	note(b4,eighth)
	note(g4,eighth)

	note(e4,quarter)
	note(e4,eighth)
	note(b4,eighth)
	note(e4,quarter)
	note(e4,eighth)
	note(b4,eighth)	

	note(e4,whole)

	note(c4,quarter)
	note(c4,eighth)
	note(a4,eighth)
	note(c4,quarter)
	note(c4,eighth)
	note(a4,eighth)

	note(c4,eighth)
	note(a4,eighth)
	note(g4,eighth)
	note(f4,eighth)
	note(e4,eighth)
	note(d4,eighth)
	note(e4,eighth)
	note(f4,eighth)

	note(d4,quarter)
	note(d4,eighth)
	note(a4,eighth)
	note(d4,quarter)
	note(d4,eighth)
	note(a4,eighth)

	note(d4,quarter)
	note(d4,eighth)
	note(e4,eighth)
	note(f4,quarter)
	note(e4,eighth)
	note(d4,eighth)

	note(gs3,half)
	note(rest,half*3)
	
	note(d3,sixteenth)
	note(a3,sixteenth)
	note(d4,whole)
	note(rest,eighth*3)
	note(d3,quarter)
	note(f3,quarter)
tempo .set 108
	note(e4,quarter)
	note(e4,eighth)
	note(c5,eighth)
	note(e4,quarter)
	note(e4,eighth)
	note(c5,eighth)

	note(e4,eighth)
	note(c5,eighth)
	note(b4,eighth)
	note(a4,eighth)
	note(g4,eighth)
	note(a4,eighth)
	note(b4,eighth)
	note(g4,eighth)

	note(a3,whole)

	note(e4,quarter)
	note(e4,eighth)
	note(c5,eighth)
	note(e4,quarter)
	note(e4,eighth)
	note(c5,eighth)

	note(e4,eighth)
	note(c5,eighth)
	note(b4,eighth)
	note(a4,eighth)
	note(g4,eighth)
	note(a4,eighth)
	note(b4,eighth)
	note(g4,eighth)

	note(a4,whole)

tempo .set 137

	note(d2,eighth)
	note(a2,eighth)
	note(a3,eighth)
	note(d4,eighth)
	note(a4,eighth)
	note(d4,eighth)
	note(a3,eighth)
	note(a2,eighth)

	note(fs2,eighth)
	note(cs3,eighth)
	note(fs3,eighth)
	note(cs4,eighth)
	note(fs4,eighth)
	note(cs4,eighth)
	note(fs3,eighth)
	note(cs3,eighth)

	note(d2,eighth)
	note(a2,eighth)
	note(a3,eighth)
	note(d4,eighth)
	note(a4,eighth)
	note(d4,eighth)
	note(a3,eighth)
	note(a2,eighth)

	note(fs2,eighth)
	note(cs3,eighth)
	note(fs3,eighth)
	note(cs4,eighth)
	note(fs4,eighth)
	note(cs4,eighth)
	note(fs3,eighth)
	note(rest,eighth)

	note(g2,eighth)
	note(d3,eighth)
	note(g3,eighth)
	note(d4,eighth)
	note(g4,eighth)
	note(d4,eighth)
	note(g3,eighth)
	note(d3,eighth)

	note(b2,eighth)
	note(fs3,eighth)
	note(b3,eighth)
	note(fs4,eighth)
	note(b4,eighth)
	note(fs4,eighth)
	note(b3,eighth)
	note(fs3,eighth)

	note(g2,eighth)
	note(d3,eighth)
	note(g3,eighth)
	note(d4,eighth)
	note(g4,eighth)
	note(d4,eighth)
	note(g3,eighth)
	note(d3,eighth)

	note(b2,eighth)
	note(fs3,eighth)
	note(b3,eighth)
	note(fs4,eighth)
	note(b4,eighth)
	note(fs4,eighth)
	note(b3,eighth)
	note(fs3,eighth)

	note(d3,whole)
	note(fs3,whole)
	note(b3,whole*2)

	note(d2,eighth)
	note(a2,eighth)
	note(a3,eighth)
	note(d4,eighth)
	note(a4,eighth)
	note(d4,eighth)
	note(a3,eighth)
	note(a2,eighth)

	note(a3,whole)

	note(d3,quarter)
	note(a3,quarter)
	note(d4,quarter)
	note(cs4,eighth)
	note(b3,eighth)

	note(a3,whole)

	note(d4,quarter)
	note(cs4,quarter)
	note(b3,quarter)
	note(a3,quarter)

	note(d4,whole)

	note(d4,quarter)
	note(cs4,quarter)
	note(b3,quarter)
	note(a3,quarter)
	
	note(d4,whole)	

	note(d3,quarter)
	note(a3,quarter)
	note(g4,quarter)
	note(fs4,quarter)

	note(e4,quarter)
	note(fs4,quarter)
	note(e4,quarter)
	note(d4,quarter)

	note(cs4,quarter)
	note(d4,eighth)
	note(e4,eighth)
	note(d4,quarter)
	note(cs4,eighth)
	note(b3,eighth)

	note(a3,quarter)
	note(g3,quarter)
	note(fs3,quarter)
	note(e3,quarter)

	note(d3,quarter)
	note(a3,quarter)
	note(d4,quarter)
	note(cs4,quarter)

	note(a3,half)
	note(g3,half)

	note(fs3,quarter)
	note(g3,quarter)
	note(e3,quarter)
	note(fs3,quarter)

	note(d3,half)
	note(a4,half)

	note(a4,half) ;chord
	note(b4,quarter)
	note(a4,quarter)

	note(g4,quarter) ;chord
	note(e5,quarter)
	note(c5,quarter)
	note(g4,quarter)

	note(g4,half) ;chord
	note(a4,quarter)
	note(g3,quarter)
	
	note(fs3,eighth*3) ;chord	

	note(a2,eighth)
	note(d3,eighth)
	note(fs3,eighth)
	note(a3,eighth)
	note(fs4,eighth)

	note(e4,quarter)
	note(e4,eighth)
	note(c5,eighth)
	note(e4,quarter)
	note(e4,eighth)
	note(c5,eighth)

	note(e4,eighth)
	note(c5,eighth)
	note(b4,eighth)
	note(a4,eighth)
	note(g4,eighth)
	note(a4,eighth)
	note(b4,eighth)
	note(g4,eighth)

	note(e4,quarter)
	note(e4,eighth)
	note(b4,eighth)
	note(e4,quarter)
	note(e4,eighth)
	note(b4,eighth)

	note(e4,eighth)
	note(b4,eighth)
	note(e4,eighth)
	note(b4,eighth)
	note(e4,quarter)
	note(rest,quarter)

	note(e4,quarter)
	note(e4,eighth)
	note(c5,eighth)
	note(e4,quarter)
	note(e4,eighth)
	note(c5,eighth)

	note(e4,eighth)
	note(c5,eighth)
	note(b4,eighth)
	note(a4,eighth)
	note(g4,eighth)
	note(a4,eighth)
	note(b4,eighth)
	note(g4,eighth)

	note(e4,quarter)
	note(e4,eighth)
	note(b4,eighth)
	note(e4,quarter)
	note(e4,eighth)
	note(b4,eighth)	

	note(e4,whole)	

	note(c4,quarter)
	note(c4,eighth)
	note(a4,eighth)
	note(c4,quarter)
	note(c4,eighth)
	note(a4,eighth)

	note(c4,eighth)
	note(a4,eighth)
	note(g4,eighth)
	note(f4,eighth)
	note(e4,eighth)
	note(d4,eighth)
	note(e4,eighth)
	note(f4,eighth)

	note(d4,quarter)
	note(d4,eighth)
	note(a4,eighth)
	note(d4,quarter)
	note(d4,eighth)
	note(a4,eighth)

	note(d4,quarter)
	note(d4,eighth)
	note(e4,eighth)
	note(f4,quarter)
	note(e4,eighth)
	note(d4,eighth)

	note(cs4,half)
	note(e4,half)
	
	note(d4,half)
	note(g4,half)

	note(d3,quarter)
	note(a3,quarter)
	note(g4,quarter)
	note(fs4,quarter)
	
	note(e4,quarter)
	note(fs4,quarter)
	note(e4,quarter)
	note(d4,quarter)

	note(cs4,quarter)
	note(d4,eighth)
	note(e4,eighth)
	note(d4,quarter)
	note(cs4,eighth)
	note(b3,eighth)
	
	note(a3,quarter)
	note(g3,quarter)
	note(fs3,quarter)
	note(e3,quarter)

;copy from here

	note(g3,eighth)
	note(fs3,eighth)
	note(e3,eighth)
	note(g3,eighth)
	note(fs3,half)
	
	note(d3,half)
	note(g3,quarter)
	note(a4,eighth) ;begin octave
	note(g4,eighth)

	note(g4,eighth)
	note(fs4,eighth)
	note(e4,eighth)
	note(g4,eighth)
	note(fs4,half) ;end octave

	note(d4,half) ; chord
tempo .set 133
	note(e4,half)
tempo .set 129
	note(fs4,quarter*5)
tempo .set 137
	note($FF,$FFFF)

channel2:
	note(a2,eighth)
	note(e3,eighth)
	note(a3,eighth)
	note(e3,eighth)
	note(b3,eighth)
	note(e3,eighth)
	note(c4,eighth)
	note(e3,eighth)

	note(a2,eighth)
	note(e3,eighth)
	note(a3,eighth)
	note(e3,eighth)
	note(b3,eighth)
	note(e3,eighth)
	note(c4,eighth)
	note(e3,eighth)

	note(e2,eighth)
	note(b2,eighth)
	note(e3,eighth)
	note(b2,eighth)
	note(g3,eighth)
	note(b2,eighth)
	note(fs3,eighth)
	note(b2,eighth)

	note(e2,eighth)
	note(b2,eighth)
	note(g3,eighth)
	note(b2,eighth)
	note(fs3,eighth)
	note(b2,eighth)
	note(g3,eighth)
	note(b2,eighth)
	
	note(a2,eighth)
	note(e3,eighth)
	note(a3,eighth)
	note(e3,eighth)
	note(b3,eighth)
	note(e3,eighth)
	note(c4,eighth)
	note(e3,eighth)

	note(a2,eighth)
	note(e3,eighth)
	note(a3,eighth)
	note(e3,eighth)
	note(b3,eighth)
	note(e3,eighth)
	note(c4,eighth)
	note(e3,eighth)

	note(e2,eighth)
	note(b2,eighth)
	note(e3,eighth)
	note(b2,eighth)
	note(g3,eighth)
	note(b2,eighth)
	note(fs3,eighth)
	note(b2,eighth)

	note(e2,eighth)
	note(b2,eighth)
	note(g3,eighth)
	note(b2,eighth)
	note(fs3,eighth)
	note(b2,eighth)
	note(g3,eighth)
	note(b2,eighth)

	note(f2,eighth)
	note(c3,eighth)
	note(f3,eighth)
	note(c3,eighth)
	note(g3,eighth)
	note(c3,eighth)
	note(a3,eighth)
	note(c3,eighth)

	note(f2,eighth)
	note(c3,eighth)
	note(f3,eighth)
	note(c3,eighth)
	note(g3,eighth)
	note(c3,eighth)
	note(a3,eighth)
	note(c3,eighth)

	note(d2,eighth)
	note(a2,eighth)
	note(d3,eighth)
	note(a2,eighth)
	note(e3,eighth)
	note(a2,eighth)
	note(f3,eighth)
	note(a2,eighth)

	note(d2,eighth)
	note(a2,eighth)
	note(d3,eighth)
	note(a2,eighth)
	note(e3,eighth)
	note(a2,eighth)
	note(f3,eighth)
	note(a2,eighth)

	note(e1,eighth)
	note(b1,eighth)
	note(e2,eighth)
	note(gs2,eighth)
	note(b2,eighth)
	note(e3,eighth)
	note(gs3,eighth)
	note(b3,eighth)
	note(e4,half)
	note(rest,half)

	note(f2,sixteenth)
	note(f3,sixteenth)
	note(rest,eighth*7)
	note(rest,whole)
tempo .set 108
	note(a2,eighth)
	note(e3,eighth)
	note(a3,eighth)
	note(e3,eighth)
	note(b3,eighth)
	note(e3,eighth)
	note(c4,eighth)
	note(e3,eighth)

	note(a2,eighth)
	note(e3,eighth)
	note(a3,eighth)
	note(e3,eighth)
	note(c4,eighth)
	note(e3,eighth)
	note(b3,eighth)
	note(e3,eighth)

	note(fs3,whole)

	note(a2,eighth)
	note(e3,eighth)
	note(a3,eighth)
	note(e3,eighth)
	note(b3,eighth)
	note(e3,eighth)
	note(c4,eighth)
	note(e3,eighth)

	note(a2,eighth)
	note(e3,eighth)
	note(a3,eighth)
	note(e3,eighth)
	note(c4,eighth)
	note(e3,eighth)
	note(b3,eighth)
	note(e3,eighth)

	note(fs4,whole)
tempo .set 137

	note(d3,quarter)
	note(a3,quarter)
	note(d4,quarter)
	note(cs4,quarter)

	note(a3,whole)

	note(d3,quarter)
	note(a3,quarter)
	note(d4,quarter)
	note(cs4,eighth)
	note(b3,eighth)

	note(a3,whole)

	note(d4,quarter)
	note(cs4,quarter)
	note(b3,quarter)
	note(a3,quarter)

	note(d4,whole)

	note(d4,quarter)
	note(cs4,quarter)
	note(b3,quarter)
	note(a3,quarter)
	
	note(d4,whole)

	note(d3,quarter)
	note(a3,quarter)
	note(g4,quarter)
	note(fs4,quarter)

	note(e4,quarter)
	note(fs4,quarter)
	note(e4,quarter)
	note(d4,quarter)

	note(cs4,quarter)
	note(d4,eighth)
	note(e4,eighth)
	note(d4,quarter)
	note(cs4,eighth)
	note(b3,eighth)

	note(a3,quarter)
	note(g3,quarter)
	note(fs3,quarter)
	note(e3,quarter)

	note(g3,eighth)
	note(fs3,eighth)
	note(e3,eighth)
	note(g3,eighth)
	note(fs3,half)

	note(fs2,eighth)
	note(cs3,eighth)
	note(fs3,eighth)
	note(cs4,eighth)
	note(fs4,eighth)
	note(cs4,eighth)
	note(fs3,eighth)
	note(cs3,eighth)

	note(d2,eighth)
	note(a2,eighth)
	note(a3,eighth)
	note(d4,eighth)
	note(a4,eighth)
	note(d4,eighth)
	note(a3,eighth)
	note(a2,eighth)

	note(fs2,eighth)
	note(cs3,eighth)
	note(fs3,eighth)
	note(cs4,eighth)
	note(fs4,eighth)
	note(cs4,eighth)
	note(fs3,eighth)
	note(rest,eighth)

	note(g2,eighth)
	note(d3,eighth)
	note(g3,eighth)
	note(d4,eighth)
	note(g4,eighth)
	note(d4,eighth)
	note(g3,eighth)
	note(d3,eighth)

	note(b2,eighth)
	note(fs3,eighth)
	note(b3,eighth)
	note(fs4,eighth)
	note(b4,eighth)
	note(fs4,eighth)
	note(b3,eighth)
	note(fs3,eighth)

	note(g2,eighth)
	note(d3,eighth)
	note(g3,eighth)
	note(d4,eighth)
	note(g4,eighth)
	note(d4,eighth)
	note(g3,eighth)
	note(d3,eighth)

	note(b2,eighth)
	note(fs3,eighth)
	note(b3,eighth)
	note(fs4,eighth)
	note(b4,eighth)
	note(fs4,eighth)
	note(b3,eighth)
	note(fs3,eighth)

	note(d3,quarter)
	note(a3,quarter)
	note(g4,quarter)
	note(fs4,quarter)

	note(e4,quarter)
	note(fs4,quarter)
	note(e4,quarter)
	note(d4,quarter)

	note(cs4,quarter)
	note(d4,eighth)
	note(e4,eighth)
	note(d4,eighth)
	note(rest,eighth)
	note(cs4,eighth)
	note(b3,eighth)

	note(a3,quarter)
	note(g3,quarter)
	note(fs3,quarter)
	note(e3,quarter)

	note(d3,whole)

	note(a3,half)
	note(g3,half)

	note(fs3,quarter)
	note(g3,quarter)
	note(e3,quarter)
	note(fs3,quarter)

	note(d3,half)
	note(a4,half)

	note(f3,half) ;chord
	note(b4,quarter)
	note(a4,quarter)

	note(e3,quarter) ;chord
	note(e5,quarter)
	note(c5,quarter)
	note(g4,quarter)

	note(as3,half) ;chord
	note(a4,quarter)
	note(g3,quarter)
	
	note(d4,whole) ;chord	

	note(a2,eighth)
	note(e3,eighth)
	note(a3,eighth)
	note(e3,eighth)
	note(b3,eighth)
	note(e3,eighth)
	note(c4,eighth)
	note(e3,eighth)

	note(a2,eighth)
	note(e3,eighth)
	note(a3,eighth)
	note(e3,eighth)
	note(b3,eighth)
	note(e3,eighth)
	note(c4,eighth)
	note(e3,eighth)

	note(e2,eighth)
	note(b2,eighth)
	note(e3,eighth)
	note(b2,eighth)
	note(g3,eighth)
	note(b2,eighth)
	note(fs3,eighth)
	note(b2,eighth)

	note(e2,eighth)
	note(b2,eighth)
	note(g3,eighth)
	note(b2,eighth)
	note(fs3,eighth)
	note(b2,eighth)
	note(g3,eighth)
	note(b2,eighth)
	
	note(a2,eighth)
	note(e3,eighth)
	note(a3,eighth)
	note(e3,eighth)
	note(b3,eighth)
	note(e3,eighth)
	note(c4,eighth)
	note(e3,eighth)

	note(a2,eighth)
	note(e3,eighth)
	note(a3,eighth)
	note(e3,eighth)
	note(b3,eighth)
	note(e3,eighth)
	note(c4,eighth)
	note(e3,eighth)

	note(e2,eighth)
	note(b2,eighth)
	note(e3,eighth)
	note(b2,eighth)
	note(g3,eighth)
	note(b2,eighth)
	note(fs3,eighth)
	note(b2,eighth)

	note(e2,eighth)
	note(b2,eighth)
	note(g3,eighth)
	note(b2,eighth)
	note(fs3,eighth)
	note(b2,eighth)
	note(g3,eighth)
	note(b2,eighth)

	note(f1,eighth)
	note(c2,eighth)
	note(f2,eighth)
	note(c2,eighth)
	note(g2,eighth)
	note(c2,eighth)
	note(a2,eighth)
	note(c2,eighth)

	note(f1,eighth)
	note(c2,eighth)
	note(f2,eighth)
	note(c2,eighth)
	note(g2,eighth)
	note(c2,eighth)
	note(a2,eighth)
	note(c2,eighth)

	note(d1,eighth)
	note(a1,eighth)
	note(d2,eighth)
	note(a1,eighth)
	note(e2,eighth)
	note(a1,eighth)
	note(f2,eighth)
	note(a1,eighth)

	note(d1,eighth)
	note(a1,eighth)
	note(d2,eighth)
	note(a1,eighth)
	note(e2,eighth)
	note(a1,eighth)
	note(f2,eighth)
	note(a1,eighth)

	note(e1,eighth)
	note(b1,eighth)
	note(e2,eighth)
	note(gs2,eighth)
	note(b2,eighth)
	note(e3,eighth)
	note(gs3,eighth)
	note(b3,eighth)

	note(e4,half)
	note(rest,half)

	note(fs4,quarter)
	note(a4,quarter)
	note(g4,quarter)
	note(fs4,quarter)
	
	note(e4,quarter)
	note(fs4,quarter)
	note(e4,quarter)
	note(d4,quarter)

	note(cs4,quarter)
	note(d4,eighth)
	note(e4,eighth)
	note(d4,quarter)
	note(cs4,eighth)
	note(b3,eighth)
	
	note(a3,quarter)
	note(g3,quarter)
	note(fs3,quarter)
	note(e3,quarter)

	note(d3,whole)

	note(d3,half)
	note(g3,quarter)
	note(a3,eighth) ;begin octave
	note(g3,eighth)

	note(g3,eighth)
	note(fs3,eighth)
	note(e3,eighth)
	note(g3,eighth)
	note(fs3,half) ;end octave

	note(fs3,half) ; chord
tempo .set 133
	note(e4,half)
tempo .set 129
	note(fs4,quarter*5)

	note($FF,$FFFF)
tempo .set 137
.end