实验6-模具CADCAM系统模块程序设计.docxVIP

#includestdio.h#includemath.h#define PAI 3.14159FILE *fp;void main(){float xx,yy,xx0,yy0,x1,y1,x01,y01,x2,y2,x02,y02,xx1,yy1,xx2,yy2;float z,r,sl,sx,sy,p,t,taun,x0,y0,fl,fx,fy,alpha,alpha1,alpha2,beta;inti,j;charmytxt[10];printf(\n Input file name:);scanf(%s,mytxt);printf(\n Input t,taun:);scanf(%f,%f,t,taun);if((fp=fopen(mytxt,r))==NULL){printf(cannot open this file\n);return;}sx=0.0;sy=0.0;sl=0.0;loop1:fscanf(fp,%d,%f,%f,%f,%f,i,x1,y1,x01,y01);xx=x1;yy=y1;xx0=x01;yy0=y01;//printf(%d%f%f%f%f%f\n,i,x1,y1,x01,y01);loop2:fscanf(fp,%d,%f,%f,%f,%f,j,x2,y2,x02,y02);//printf(%d%f%f%f%f%f\n,j,x2,y2,x02,y02);if(j==88||j==99){x2=xx;y2=yy;x02=xx0;y02=yy0;}if(abs(i)==5){fl=x01*PAI;fx=x1;fy=y1;}else if(abs(i)=3){fl=sqrt((x2-x1)*(x2-x1)+(y2-y1)*(y2-y1));fx=(x1+x2)/2.0;fy=(y1+y2)/2.0;}else if(abs(i)==4){xx1=x1-x01;yy1=y1-y01;xx2=x2-x01;yy2=y2-y01;if(xx1!=0.0)alpha1=atan(fabs(yy1/xx1));else alpha1=PAI/2.0;if(xx10.0yy10.0) alpha1=alpha1;else if(xx1=0.0yy10.0) alpha1=PAI-alpha1;else if(xx1=0.0yy1=0.0) alpha1=PAI+alpha1;else if(xx10.0yy1=0.0) alpha1=2*PAI-alpha1;if(xx2!=0.0) alpha2=atan(fabs(yy2/xx2));else alpha2=PAI/2.0;if(xx20.0yy20.0) alpha2=alpha2;else if(xx2=0.0yy20.0) alpha2=PAI-alpha2;else if(xx2=0.0yy2=0.0) alpha2=PAI+alpha2;else if(xx20.0yy2=0.0) alpha2=2*PAI-alpha2;if(i==4)if(alpha2alpha1)alpha=alpha2-alpha1;elsealpha=alpha2-alpha1+2*PAI;else if(i==-4)if(alpha2alpha1)alpha=alpha1-alpha2+2*PAI;elsealpha=alpha1-alpha2; r=sqrt((x1-x01)*(x1-x01)+(y1-y01)*(y1-y01)); //printf(r=%f,r);fl=r*alpha; z=r*sin(alpha/2.0)/(alpha/2.0); //printf(r=%f,z=%f\n,r,z);if(i==4)beta=alpha1+alpha/2.0;else if(i=-4)beta=alpha1-alpha/2.0;fx=x01+z*cos(beta);fy=y01+z*sin(beta); }sl=sl+fl;sx=sx+fl*fx;sy=sy+fl*fy;if(abs(j)=4) {x1=x2;y1=y2;x01=x02;y01=y02;i=j;goto loop2; }else if(j==88)goto loop1; p=1.3*sl*t*taun/1000.0;x0=sx/sl; y0=sy/sl;printf(p=%f(KN)\n,p);printf(x0=%f,y0=%f(mm)\n,x0,y0);fclose(fp); }输入程序程序调试:五列表创建实验现象记录:所编程序运行正确，计算结果正确，符合实验要求