《机械原理课程设计-牛头刨床机构方案分析》由会员分享，可在线阅读，更多相关《机械原理课程设计-牛头刨床机构方案分析（17页珍藏版）》请在金锄头文库上搜索。
1、 机械原理课程设计说明书题目： 牛头刨床机构方案分析 班 级 ：姓 名 ： 学 号 ：指导教师 ：成 绩 ： 2013 年 9 月 30 日 目录一、机构简图和已知条件1二、滑枕初始位置及行程H 的确定方法1三、杆组的拆分方法2四、机构的运动分析24.1所调用的杆组子程序中虚参与实参对照表24.2源程序34.3运行结果5五、机构的动态静力分析65.1所调用的杆组子程序中虚参与实参对照表65.2源程序75.3运行结果9六、自编程序中主要标识符说明12七、飞轮的转动惯量126.1 飞轮转动惯量的计算方法126.2 源程序126.3运行结果14八、 主要的收获和建议15九、参考文献15一、机构简图和
2、已知条件如图所示为一种牛头刨床主机构的运动简图，已知，l1=0.1m，l0=0.4m，l3=0.75m，l4=0.15m，ly=0.738m，l3=0.375m，a=0.05m，b=0.15，c=0.4m，d=0.1m。只计构件3、5的质量，其余略去不计，m3=30kg，JS3=0.7kgm2，m5=95kg。工艺阻力Q如图所示，Q=9000N。主轴1的转速为60r/min(顺时针方向)，许用运转不均匀系数=0.03。二、滑枕初始位置及行程H 的确定方法l0l1H如图所示曲柄滑块摆杆机构，构件1为曲柄， B点的行程即为A点的行程。已知初始位置取滑枕 5 的左极限位置。滑枕5初始位置为主动件在机
3、架左侧垂直3构件时对应的位置，此时滑枕达到左极限位置；理论计算： H=0.375 滑枕行程H的确定方法也可由运动分析的结果读出。滑枕5的左极限为-0.188，右极限为0.187，所以行程H为0.375三、杆组的拆分方法 RPP杆组四、机构的运动分析4.1所调用的杆组子程序中虚参与实参对照表4.1.1调用bark函数，求点3的运动参数形式参数n1n2n3kr1r2gamtwepvpap实值1301r130.00.0twepvpap4.1.2调用rprk函数求构件的运动参数形式参数mn1n2k1k2r1r2vr2ar2twepvpap实值123320.0&r2&vr2&ar2twepvpap4.1
4、.3调用bark函数求点4的运动参数形式参数n1n2n3kr1r2gamtwepvpap实值20430.0r240.0twepvpap4.1.4调用rppk函数求点7的运动参数形式参数n1n2n3n4k1k2k3r1gam1gam2实值46474560.00.0gam4r2vr2ar2r3vr3ar3twepvpap&r2&vr2&ar2&r3&vr3&ar3twepvpap4.1.5调用bark函数求点5的运动参数形式参数n1n2n3kr1r2gamtwepvpap实值20530.0r250.0twepvpap4.1.6调用bark函数求点8的运动参数形式参数n1n2n3kr1r2gamtw
5、epvpap实值70850.0r78gam4twepvpap4.1.7调用bark函数求点9的运动参数形式参数n1n2n3kr1r2gamtwepvpap实值70950.0r79gam5twepvpap4.2源程序#include graphics.h#include subk.c#include draw.cmain() static double p202,vp202,ap202,del; static double t10,w10,e10,pdraw370,vpdraw370,apdraw370;static int ic;double r13,r24,r25,r78,r79;doubl
6、e gam2,gam3;double gam4,gam5;double pi,dr;double r2,vr2,ar2,r3,vr3,ar3;int i;FILE *fp; char *m=p,vp,ap; r13=0.1 ; r24=0.75; r25=0.375;r78=0.05; r79=sqrt(0.25*0.25+0.1*0.1); gam2=90.0; gam3=-atan(2/5); t6=0.0; w6=0.0; e6=0.0; e1=0.0; del=10.0;pi=4.0*atan(1.0); dr=pi/180.0;w1=-2*pi;gam4=gam2*dr; gam5=
7、gam3*dr;p11=0.0;p12=0.0;p21=0.0; p22=-0.4; p61=0.0;p62=0.338;printf( n TheKinematic Parametersof Point 7n);printf(No THETA1 S7 V7 A7n);printf( deg m m/s m/s/sn);if(fp=fopen(MA 运动,w)=NULL) printf( Cant open this file.n);exit(0);fprintf(fp, n The Kinematic Parameters of Point 7n);fprintf(fp,No THETA1
8、S7 V7 A7n);fprintf(fp, deg m m/s m/s/s);ic=(int)(360.0/del);for(i=0;i=ic;i+) t1=(double)(270*dr-acos(0.1/0.4)-(i)*del*dr);bark(1,3,0,1,r13,0.0,0.0,t,w,e,p,vp,ap);rprk(1,2,3,3,2,0.0,&r2,&vr2,&ar2,t,w,e,p,vp,ap);bark(2,0,4,3,0.0,r24,0.0,t,w,e,p,vp,ap);bark(2,0,5,3,0.0,r25,0.0,t,w,e,p,vp,ap);rppk(4,6,4
9、,7,4,5,6,0.0,0.0,gam4,&r2,&vr2,&ar2,&r3,&vr3,&ar3,t,w,e,p,vp,ap); bark(7,0,8,5,0.0,r78,gam4,t,w,e,p,vp,ap);bark(7,0,9,5,0.0,r79,gam5,t,w,e,p,vp,ap);printf(n%2d %12.3f%12.3f%12.3f%12.3f,i+1,t1/dr,p71,vp71,ap71);fprintf(fp,n%2d %12.3f%12.3f%12.3f%12.3f,i+1,t1/dr,p71,vp71,ap71); pdrawi=p71;vpdrawi=vp71
10、;apdrawi=ap71; if(i%25)=0)getch();fclose(fp);getch();draw1(del,pdraw,vpdraw,apdraw,ic); 4.3运行结果 The Kinematic Parameters of Point 7No THETA1 S7 V7 A7 deg m m/s m/s/s 1 194.478 -0.188 0.000 7.402 2 184.478 -0.185 0.192 6.414 3 174.478 -0.177 0.357 5.484 4 164.478 -0.165 0.497 4.634 5 154.478 -0.150 0.615 3.862 6 144.478 -0.131 0.712 3.160 7 134.478 -0.110 0.791 2.513 8 124.478 -0.087 0.852 1.909 9 114.478 -0.063 0.897 1.33510 104.478 -0.038 0.927 0.78211 94.478 -0.012 0.941 0.24112 84.478 0.014 0.940 -0.29713 74.478 0.040 0.924 -0.83914 64.478 0.066 0.893 -1.39415 54.4
