#include <stdio.h>
     #include <sys/types.h>
     #include <sys/uio.h>
     #include <unistd.h>
     #include <math.h>

main(int argc, char **argv)
{
int pitch[9]={1,3,2,4,6,8,10,12,16};
int drawbar[9]=
		//{8,8,8,0,0,0,0,0,0};
		{8,8,8,8,8,8,8,8,8};
int duration=(44.1*1000)/220;
float wavf[duration];
unsigned short wavs[duration];
float max=0;
int i,h;

if(argc!=2 || strlen(argv[1])!=9)
	{
	fprintf(stderr,"hammond 888888888\n");
	exit(-1);
	}

for(i=0;i<9;i++)
	{
	drawbar[i]=argv[1][i]-'0';
	if(drawbar[i]<0 || drawbar[i]>8)
		{
		fprintf(stderr,"Drawbar %d out of range\n",i);
		exit(-1);
		}
	}

for(i=0;i<duration;i++)
	wavf[i]=0.0;

for(h=0;h<9;h++)
	{
	float amp=1<<drawbar[h];
	//printf("h:%d,%f\n",h,amp);
	if(amp>1.5)
	for(i=0;i<duration;i++)
		{
		float now=(2.0*M_PI*((float)i))/duration;
		wavf[i]+=sin(now*pitch[h])*amp;
		}
	}

for(i=0;i<duration;i++)
	{
	if(fabs(wavf[i])>max)
		max=fabs(wavf[i]);
	}
for(i=0;i<duration;i++)
	{
	wavs[i]=((wavf[i]/(2*max))+0.5)*65535;
	//printf("%f\t%d\t%f\n",max,wavs[i],wavf[i]);
	}
write(1,wavs,duration*2);
return 0;
}