窄v带设计程序编制.ppt

窄v带设计程序编制 窄v带传动知识回顾 相对于普通v带，窄v带具有以下特点： 传递功率的能力更高； 允许速度和曲挠次数高； 传动中心距小等、 程序功能 此设计程序能完成窄V带传动的全部设计计算（除带轮结构设计），包括选择带型、确定大小带轮直径、中心距、小带轮包角、胶带的根数，窄V带初拉力和作用在轴上的力等。 程序需要的数据 传递功率 P (KW) 小带轮转速n1 (r/min) 传动比 i (或大带轮转速n2(r/min)) 原动机种类、工作机载荷性质、每天工作小时数等 设计内容 输入上述参数后，计算机计自动进入设计计算，并输出全部计算结果，包括：计算功率 Pc;V带型号;带长Ld;根数z;带轮基准直径dd1,dd2;实际中心距a及其变化范围;验算带速v;计算初拉力F0及压轴力FQ等。 本程序可提供最多两种带型的方案供分析比较，最终由设计者确定最佳方案。 具体设计过程 带型选择 int choose_TYPE(float zs,float Pc)//选择窄V带的带型。 { int i,t; float np[4],a[4]={0.3667,1.3446,1.3479,1.3015},b[4]={1.5443,1.5370,0.7649,0.4266}; for(i=0;i4;i++) {np[i]=(pow(10,b[i])+pow(Pc,a[i]));printf(%f\n,np[i]);} for(i=0;i4;i++) if(zsnp[i]||i==3) { t=i; break; } switch(t) { case 0:printf(带型TPYE:SPZ型\n);break; case 1:printf(带型TPYE:SPZ OR SPA型\n);break; case 2:printf(带型TPYE:SPA OR SPB型\n);break; case 3:printf(带型TPYE:SPB OR SPC型\n);break; } return(t); } 带轮基准直径和修正系数的确定 //带轮的基准长度和修正系数 float XDC(float D1,float i1,int DX)//D1表示小带轮直径，i1表示传动比，DX表示带型 { float D2,Ld,Lc,A0; int temp,i; D2=D1*i1; float LD[25]={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}; float KL[4][25]={{0.82,0.84,0.86,0.88,0.90,0.93,0.94,0.96,1.00,1.01,1.02,1.05,1.07,1.09,1.11,1.13}, {0,0,0.81,0.83,0.85,0.87,0.89,0.91,0.93,0.95,0.96,0.98,1.00,1.02,1.04,1.06,1.08,1.09}, {0,0,0,0,0,0,0.82,0.84,0.86,0.88,0.90,0.92,0.94,0.96,0.98,1.00,1.02,1.04,1.06,1.08,1.10,1.12,1.14}, {0,0,0,0,0,0,0,0,0,0,0.81,0.83,0.86,0.88,0.90,0.92,0.94,0.96,0.98,1.00,1.02,1.04,1.06,1.08,1.10}}; printf(中心距的范围为%8.2f=A0=%8.2f\n,0.5*(D1+D2),2*(D1+D2)); printf(请输入初选的中心距A0=);//初选中心距 scanf(%f,A0); Lc=2*A0+PI*(D1+D2)/2+(D2-D1)*(D2-D1)/(4*A0); printf(Ld0=%.2f\n,Lc); for(i=0;i25;i++) { if(LD[i]=Lc) { Ld=LD[i]; temp=i; i=25; }} printf(Ld=%.0f\n,Ld); K1=KL[DX][temp]; if(K1==0) printf(带长不在可选范围之内，重新选择中心距\n); return(Ld); } 确定包角系数 //确定包角系数 float BJXS(float A1,float D1,float D2) { float alpha,Kal; alpha=180-(D2-D1)*57.3/A1