哈工大 机械设计电算Word文件下载.docx

哈工大 机械设计电算Word文件下载.docx

《哈工大 机械设计电算Word文件下载.docx》由会员分享，可在线阅读，更多相关《哈工大 机械设计电算Word文件下载.docx（14页珍藏版）》请在冰豆网上搜索。

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

1、普通V带传动设计内容

给定原始数据：

传递的功率P，小带轮转速n1，传动比i，各种必要的修正系数及工作条件。

设计内容：

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

2、电算的任务：

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

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

（3）按习题或作业中数据运行程序，进行计算并输出所有结果。

二、变量标识符

序号

名称

代号

标识符

单位

1

名义功率

P

kw

2

设计功率

Pd

3

工作情况系数

KA

4

小带轮转速

n1

r/min

5

工作机载荷特性

GZJ

6

原动机类型

YDJ

7

工作时间

TMIE

8

带型号

Z、A…E

TYPE

9

小带轮基准直径

dd1

mm

10

大带论基准直径

dd2

11

带速

v

V

m/s

12

最大带速

vmax

VMAX

13

预估中心距

a0

14

实际中心距

a

15

基准长度

Ld

16

小带轮包角

α1

ALF1

度

17

V带根数

Z

18

基本额定功率

P0

19

功率增量

ΔP0

DIFP0

20

传动比系数

Ki

21

长度系数

KL

22

包角系数

Kα

Kalf

23

弯曲影响系数

Kb

24

初拉力

F0

N

25

压轴力

Q

26

轮缘宽度

B

27

圆周率

π

PAI

三、程序框图

四、程序源代码（MATLAB语言编写）

源程序所有程序过多，所以只附上主程序代码

i=str2double（get（handles.In_i,'

String'

））;

ifi>

=2

Ki=1.1373;

elseifi>

=1.52

Ki=1.1202;

=1.35

Ki=1.1036;

=1.25

Ki=1.0875;

=1.19

Ki=1.0719;

=1.13

Ki=1.0567;

=1.09

Ki=1.0419;

=1.05

Ki=1.0276;

=1.02

Ki=1.0136;

=1

Ki=1.0000;

end

set（handles.Out_Ki,'

num2str（Ki））;

dx=get（hObject,'

Value'

）

ifdx==1

set（handles.Out_Vmax,'

25）;

set（handles.Out_Kb,'

0.0002925）;

set（handles.Out_ddmin,'

50）;

set（handles.Out_m,'

0.06）;

elseifdx==2

0.0007725）;

75）;

0.1）;

elseifdx==3

0.0019875）;

125）;

0.17）;

elseifdx==4

0.005625）;

200）;

0.3）;

elseifdx==5

30）;

0.01995）;

355）;

0.6）;

elseifdx==6

0.03735）;

500）;

0.9）;

end

dd1=str2double（get（handles.In_dd1,'

n=str2double（get（handles.In_n,'

Vmax=str2double（get（handles.Out_Vmax,'

v=3.1415*dd1*n/60/1000;

ddd2=i*dd1;

set（handles.Out_v,'

num2str（v））;

set（handles.dd2,'

num2str（ddd2））;

ifv>

Vmax

set（handles.Attention,'

'

“v”istoohuge.Pleasedecreasedd1!

'

）;

else

OK!

Pleasegoon!

dd2=str2double（get（handles.In_dd2,'

a0=str2double（get（handles.In_a0,'

Ld0=2*a0+3.1415*（dd1+dd2）/2+（dd2-dd1）^2/（4*a0）;

set（handles.Out_Ld0,'

num2str（Ld0））;

Ld=str2double（get（handles.In_Ld,'

Ld0=str2double（get（handles.Out_Ld0,'

a=a0+（Ld-Ld0）/2;

alf1=180-（dd2-dd1）/a*57.3;

set（handles.Out_a,'

num2str（a））;

set（handles.Out_alf1,'

num2str（alf1））;

dx=get（handles.Out_dx,'

Ki=str2double（get（handles.Out_Ki,'

Kb=str2double（get（handles.Out_Kb,'

v=str2double（get（handles.Out_v,'

K1=0.246;

K2=7.44;

K3=0.441/10000;

K1=0.449;

K2=19.02;

K3=0.765/10000;

K1=0.794;

K2=50.6;

K3=1.31/10000;

K1=1.48;

K2=143.2;

K3=2.34/10000;

K1=3.15;

K2=507.3;

K3=4.77/10000;

K1=4.57;

K2=951.5;

K3=7.06/10000;

P0=（K1*v^（-0.09）-K2/dd1-K3*v^2）*v;

set（handles.Out_P0,'

num2str（P0））;

DP0=Kb*n*（1-1/Ki）;

set（handles.Out_DP0,'

num2str（DP0））;

functionOut_P0_Callback（hObject,eventdata,handles）

Pd=str2double（get（handles.Out_Pd,'

P0=str2double（get（handles.Out_P0,'

DP0=str2double（get（handles.Out_DP0,'

Kalf=str2double（get（handles.Out_Kalf,'

Kl=str2double（get（handles.Out_Kl,'

m=str2double（get（handles.Out_m,'

alf1=str2double（get（handles.Out_alf1,'

Z1=Pd/（（P0+DP0）*Kalf*Kl）;

Z=ceil（Z1）;

F0=500*P