V带传动设计c程序的编制Word文档格式.docx
- 文档编号:19010982
- 上传时间:2023-01-03
- 格式:DOCX
- 页数:25
- 大小:21.33KB
V带传动设计c程序的编制Word文档格式.docx
《V带传动设计c程序的编制Word文档格式.docx》由会员分享,可在线阅读,更多相关《V带传动设计c程序的编制Word文档格式.docx(25页珍藏版)》请在冰豆网上搜索。
voidmain()
{
intgoon;
do
{
explain();
CHOOSE_KA();
CHOOSE_type();
CHOOSE_gaugediameter();
LengthandCenterdistance();
Beltingthenumber();
initialtension();
Axispressure();
display();
scanf("
%d"
&
goon);
//if(goon!
=1)
//break;
}while(goon==1);
}
/*******************************1.确定计算功率Pc********************************************/
voidCHOOSE_KA()
{
intworkingcondition,start_flag;
floatdayhour,nominalpower;
printf("
载荷变动选择:
\n"
);
1.载荷变动微小:
液体搅拌机;
通风和鼓风机(<
=7.5KW);
离心式水泵和压缩机;
轻型输送机。
2.载荷变动小:
带式输送机(不均匀载荷);
通风机(>
旋转式水泵和压缩机;
发电机;
金属切削机床;
印刷机;
锯木机和木工机械。
3.载荷变动较大:
制砖机;
斗式提升机;
往复式水泵和压缩机;
起重机;
磨粉机;
冲剪机床;
橡胶机械;
振动筛;
纺织机械;
重载输送机。
4.载荷变动很大:
破碎机(旋转式、颚式等);
磨碎机(球磨、棒磨、管磨)。
请选择工况(以数字标号输入):
scanf("
workingcondition);
请选择起动方式:
"
1为软起动,2为负载起动\n"
start_flag);
请输入每天工作小时数(h):
%f"
dayhour);
请输入名义功率(KW):
nominalpower);
if(start_flag==1)
if(dayhour<
10)
{
switch(workingcondition)
{
case1:
KA=KA_softstart[0][0];
break;
case2:
KA=KA_softstart[1][0];
case3:
KA=KA_softstart[2][0];
case4:
KA=KA_softstart[3][0];
}
}
if(dayhour>
=10&
&
dayhour<
=16)
KA=KA_softstart[0][1];
KA=KA_softstart[1][1];
KA=KA_softstart[2][1];
KA=KA_softstart[3][1];
16)
KA=KA_softstart[0][2];
KA=KA_softstart[1][2];
KA=KA_softstart[2][2];
KA=KA_softstart[3][2];
}
if(start_flag==2)
KA=KA_loadstart[0][0];
KA=KA_loadstart[1][0];
KA=KA_loadstart[2][0];
KA=KA_loadstart[3][0];
KA=KA_loadstart[0][1];
KA=KA_loadstart[1][1];
KA=KA_loadstart[2][1];
KA=KA_loadstart[3][1];
KA=KA_loadstart[0][2];
KA=KA_loadstart[1][2];
KA=KA_loadstart[2][2];
KA=KA_loadstart[3][2];
Pc=KA*nominalpower;
/*****************************2.选型************************************************/
voidCHOOSE_type()
inti,t;
floatnp[6],a[6]={677,100,24,7,1.16,0.32},b[6]={1.454,1.488,1.470,1.488,1.545,1.5};
printf("
请输入转速n1(r/min):
N1);
请输入转速n2(r/min):
N2);
for(i=0;
i<
6;
i++)
np[i]=a[i]*(pow(Pc,b[i]));
//n=N1;
i++)
if(N1>
np[i]||i==5)
{
t=i;
break;
switch(t)
case0:
printf("
带型TPYE:
Z型\n"
case1:
Z或A型\n"
case2:
A或B型\n"
case3:
B或C型\n"
case4:
C或D型\n"
case5:
D或E型\n"
case6:
E或F型\n"
TYPE=t;
/********************************3.基准直径选择*********************************/
voidCHOOSE_gaugediameter()
intnum,num_1,value_min,value_max;
floattransmissionratio,transmissionratio1,transmissionratio2;
intgaugediameter_all[50]={20,25,40,45,56,63,71,75,80,85,
90,95,100,106,112,118,125,132,140,150,
160,170,180,200,212,224,236,250,265,280,
315,355,375,400,425,450,475,500,530,560,
630,710,800,900,1000,1120,1250,1600,2000,2500},
gaugediameter_min[7]={20,50,75,125,200,355,500},
gaugediameter_Y[12]={20,25,40,45,56,63,71,80,90,100,112,125},
gaugediameter_Z[21]={56,63,71,75,80,90,100,112,125,140,150,160,180,200,250,280,315,355,400,500,630},
gaugediameter_A[22]={75,80,85,90,95,100,106,112,118,125,132,140,150,160,180,200,250,315,400,500,630,800},
gaugediameter_B[21]={125,132,140,150,160,170,180,200,212,224,236,250,280,315,355,400,500,630,800,1000,1120},
gaugediameter_C[18]={200,212,224,236,250,265,280,315,355,400,450,500,530,560,630,800,1000,1250},
gaugediameter_D[17]={355,375,400,425,450,475,500,530,560,630,710,800,900,1000,1250,1600,2000},
gaugediameter_E[12]={500,560,630,710,800,900,1000,1120,1250,1600,2000,2500};
最小基准直径:
Dmin=%d\n"
gaugediameter_min[TYPE]);
LOOP:
该型号带轮基准直径(mm):
switch(TYPE)
case0:
for(num=0;
num<
12;
num++)
printf("
%d"
gaugediameter_Y[num]);
};
break;
case1:
21;
gaugediameter_Z[num]);
case2:
22;
gaugediameter_A[num]);
case3:
gaugediameter_B[num]);
case4:
18;
gaugediameter_C[num]);
case5:
17;
gaugediameter_D[num]);
case6:
gaugediameter_E[num]);
请选择主动轮基准直径D1(mm):
D1);
V=PI*D1*N1/60000;
if(V>
25)
主动轮直径过大,请重新选择小主动轮直径D1:
gotoLOOP;
if(V<
5)
主动轮直径过小,请重新选择大主动轮直径D1:
D2=(N1/N2)*D1*0.99;
//计算从动轮直径D2
for(num_1=0;
num_1<
50;
num_1++)
if(D2<
=gaugediameter_all[num_1])break;
if(num_1!
=0)
value_min=gaugediameter_all[num_1-1];
value_max=gaugediameter_all[num_1];
D2=Forclosetothenumber(value_min,value_max,D2);
//(比较)
elseD2=gaugediameter_all[num_1];
transmissionratio=N1/N2;
transmissionratio1=D2/(D1*0.99);
transmissionratio2=(transmissionratio-transmissionratio1)/transmissionratio*100;
if(transmissionratio2>
传动比不适用,请重新选择主动轮直径D1:
/*********************************4.V带长度及中心距*************************************/
voidLengthandCenterdistance()
intlength_Ld[39]={200,224,250,280,315,335,400,450,500,560,
630,710,800,900,1000,1120,1250,1400,1600,1800,
2000,2240,2500,2800,3150,3350,4000,4500,5000,5600,
6300,7100,8000,9000,10000,11200,12500,14000,16000};
inta_0,Ld_0,num,value_min,value_max;
here:
请输入初选中心距(mm):
a_0);
Ld_0=2*a_0+PI*(D1+D2)/2+pow((D2-D1),2)/(4*a_0);
for(num=0;
39;
if(Ld_0<
=length_Ld[num])break;
/*value_max=length_Ld[num-1];
value_min=length_Ld[num];
Ld=Forclosetothenumber(value_min,value_max,Ld_0);
*/
if(Ld_0==length_Ld[num])
Ld=length_Ld[num];
else
Ld=length_Ld[num-1];
Centerdistance=a_0+(Ld-Ld_0)/2;
SmallpulleysAngle=180-(D2-D1)/Centerdistance*53.7;
if(SmallpulleysAngle<
120)
SmallpulleysAngle=%f度<
120度"
SmallpulleysAngle);
小带轮包角不适宜,请重新选择初选中心距:
gotohere;
/*********************************5.确定V带根数*****************************************/
voidBeltingthenumber()
floati;
intwrapangle,num,value_min,value_max;
intwrap_angle[16]={180,175,170,165,160,155,150,145,140,135,130,125,120,110,100,90};
16;
if(SmallpulleysAngle>
=wrap_angle[num])
break;
if(num!
value_min=wrap_angle[num];
value_max=wrap_angle[num-1];
wrapangle=Forclosetothenumber(value_min,value_max,SmallpulleysAngle);
elsewrapangle=180;
switch(wrapangle)
case180:
Kv=1;
case175:
Kv=0.99;
case170:
Kv=0.98;
case165:
Kv=0.96;
case160:
Kv=0.95;
case155:
Kv=0.93;
case150:
Kv=0.92;
case145:
Kv=0.91;
case140:
Kv=0.89;
case135:
Kv=0.88;
case130:
Kv=0.86;
case125:
Kv=0.84;
case120:
Kv=0.82;
case110:
Kv=0.78;
case100:
Kv=0.73;
case90:
Kv=0.68;
switch(TYPE)//传递功率的计算
P0=V*(0.147*(pow(V,-0.09))-4.79/D1-(0.479E-4)*V*V)-0.32;
P0=V*(0.450*(pow(V,-0.09))-19.62/D1-(0.799E-4)*V*V)-0.32;
P0=V*(0.769*(pow(V,-0.09))-50.79/D1-(1.385E-4)*V*V)-0.32;
P0=V*(1.477*(pow(V,-0.09))-143.66/D1-(2.369E-4)*V*V)-0.32;
P0=V*(3.223*(pow(V,-0.09))-505.48/D1-(4.791E-4)*V*V)-0.32;
P0=V*(4.844*(pow(V,-0.
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 传动 设计 程序 编制