.DS 
.ft C
\fBM_start\fP() {
	int i;
	printf("set 0 srate = 33.3K;\n");
	for (i = 0; i < 12; i++)
		\fBScale\fP[i] /= 2.0;
}

\fBM_ter\fP() {
	printf("ter;\n");
}

\fBPlayer\fP \fIblat\fP(0, 5)
{
	\fBP_start\fP {
		\fBP4\fP = 1;
	}
	\fBP2\fP = \fBAbs_time\fP();
	\fBWait_until\fP(\fBP2\fP + \fBP4\fP);
}
.ft R 
.DE
