V带程序说明书.docx

1、V带程序说明书普通V带传动程序设计说明班级：0808107*学号：*一、程序功能简介本程序旨在实现普通V带传动设计计算的软件化。要求不是很高的时候，采用全自动的设计不失为一种省时省力的选择；当要求比较严格的时候，可以采用半自动的设计，按照一步步的提示对默认值进行相应的改动，但一些由前面参数按固定公式计算出来的值是不可以改动的（相信您也不希望这些用来验证设计合理性的公式能够随意变化）。任何程序的功能都是有限的，本程序对于普通V带以外的东西就无能为力了。而且，鉴于设计者的有限的能力，带轮的结构类型及结构尺寸都没有包含在内，如果这些影响了您的使用，希望能够得到您的原谅。二、程序使用方法由于设计流程严

2、格按照课本进行，因此使用过程也很简单。下面就作一个简单介绍。 采用的示例数据参见课本例题。 首先，双击图标进入程序，欢迎界面如下，点击运行：进入界面：按照相关提示操作输入中心距后：在计算完后，还可以选择是否计算其它带轮当输入错误是，会得到提示。三、变量标示符 P：传动功率功率 n1：小带轮转速i：传动比Pd：设计功率Vmax：最大带速V：带速Ld：基准长度Kl：长度系数a：实际中心距Z：带的根数F0：初拉力Q：压轴力B：轮缘宽度四、计算流程及相应代码#include #include #include #define PAI 3.141592654float selectKi(float i)

3、;float selectKa();int changestotype(char s);int selectVMAX();float selectk1(int TYPE);float selectk2(int TYPE);float selectk3(int TYPE);float selectkb(int TYPE);showdd(int TYPE);char selecttype(float Pd,float n1);float selectLd(float Ld0);float selectKL(float Ld,int TYPE);float selectKALF(float ALF1

4、);float selectm(int TYPE);float selecte(int TYPE);float selectf(int TYPE);main() float P,n1,i,Ki,KA,Pd,K1,K2,K3,Kb,V,dd2,dd20,a1,a2,a0,Ld0,Ld,KL,KALF,ALF1,a,P0,DIFP0,FQ,F0,m,e,f; char s1,s,ans1,ans2,Z; int VMAX,TYPE,flag1,dd1,flag2,flag3,B; flag1=1,flag2=0,flag3=0; printf(请输入传递功率P（单位KW）:); scanf(%f,

5、&P); printf(小带轮转速n1（单位r/min）:); scanf(%f,&n1); printf(传动比i：); scanf(%f,&i); Ki=selectKi(i); KA=selectKa(); Pd=KA*P;/计算设计功率Pd printf(Pd=%f,Pd); s1=selecttype(Pd,n1); printf(经过查阅选型图后推荐带型为:);/调用选型图 printf(推荐带型TYPE=%cn,s1); while(flag1) printf(请输入带型:); scanf(%s,&s); TYPE=changestotype(s);/将字符转化为数字（1-6）

6、printf(TYPE=%dn,TYPE); VMAX=selectVMAX(TYPE);/查阅最大速度 K1=selectk1(TYPE); K2=selectk2(TYPE); K3=selectk3(TYPE); Kb=selectkb(TYPE); while(!flag2)|flag3) showdd(TYPE); printf(请选择输入小带轮基准直径dd1：); scanf(%d,&dd1); V=PAI*dd1*n1/60/1000; printf(dd1=%dnn1=%fnV=%fn,dd1,n1,V); if(VVMAX) flag2=0; printf(所选直径过大，请重

7、新输入该型号下的直径：n); else flag2=1; dd20=dd1*i; printf(dd2=%fn,dd20); printf(依据以上每种类型的V带带轮的基准直径选取大带轮直径：); scanf(%f,&dd2); a1=0.7*(dd1+dd2); a2=2*(dd1+dd2); printf(根据a1=a0=10) flag1=1; printf(型号不合适，请重新输入！n); else flag1=0; printf(带的根数合适!n); m=selectm(TYPE); printf(单位长度质量m=%f ,m); F0=500*Pd/(Z*V)*(2.5-KALF)/K

8、ALF+m*V*V; FQ=2*Z*F0*sin(ALF1*PAI/360); printf(F0=%fN ,F0); printf(FQ=%fNn,FQ); e=selecte(TYPE); printf(e=%f ,e); f=selectf(TYPE); printf(f=%f ,f); B=(int)(Z-1)*e+2*f; printf(B=%d n,B); printf(是否计算下一种带轮直径Y（是），N（否）? :); scanf(%1s,&ans1); if(ans1=Y) flag3=1; printf(用户再次输入直径，该型号带直径如下显示:n); else flag3=0

9、; printf(不再输入其他直径n); printf(是否计算下一型号带Y（是），N（否）？：n); scanf(%1s,&ans2); if(ans2=Y) flag1=1; printf(用户将选择其他带型（Z-E）n); flag3=1; else flag1=0; printf(输入结束！n); float selectKi(float i)/选择Ki float kix; if(i=1.00&i=1.02&i=1.05&i=1.09&i=1.13&i=1.19&i=1.25&i=1.35&i=1.52&i=1.99) kix=1.1202; else kix=1.1373; ret

