哈工大机械设计大作业_V带传动电算说明书

设计说明书——

普通V带传动ＣＡＤ

系别：机械设计制造及其自动化：蒋延达

学号：H100811204

班级：1008101

时间：2012.11.1

指导教师：宋宝玉

一：普通V带传动设计容和任务

1、普通V带传动设计容

给定原始数据：传递的功率P，小带轮转速n，传动比i及工作条件。

设计容：带型号，基准长度Ld，根数Z，传动中心距a，带轮基准直径dd1、dd2，带轮轮缘宽度B，初拉力F0，和压轴力Q。

2、CAD任务：

（1）编制V带传动设计程序框图。

（2）编制V带传动设计原程序。

（3）按习题或作业中数据运行程序，要求对每一组数据各按三种V带型号计算，对每一种带型号选三种小带轮直径进行计算并输出所有结果。

二、变量标识符

三、程序框图

四、VC++源程序

//请勿将本程序用于其他用途

//在未经设计者允许请勿、复制等侵权行为

//这个程序凝聚了设计者的巨大心血请尊重劳动者的成果

//设计者蒋延达 H100811204

//时间 2012.11.1 22:50 工业大学A02公寓

#include

#include

#include

#include

#include "process.h"

#define Pi 3.1415926

double P,Pd,KA,n1,aMIN,aMAX,V,a,Ld0,ALF1,z,P0,DIFP0,Kb,Ki,KL,KALF,F0,FQ,j,c,m0; char TYPE,q;

int Ld,dd1,dd20,dd2,i,reply;

char A,B,C,D,E,Y,Z;

main()

{

printf("设计者蒋延达 \n");

printf("以下用到的表均取自《机械设计》第五版，宋宝玉，王黎钦，著，高等教育2009年;\n");

printf("V带的型号选用Z,A,B,C,D,E六种可选带型;\n");

printf("请输入额定功率P(kW)：");

scanf("%lf",&P);//名义功率

printf("请输入转速n1(r/min)：");

scanf("%lf",&n1);//小带轮转速

printf("请查表5.7并输入工况系数KA：");

scanf("%lf",&KA);

printf("环境恶劣否？n/y\n");

scanf(" %c",&q);

switch(q)

{

case 'n':Pd=P*KA;printf("名义功率Pd为：%.3fkW",Pd);break;

case 'y':Pd=P*1.1*KA;printf("名义功率Pd为：%.3fkW",Pd);break;

}

for(j=1;j<=5;j++)

{

printf("\n请查图5.17，根据功率和转速选择带的类型：");

scanf(" %c",&TYPE);

//带轮型号和弯曲影响系数

//*************************************************************

switch(TYPE)

{

case 'Y': printf("带轮最小基准直径是20mm\n");

printf("Y型带轮基准直径分别是20、28、35.5、40mm\n");m0=0.02;

break;

case 'Z': printf("带轮最小基准直径是50mm\n");Kb=0.0002925;m0=0.06;

printf("Z型带轮基准直径分别是50、63、71、80mm");

break;

case 'A': printf("带轮最小基准直径是75mm\n");Kb=0.0007725;m0=0.1;

printf("A型带轮基准直径分别是75、90、100、125mm\n");

break;

case 'B': printf("带轮最小基准直径是125mm\n");Kb=0.0019875;m0=0.17;

printf("B型带轮基准直径分别是125、140、160、180mm\n");

break;

case 'C': printf("带轮最小基准直径是200mm\n");Kb=0.005625;m0=0.3;

printf("C型带轮基准直径分别是200、250、315、400mm\n");

break;

case 'D': printf("带轮最小基准直径是355mm\n");Kb=0.01995;m0=0.6;

printf("D型带轮基准直径分别是355、400、450、500mm\n");

break;

case 'E': printf("带轮最小基准直径是500mm\n");Kb=0.03735;m0=0.9;

printf("E型带轮基准直径分别是500、560、630、710mm\n");

break;

}

//**************************************************************** printf("请选择合适小带轮直径dd1(mm)：");

scanf("%d",&dd1);

printf("小带轮直径dd1(mm)：%d",dd1);

printf("请输入传动比i：");

scanf("%d",&i);

dd20=dd1*i;

printf("大带轮直径为%d",dd20);

printf("大带轮直径为%.3d mm：",dd20);

printf("\n请查表取标准值并输入大带轮直径dd2(mm)：");

scanf("%d",&dd2);

for (c=1;c<4;c++)

{ if (fabs((dd2/dd1-i)/i)>=0.05)

{

printf("传动比误差过大,不可用！");

}

else break;

printf("\n请查表取标准值重新输入大带轮直径dd2(mm)：");

scanf("%lf",&dd2);