《v带传动电算哈工大机械设计》由会员分享，可在线阅读，更多相关《v带传动电算哈工大机械设计（25页珍藏版）》请在金锄头文库上搜索。
1、Harbin Institute of Technology大作业设计说明书大作业设计说明书课程名称： 机械设计 设计题目： V 带传动电算 院 系： 机电学院 班 级： 1208106 设 计 者： 张文奇 学 号： 1120810610 指导老师： 张锋 设计时间： 2014.10.24 哈尔滨工业大学目录目录1、普通 V 带传动的内容和任务2、变量标识符 .3、程序框图 .4、V 带设计程序.5、程序运行截图6、设计总结七、参考文献1一、普通 V 带传动的内容和任务1、 普通 V 带传动设计内容：给定原始数据：传递的功率 P，小带轮转速 n1 传动比 i 及工作条件设计内容：带型号，基准
2、长度 Ld，根数 Z，传动中心距 a，带轮基准直径 dd1、dd2，带轮轮缘宽度 B，初拉力 F0 和压轴力 Q2、 CAD 任务： 编制 V 带传动设计程序框图； 编制 V 带传动设计源程序； 按习题或作业中数据运行程序，要求对每一组数据各按三种 V 带型号计算， 对每一种带型号选三种小带轮直径进行计算并输出所有结果； 比较结果，从 9 种方案中选择一个最佳方案并按照此方案提供的几何和结 构参数利用 AutoCAD 软件绘制大带轮零件工作图。3、设计思路输入原始数据：P，n1，i ，包括已给定和人为假定的数据。人为给定的一些条件代号,如 Z、A、B、C、D、E 六种带型号可使用变量 TYPE
3、 来表示，TYPE=16分别对应六种型号。然后通过编程计算得出其余参数的标识符及合理数值。23二、变量标识符为了使程序具有较好的可读性易用性，应采用统一的变量标识符，如表 1 所示。表 1 变量标识符表表 1 变量标识符表序号名称代号标识符单位 1名义功率PPkW 2设计功率PdPdkW3工作情况系数KAKA 4小带轮转速n1n1r/min 5工作机载荷特性GZJ 6原动机类型YDJ 7带型号Z、AETYPE 8小带轮基准直径dd1dd1mm 9大带轮基准直径dd2dd2mm 10最小带轮直径ddminddMINmm 11带速Vm/s 12最大带速 maxVMAXm/s 13中心距aamm 1
4、4基准长度LdLdmm 15小带轮包角 1ALF1度 16V 带根数ZZ 17额定功率P0P0kW 18功率增量 0PDIFP0kW 19弯曲影响系数KbKb 20传动比系数KiKi 21长度系数KLKL 22包角系数 KKALF 23初拉力F0F0N 24压轴力QQN 25圆周率PAI26轮缘宽度BBmm45三、程序框图N开始输入 P, n1,i输入各原始数据查表求传动比系数Ki查 KA,计算 Pd，选型查表求 KA, 计算 Pd输入带型号输出该型号带轮系列直径，选择输入小带轮基准直径 dd1V=10006011 ndd根据型号确定最大带速 Vmax，额定功率 P0中系数K1,K2,K3，弯
5、曲影响系数 KbV#include#include#define PAI 3.14int TYPE_TO_NUM(char type);float Select_Ki(float i);float Select_KA(float H,int GZJ,int YDJ);float Select_KL(float Ld,int TYPE);float Select_M(int TYPE);float Select_dd1(int TYPE);float Select_dd2(int dd1,float i);float Compute_P0(float V,int TYPE,float dd1);
6、float Compute_DIFP0(int TYPE,float Ki,int n1);float Compute_VMAX(int TYPE);float Compute_KALF(float ALF1);float Compute_B(int TYPE,int z);float* Compute_LAK(float dd1,float dd2,int TYPE);main()float P,H,i,n1,KA,Ki,dd1,dd2,V,P0,DIFP0,Pd,VMAX,*LAK,m,Ld,KALF,a,KL,z,F0,ALF1,Q,B;int YDJ,GZJ,TYPE,ANS;char
7、 type,ans;START:printf(“ 欢迎使用普通 V 带传动设计电算软件n“);7printf(“ 机械设计电算 n 张文奇 1120810610 n V 带传动设计程序n“);printf(“n“);printf(“ 请输入各项原始参数n“);printf(“1.传递功率 P(单位 KW):“);printf(“n“);scanf(“%f“,IF5: if(P10)printf(“警告：传递功率过大，请重新输入n“);printf(“1.传递功率 P(单位 KW):“);printf(“n“);scanf(“%f“,goto IF5;printf(“n“);printf(“2.
8、小带轮转速 n1(单位 r/min)：“);printf(“n“);scanf(“%f“,IF4: if(n110000)printf(“警告：输入转速达到高速带传动，请降低转速并重新输入n“);printf(“2.小带轮转速 n1(单位 r/min)：“);8printf(“n“);scanf(“%f“,goto IF4;printf(“n“);printf(“3.传动比 i:“);printf(“n“);scanf(“%f“,IF6: if(i4)printf(“警告：输入传动比过高，请重新输入n“);printf(“3.传动比 i:“);printf(“n“);scanf(“%f“,go
9、to IF6;printf(“n“);printf(“4.原动机类型(I(1)或 II(2):n 说明：I 类-普通鼠笼式电机、同步电机、直流电机（并激） ，n600r/min 内燃机n II 类-交流电动机、直流电动机、单缸发动机、n600r/min 内燃机n II 类-交流电动机、直流电动机、单缸发动机、n16h(三班制)n“);scanf(“%f“,IF3: if(H!=0 printf(“6.每天的工作时间:n0:16h(三班制)n“);scanf(“%f“,goto IF3;printf(“n“);DX: printf(“7.请选择 V 带带型(Z、A、B、C、D、E):n“);sc
10、anf(“ %c“,TYPE=TYPE_TO_NUM(type);KA= Select_KA(H,GZJ,YDJ);Pd=KA*P;VMAX=Compute_VMAX(TYPE);DD1:dd1=Select_dd1(TYPE);V=PAI*dd1*n1/60000;while(VVMAX)printf(“n“);printf(“警告：所选小轮基准直径过小!请重新选择!n“);dd1=Select_dd1(TYPE);V=PAI*dd1*n1/60000;dd2=Select_dd2(dd1,i);11P0=Compute_P0(V,TYPE,dd1);Ki=Select_Ki(i);DIFP
11、0=Compute_DIFP0(TYPE,Ki,n1);LAK=Compute_LAK(dd1,dd2,TYPE);Ld=LAK0;a=LAK1;KL=LAK2;ALF1=180-57.3*(dd2-dd1)/a;KALF=Compute_KALF(ALF1);z=ceil(Pd/(KALF*KL*(P0+DIFP0);if(z=10)goto DX;m=Select_M(TYPE);F0=500*Pd*(2.5-KALF)/(z*V*KALF)+m*V*V;Q=2*z*F0*sin(ALF1*PAI/360);B= Compute_B(TYPE,z);printf(“n“);printf(“
12、 计算结果n“);printf(“n“);printf(“小轮直径:%f mmnn 大轮直径:%f mmnn 中心距:%f mmnn 带长:%f mmnn 带宽:%f mmnn 带的根数:%fnn 初拉力:%f Nnn 轴压力:%f Nnn“,dd1,dd2,a,Ld,B,z,F0,Q);printf(“n“);X:printf(“请选择：nY:计算下一组带轮nS:重新开始nN:结束n“);12scanf(“ %c“,ANS=TYPE_TO_NUM(ans);if(ANS=6)goto DD1;else if(ANS=7)goto START;else if(ANS=8)printf(“程序结
13、束“);elseprintf(“输入错误，请重新输入“);goto X;/*工作情况系数选择*/float Select_KA(float H,int GZJ,int YDJ)/*表 5.7 工作情况系数 KA*/float ka143=1.0,1.1,1.2,1.1,1.2,1.3,1.2,1.3,1.4,1.3,1.4,1.5;float ka243=1.1,1.2,1.3,1.2,1.3,1.4,1.4,1.5,1.6,1.5,1.6,1.8;float KA;if(YDJ=1)13if(H=0)KA=ka1GZJ0;else if(H=2)KA=ka1GZJ2;elseKA=ka1GZ
14、J1;if(YDJ=2)if(H=0)KA=ka2GZJ0;else if(H=2)KA=ka2GZJ2;elseKA=ka2GZJ1;return KA;/*传动比系数*/float Select_Ki(float i)float m;/*表 5.6 传动比系数 Ki*/float Ki10=1.0000,1.0136,1.0276,1.0419,1.0567,1.0719,1.0875,1.1036,1.1202,1.1373;14float I10=1.00,1.02,1.05,1.09,1.13,1.19,1.25,1.35,1.52,2.00;int j=9;for(j=9;j=0;
15、j-)m=i-Ij;if(m=0)break;return Kij;/*确定选择带型*/int TYPE_TO_NUM(char type)int x;if(typea2)printf(“输入中心距超出范围，请重新输入n“);printf(“9.请选择输入初估中心距 a0(范围为%.2fmm%.2fmm):“,a1,a2);scanf(“%f“,goto IF11;Ld0=2*a0+(dd1+dd2)*PAI/2+(dd2-dd1)*(dd2-dd1)/a0/4;for(j=0;j(klj0-Ld0)Ld=klj0;KL=kljTYPE+1;elseLd=klj-10;KL=klj-1TYPE+1;a=a0+(Ld-Ld0)/2;LAK0=Ld;LAK1=a;LAK2=KL;return LAK;/*最大带速*/float Compute_VMA