10、urn kix;float selectKa()/选择ka float kax; int GZJ,h,YDJ; double a46=1.0,1.1,1.2,1.1,1.2,1.3, 1.1,1.2,1.3,1.2,1.3,1.4, 1.2,1.3,1.4,1.4,1.5,1.6, 1.3,1.4,1.5,1.5,1.6,1.8; printf(请输入原动机类型YDJ(1或2):); scanf(%d,&YDJ); printf(请选择工作机的载荷特性：n); printf(0-载荷平稳n液体搅拌机；离心式水泵；通风机和鼓风机（7.5KW）；发电机；旋转式水泵；金属切削机床；剪床；压力机；印刷

11、机；振动机n); printf(2-载荷变动较大n螺旋式运输机；斗式提升机 ；往复式水泵和压缩机；锻锤；磨粉机；锯木机；和木工机械；纺织机械n); printf(3-载荷变动很大n破碎机（旋转式、颚式等）；球磨机，棒磨机；起重机；挖掘机；橡胶辊压机n); scanf(%d,&GZJ); printf(请选择带轮每天工作时间：n); printf(0-小于10hn); printf(1-大于10h且小于16hn); printf(2-大于16hn); scanf(%d,&h); if(YDJ=1) kax=aGZJh; else kax=aGZJh+3; return kax;int chang

12、estotype(char s) int a; if( s=Z) a=1; else if(s=A|a) a=2; else if(s=B) a=3; else if(s=C) a=4; else if(s=D) a=5; else if(s=E) a=6; return a;int selectVMAX()/VMAX选择 int a,TYPE; if(TYPE=1&TYPE=447*pow(Pd,c) sx=Z; else if (n1=101.9*pow(Pd,c)&(n1=28*pow(Pd,c)&(n1=8.2*pow(Pd,c)&(n1=1.06*pow(Pd,c)&(n18.2*p

13、ow(Pd,c) sx=D; else sx=E; return sx;float selectLd(float Ld0) int j,k;float A,Amin; float LLdd33=400,450,500,560,630,710,800,900,1000,1120,1250,1400,1600,1800,2000,2240,2500,2800,3150,3550,4000,4500,5000,5600,6300,7100,8000,9000,10000,11200,12500,14000,16000; Amin=Ld0-LLdd0; for (j=0;j Ld0) A=LLddj-

14、Ld0; else A=Ld0-LLddj; if (AminA) Amin=A; k=j; return LLddk;float selectKL(float Ld,int TYPE) float LLdd33=400,450,500,560,630,710,800,900,1000,1120,1250,1400,1600,1800,2000,2240,2500,2800,3150,3550,4000,4500,5000,5600,6300,7100,8000,9000,10000,11200,12500,14000,16000; float KKLL336=0.87,10,10,10,10

15、,10,0.89,10,10,10,10,10,0.91,10,10,10,10,10,0.94,10,10,10,10,10,0.96,0.81,10,10,10,10, 0.99,0.83,10,10,10,10,1.00,0.85,10,10,10,10,1.03,0.87,0.82,10,10,10,1.06,0.89,0.84,10,10,10,1.08,0.91,0.86,10,10,10, 1.10,0.93,0.88,10,10,10,1.14,0.96,0.90,10,10,10,1.16,0.99,0.92,0.83,10,10,1.18,1.01,0.95,0.86,10

16、,10,-10,1.03,0.98,0.88,10,10, -10,1.06,1.00,0.91,10,10,-10,1.09,1.03,0.93,10,10,-10,1.11,1.05,0.95,0.83,10,-10,1.13,1.07,0.97,0.86,10,-10,1.17,1.09,0.99,0.89,10, -10,1.19,1.13,1.02,0.91,10,-10,-10,1.15,1.04,0.93,0.90,-10,-10,1.18,1.07,0.96,0.92,-10,-10,-10,1.09,0.98,0.95, -10,-10,-10,1.12,1.00,0.97,

17、-10,-10,-10,1.15,1.03,1.00,-10,-10,-10,1.18,1.06,1.02,-10,-10,-10,1.21,1.08,1.05,-10,-10,-10,1.23,1.11,1.07, -10,-10,-10,-10,1.14,1.10,-10,-10,-10,-10,1.17,1.12,-10,-10,-10,-10,1.20,1.15,-10,-10,-10,-10,1.22,1.18; int m,n; m=0; while(LLddm!=Ld) m+; n=m; return KKLLnTYPE-1;float selectKALF(float ALF1

18、) float KALFx14=0.68,0.73,0.78,0.82,0.86,0.89,0.92,0.95,0.98,1.00,1.05,1.10,1.15,1.20; int j; float ALF1x; j=(ALF1-90)/10; ALF1x=KALFxj+( KALFxj+1-KALFxj)*0.1*(ALF1-90-j*10); return ALF1x;float selectm(int TYPE) float mx; float mass6=0.06,0.1,0.17,0.3,0.6,0.9; mx=massTYPE-1; return mx;float selecte(int TYPE) float exx; float ex6=12,15,19,25.5,37,44.5; exx=exTYPE-1; return exx;float selectf(int TYPE) float fxx; float fx6=8,10,12.5,17,23,29; fxx=fxTYPE-1; return fxx;