#!/usr/bin/awk -f
BEGIN {
	print "\\score { \\notes {"
	notes = "r"
}
{
	if ($1 == "") {
		if (notes ~ / /) {
			notes = "< " notes " >"
		}
		print notes
		notes = "r"
	} else {
		dashes = ""
		while ($1 >= 3) {
			$1 -= 12
			dashes = dashes "'"
		}
		while ($1 < -9) {
			$1 += 12
			dashes = dashes ","
		}
		if (notes == "r") {
			notes = ""
		} else {
			notes = notes " "
		}
		if ($1 == 0) { $1 = "a" }
		else if ($1 == 1) { $1 = "ais" }
		else if ($1 == 2) { $1 = "b" }
		else if ($1 == -9) { $1 = "c" }
		else if ($1 == -8) { $1 = "cis" }
		else if ($1 == -7) { $1 = "d" }
		else if ($1 == -6) { $1 = "dis" }
		else if ($1 == -5) { $1 = "e" }
		else if ($1 == -4) { $1 = "f" }
		else if ($1 == -3) { $1 = "fis" }
		else if ($1 == -2) { $1 = "g" }
		else if ($1 == -1) { $1 = "gis" }
		notes = notes $1 dashes;
	}
}
END {
	print "}";
	print "\\paper {}";
	print "\\midi {\\tempo 4 = 300 ;}";
	print "}";
}