",aMIN,aMAX);
scanf("%lf",&a);
Ld0=2*a+Pi/2*(dd1+dd2)+pow(dd2-dd1,2)/(4*a);
printf("V带基准长度为%.3fmm,请查表5.2选择V带标准基准长度(mm):
",Ld0);
scanf("%d",&Ld);
a=a+(Ld-Ld0)/2;//实际中心距
printf("实际中心距a=%lf\n",a);
ALF1=180-(dd2-dd1)/a*57.3;//小带轮包角
printf("%c",TYPE);
printf("型带的弯曲影响系数Kb=");
printf("%lf\n",Kb);
//传动比系数表
//*****************************************
if((i>=1.00)&&(i<=1.01))
{Ki=1.0000;printf("传动比系数Ki=");
printf("%lf\n",Ki);}
if((i>=1.02)&&(i<=1.04))
{Ki=1.0136;printf("传动比系数Ki=");
printf("%lf\n",Ki);}
if((i>=1.05)&&(i<=1.08))
{Ki=1.0276;printf("传动比系数Ki=");
printf("%lf\n",Ki);}
if((i>=1.09)&&(i<=1.12))
{Ki=1.0419;printf("传动比系数Ki=");
printf("%lf\n",Ki);}
if((i>=1.13)&&(i<=1.18))
{Ki=1.0567;printf("传动比系数Ki=");
printf("%lf\n",Ki);}
if((i>=1.19)&&(i<=1.24))
{Ki=1.0719;printf("传动比系数Ki=");
printf("%lf\n",Ki);}
if((i>=1.25)&&(i<=1.34))
{Ki=1.0875;printf("传动比系数Ki=");
printf("%lf\n",Ki);}
if((i>=1.35)&&(i<=1.51))
{Ki=1.1036;printf("传动比系数Ki=");
printf("%lf\n",Ki);}
if((i>=1.52)&&(i<=1.99))
{Ki=1.1202;printf("传动比系数Ki=");
printf("%lf\n",Ki);}
if(i>=2)
{Ki=1.1373;printf("传动比系数Ki=");
printf("%lf\n",Ki);}
//****************************************
DIFP0=Kb*n1*(1-1/Ki);
printf("功率增量△P0=%lf\n",DIFP0);
printf("小带轮包角为α=%.5f°\n",ALF1);
//************************************************
//********包角修正系数***************************
if((ALF1>=85)&&(ALF1<=95))
{KALF=0.68;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>95)&&(ALF1<=105))
{KALF=0.73;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>105)&&(ALF1<=115))
{KALF=0.78;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>115)&&(ALF1<=125))
{KALF=0.82;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>125)&&(ALF1<=135))
{KALF=0.86;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>135)&&(ALF1<=145))
{KALF=0.89;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>145)&&(ALF1<=155))
{KALF=0.92;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>155)&&(ALF1<=165))
{KALF=0.95;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>165)&&(ALF1<=175))
{KALF=0.98;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>175)&&(ALF1<=185))
{KALF=1.00;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>185)&&(ALF1<=195))
{KALF=1.05;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>195)&&(ALF1<=205))
{KALF=1.10;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>205)&&(ALF1<=215))
{KALF=1.15;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
if((ALF1>215)&&(ALF1<=225))
{KALF=1.20;printf("包角修正系数KALF为:
");
printf("%lf\n",KALF);}
//********************************************************
//********************************************************
printf("V带基准长度为%.3dmm",Ld);
//***************长度系数KL
switch(Ld)
{
case800:
KL=0.85;printf("长度系数KL%.3f",KL);break;
case900:
KL=0.87;printf("长度系数KL%.3f",KL);break;
case1000:
KL=0.89;printf("长度系数KL%.3f",KL);break;
case1120:
KL=0.91;printf("长度系数KL%.3f",KL);break;
case1250:
KL=0.93;printf("长度系数KL%.3f",KL);break;
case1400:
KL=0.96;printf("长度系数KL%.3f",KL);break;
}
//********************************************
//**************单根带的基本额定功率P0(kW)
switch(dd1)
{
case75:
P0=0.51;printf("单根带的基本额定功率P0:
%.3fkW",P0);break;
case90:
P0=0.77;printf("单根带的基本额定功率P0:
%.3fkW",P0);break;
case100:
P0=0.95;printf("单根带的基本额定功率P0:
%.3fkW",P0);break;
case125:
P0=1.37;printf("单根带的基本额定功率P0:
%.3fkW",P0);break;
}
//**************************
z=Pd/((P0+DIFP0)*KALF*KL);
printf("V带的根数为:
%.2f,请输入元整后的结果:
",z);
scanf("%lf",&z);
printf("单位长度所选带的质量(kg/m):
");
printf("%lf",m0);
F0=500*Pd/z/V*(2.5-KALF)/KALF+m0*V*V;//初拉力
FQ=2*z*F0*sin(ALF1/2*Pi/180);//作用在轴上的压力
printf("\n下面是计算的最后结果:
\n");
printf("带型为%c\n设计功率Pd=%.3fkW\n小带轮直径dd1=%.3dmm\n大带轮直径dd2=%.3dmm\nV带基准长度Ld=%.3dmm\n实际轴间距a=%.3fmm\n单根V带额定功率P0=%.3fkW\n额定功率增量DIFPP0=%.3fkW\n带速V=%.3fm/s\n小带轮包角ALF1=%.5f°\nV带根数z=%.3f\nV带单位长度的质量m0=%.3fkg/m\n单根V带的预紧力F0=%.3fN\n作用在轴上的力FQ=%.3fN\n",TYPE,Pd,dd1,dd2,Ld,a,P0,DIFP0,V,ALF1,z,m0,F0,FQ);
}
system("pause");
}
六、设计总结
通过这段时间的V带传动设计,一方面我对V带传动设计过程有了更深的了解,另一方面也让我对程序设计的一般过程与规以及注意事项有了一定的认识。
同时在程序设计的过程中,我对VC++6.0这款软件有了一定的了解,学习了一些基本的应用。
通过这次设计,锻炼了我们各方面的能力,比如合作能力、自学能力等,使我们获益颇丰!