牛头刨床C语言模拟.doc

图：牛头刨床各点标号 思路：【采用擦-画-擦方法绘制动画】 把各个坐标值表示成θ、L1、L2、A的函数，然后有序连接各坐标点绘成一幅画，暂停一定时间后将原先画的图画擦除，同时使变量θ变化一个增量，然后再画一幅新的图画，如此循环，便构成一部动画，通过动画可以明显地看到牛头刨床的运动特性。 #includestdio.h #includegraphics.h #includemath.h #define PI 3.1415926 #define X 300 /*相对坐标原点X，Y*/ #define Y 300 main() { double l1,l2,l3,a,k,h,t; int drive=DETECT,gmode; int m; double i,j; /*i为a杆的转角θ，j为连杆的转角φ*/ struct ss {double x,y;}; struct qq {int x,y;}; struct ss aa[42]; /*定义42个计算坐标点*/ struct qq bb[42]; /*定义42个绘图坐标点*/ printf(please input the length of l1,l2,a\n\nJust like 100,80,30\n); scanf(%lf,%lf,%lf,l1,l2,a); /* 输入杆长及位置尺寸*/ k=a/5.0;h=10;t=10; initgraph(drive,gmode,c:\\tc); /*初始化图形界面*/ setbkcolor(11); /*背景色为淡蓝色*/ for(i=0;;i+=PI/400) /*每次旋转PI/400画一幅图*/ { l3=sqrt(a*a+l2*l2-2*a*l2*cos(i)); j=acos((l2*l2+l3*l3-a*a)/(2*l2*l3)); if(i=2*PI) /*对转角进行处理*/ {i-=2*PI;} else if(i=PI) {j=0-j;} aa[0].x=aa[0].y=0; /*计算各点的坐标值*/ aa[8].x=0; aa[8].y=l2; aa[14].x=a*sin(i); aa[14].y=l2-a*cos(i); aa[6].x=(l1+l2)*tan(j); aa[6].y=l1+l2; aa[13].x=k*cos(j)-k*sin(-j)+aa[14].x; aa[13].y=k*sin(-j)+k*cos(j)+aa[14].y; aa[12].x=-k*cos(j)-k*sin(-j)+aa[14].x;aa[12].y=-k*sin(-j)+k*cos(j)+aa[14].y; aa[15].x=-k*cos(j)+k*sin(-j)+aa[14].x;aa[15].y=-k*sin(-j)-k*cos(j)+aa[14].y; aa[16].x=k*cos(j)+k*sin(-j)+aa[14].x;aa[16].y=k*sin(-j)-k*cos(j)+aa[14].y; aa[27].x=-(l1-a-k)*sin(j)+aa[6].x; aa[27].y=-(l1-a-k)*cos(j)+aa[6].y; aa[9].x=-(l1-a-2*k)*sin(j)+aa[6].x;aa[9].y=-(l1-a-2*k)*cos(j)+aa[6].y; aa[11].x=k*cos(j)+aa[27].x;aa[11].y=-k*sin(j)+aa[27].y; aa[10].x=-k*cos(j)+aa[27].x;aa[10].y=k*sin(j)+aa[27].y; aa[29].x=-(l1+l2-k)*sin(j)+aa[6].x;aa[29].y=-(l1+l2-k)*cos(j)+aa[6].y; aa[20].x=-(l1+l2-2*k)*sin(j)+aa[6].x;aa[20].y=-(l1+l2-2*k)*cos(j)+aa[6].y; aa[21].x=-k*cos(j)+aa[29].x;aa[21].y=k*sin(j)+aa[29].y; aa[22].x=k