graphmake.c

程序为达盛实验箱所带

/***********************************************************************
** Main Function Program
***********************************************************************/ 

#include "math.h"
#include "stdio.h"
#define  N  81
#define  M  81
#define  pi 3.1415926

void main()
{
	int i,j,y[M][N],k;
	double x[(N-1)/2],r;
	double m,n,t;
	
	for (;;)
	{
		for (t=0; t<=32; t++)
		{
			for (i=0; i<=(N-1)/2-1; i++)
			{
				x[i] = 127*(1+cos(2*pi*i/((N-1)/2-1)-t*pi/16));
			}
	
			for (i=0; i<=M-1; i++)
			{
				for (j=0; j<=N-1; j++)
				{
					y[i][j] = 0;
					m = i;
					n = j;
					r = (m-40)*(m-40)+(n-40)*(n-40);
					k = (int)(sqrt(r));
			
					if (k<=39) y[i][j] = x[k];
					else y[i][j] = 0;
				}
			}
	
			i=0;
			j=0;
		}
	}
}
/***********************************************************************
** End of File 
***********************************************************************/