tempo   =   60
#include "tempo.inc"
#include "notes.inc"

	ret
	.db "Calcmod",0
	.db "The Victors March",0

start:
	.dw g2,quarter/g2
	.dw 1,512
	.dw g2,eighth/g2
	.dw 1,512
	.dw g2,eighth/g2
	.dw 1,512
	.dw f2,quarter/f2
	.dw 1,512
	.dw f2,eighth/f2
	.dw 1,512
	.dw f2,eighth/f2
	.dw 1,512
	.dw e2,eighth/g2
	.dw 1,eighth
	.dw g2,eighth/g2
	.dw 1,512

	.dw e2,quarter/e2
	.dw 1,eighth
	.dw e2,quarter/e2
	.dw 1,512
	.dw c2,eighth/c2
	.dw 1,512
	.dw d2,eighth/d2
	.dw 1,512
	.dw e2,eighth/e2
	.dw 1,512
	.dw c2,eighth/c2
	.dw 1,512
	.dw d2,eighth/d2
	.dw 1,512
	.dw e2,eighth/e2
	.dw 1,512

	.dw f2,quarter/f2
	.dw 1,512
	.dw d2,eighth/d2
	.dw 1,512
	.dw e2,eighth/e2
	.dw 1,512
	.dw f2,eighth/f2
	.dw 1,512
	.dw d2,eighth/d2	
	.dw 1,512
	.dw e2,eighth/e2
	.dw 1,512
	.dw f2,eighth/f2
	.dw 1,512
	.dw g2,quarter/g2
	.dw 1,512
	.dw a2,quarter/a2
	.dw 1,512

	.dw e2,eighth/e2
	.dw 1,512
	.dw f2,eighth/f2
	.dw 1,512
	.dw c2,eighth/c2
	.dw 1,512
	.dw d2,eighth/d2
	.dw 1,512
	.dw e2,quarter/e2
	.dw 1,512
	.dw d2,eighth/d2
	.dw 1,512
	.dw c2,eighth/c2
	.dw 1,512
	.dw g2,quarter/g2
	.dw 1,quarter

	.dw c2,quarter/c2
	.dw 1,512
	.dw c2,eighth/c2
	.dw 1,512
	.dw d2,eighth/d2
	.dw 1,512
	.dw e2,eighth/e2
	.dw 1,512
	.dw c2,eighth/c2
	.dw 1,512
	.dw d2,eighth/d2
	.dw 1,512
	.dw e2,eighth/e2
	.dw 1,512
	.dw d2,quarter/d2
	.dw 1,512
	.dw d2,eighth/d2
	.dw 1,512
	.dw e2,eighth/e2
	.dw 1,512

	.dw f2,eighth/f2
	.dw 1,512
	.dw d2,eighth/d2
	.dw 1,512
	.dw e2,eighth/e2
	.dw 1,512
	.dw f2,eighth/f2
	.dw 1,512
	.dw g2,quarter/g2
	.dw 1,512
	.dw a2,quarter/a2
	.dw 1,512
	.dw e2,eighth/e2
	.dw 1,512
	.dw f2,eighth/f2
	.dw 1,512
	.dw c2,eighth/c2
	.dw 1,512
	.dw d2,eighth/c2
	.dw 1,512

	.dw e2,quarter/e2
	.dw 1,512
	.dw d2,quarter/d2
	.dw 1,512
	.dw c2,quarter/c2
	.dw 1,512
	.dw c2,eighth/c2
	.dw 1,sixteenth
	.dw e2,quarter/e2
	.dw 1,512
	.dw e2,eighth/e2
	.dw 1,512
	.dw e2,eighth/e2
	.dw 1,512

	.dw d2,quarter/d2
	.dw 1,512
	.dw d2,eighth/d2
	.dw 1,512
	.dw d2,eighth/d2
	.dw 1,512
	.dw c2,quarter/c2
	.dw 1,512
	.dw c2,eighth/c2
	.dw 1,512
	.dw c2,eighth/c2
	.dw 1,512
	.dw c2,quarter/c2
	.dw 1,512
	.dw c2,eighth/c2
	.dw 1,sixteenth

;done
	.dw 0,1
	.dw 1,0
	.end