#!/bin/rc
awk 'BEGIN {
	c = 4096
	n = ARGV[1]
	if(!n){n = 8}
	srand()
	for(i=0; i<n; i++){
		note = 24 + int(rand() * 24)
		slide = int(rand() * 2)
		printf("%d %d 99 %d\n",
			i * c,
			note,
			slide == 1 ? c : c/4)
	}
	printf("%d %d 0 0", n*c, 0)
	print 'repeat'
}' $*