活塞式油泵机构的设计和运动分析5组共31页文档

合集下载
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

`活塞式油泵机构的设计和运动分析
1、题目及原始数据
题目:活塞式油泵机构的设计和运动分析 机构示意图:
机构说明:该机构由齿轮1动齿轮2,在齿轮2上固连有凸轮,推动从动杆抽油运动。

原始数据: 齿轮参数:压力角α=20°,齿顶高系数ha*=1,径向间隙系数c*=0.25,从动杆运动规律,推程和回程均
为余弦运动。

2、设计原理
及方法
2.1渐开线圆柱齿轮机构的
设计原理及方法:
(1)按给定的实际中心距
a'计算啮合角
方案号

齿轮1转速n 1 r/min 300 齿数z 1 13 齿数z 2 40 模数m mm 2.5 中心距a' mm 68 凸轮基圆r b mm 60 滚子半径r T mm 15 偏距e mm 15 从动件位移H mm 100 推程角φ0 120 远休止角φs 60 回程角φ0ˊ 120 近休止角φs ˊ 60 许用压力角[α] 30 许用压力角['α]
75
画图
ααcos '
'cos a a
=
(2) 计算两轮变位系数和,并作适当分配
)'(tan 22
ααα
inv inv z z x x 121-+=
+ 变位系数按传动要求分配,保证不发生根切且小齿轮的变位系数大于大齿轮的变位系数。

齿轮不发生根切的最小变位系数为min
min min )
(*z z z ha x -=
(3)按表2-1的公式计算两轮的几何尺寸 (4)校验重合度αε和正变位齿轮的齿顶圆厚度 a s 。

一般
要求m s a )4.0~25.0(2.1≥≥,α
ε
表2-1齿轮设计计算公式 名称
符号 标准齿轮传动 高度变位
齿轮传动
正传动和负传动
分度圆直径 d
mz d =
啮合角

α
α='
αααinv z z x x inv +++=
tan )
(2'2
121
中心距
)'(a a )
(2/)(2/12121z z m d d a +=+=
a a '
cos cos 'αα
=
节圆直径 'd d d ='
d d 'cos cos 'αα
=
中心距变动系数 y
0=y
)
1'cos cos (2'21-+=-=ααz z m a a y
齿高变动系数 y ∆ 0=∆y
y x x y -+=∆21
齿顶高 a h
m h h a a *= m x h h a a )*(+=
m y x h h a )*(∆-+=
齿根高
f h
*)*(c h h a f +=
m x c h h a )**(-+=
m x c h h a )**(-+=
齿全高 h
m c h h a *)*2(+=
m y c h h a )**2(∆-+=
齿顶圆直
径 a d
a a h d d 2+=
齿根圆直径 f
d
f f h d d 2-=
重合度
αε
[])'tan (tan )'tan (tan 21221121ααααπ
εα-+-==a a n z z p B B
分度圆齿厚 s
2
m
s π=
απtan 22
xm m
s +=
齿顶厚
a s
)(2ααinv inv r r
r s
s a a a
a --= 编写好齿轮机构设计的计算机程序(利用VB 、VC 或MATLAB 语言编程)。

打开计算机,输入编写好的程序;调试
程序,输入已知数据;输出齿轮几何尺寸计算结果。

2.2凸轮机构的设计原理和方法:
(1)从动件运动规律方程:余弦加速度规律
推程运动方程:⎥⎦

⎢⎣⎡-=)cos(12ϕφπh s
)sin(2ϕφπφωπh v =
)cos(2^22^2^ϕφ
πφωπh a =
回程运动方程:
)
'
cos(2^'22^2^)
'sin('2)'cos(12ϕφπφωπϕφπφωπϕφπh a h v h s -=-=⎥


⎢⎣⎡+= (2)凸轮轮廓设计:凸轮轮廓的方程为
理论轮廓方程:)sin()cos()()
cos()sin()(00ηϕδηϕηϕδηϕe s s y e s s x -+=++=
式中e 为偏距;2^2^0e r s b -=
轴负侧时;
,当导路线偏于轴正侧时;
,当导路线偏于;
,当凸轮逆时针旋转时;,当凸轮顺时针旋转时X 1-X 11-1=+==+=δ
δηη 实际轮廓方程:
2)^(2)^(
'2)^(2)^(

ϕϕϕ
ϕϕd dy d dx d dx
r y y d dy d dx d dy
r x x r
r
+=+±=μ
实验前编写好凸轮轮廓设计的计算机程序(利用VB 、VC 或MATLAB 语言编程)。

打开计算机,输入编写好的程序;调试程序,输入已知数据; 按凸轮转角从0°到360°之间每隔5°~10°输出一组轮廓曲 线坐标。

3、设计计算
齿轮机构的设计计算:
(1)已知条件:齿轮1的转速n 1=300 rad/min ;l 两齿轮的齿数分别为z 1=13mm ,z 2=40mm ;模数m=2.5;中心距a'=68mm 。

(2)求理论中心距:
()25.66221=+=z z m
a
(3)求啮合角'α:

==
72.23''cos cos 'ααα得a a (4)确定变位系数之和:
αααinv z z x x inv +++=tan )
(2'2
121 得 763.021=+x x
(5)计算每个齿轮的最小变位系数:
353
.1;235.017
172min 1min min -==-=
x x z
x 得由
(6)确定每个齿轮的变位系数:
取763.0;428.0;335.02121=+==x x x x 即为正传动 (7)求中心距变动系数:
7.05
.225
.6668'=-=-=m a a y
(8)求齿高变动系数:
063.07.0763.021=-=-+=∆y x x y (9)按变位齿轮计算公式求出相关参数: 齿顶高:
4125
.35.2)063.0428.01()*(18.35.2)063.0335.01()*()*(2211=⨯-+=∆-+==⨯-+=∆-+=∆-+=m y x h h m y x h h m
y x h h a a a a a a
齿根高:
055
.25.2)428.025.01()**(2875.25.2)335.025.01()**()**(2211=⨯-+=-+==⨯-+=-+=-+=m x c h h m x c h h m
x c h h a f a f a f
校核小齿轮的齿厚,必须是:[]a a s s ≥ 否则要重选变
位系数。

)(2ααinv inv r r
r s s a a a
a --=
[][]
a a a a a a a a a a a a a s s m s s inv inv r r r s s r r m x s h mz h r r ≥=⨯===⎪⎪⎩
⎪⎪⎨

--===⨯︒⨯⨯+=+==+⨯=+=+=625.05.225.025.0786
.0)(2cos cos 5347
.45.220tan 335.022
()tan 22(43
.1918.32
13
5.2211111111111111得由)ααααπ
απ 满足要求。

(10) 计算齿轮啮合的重合度:

==
=+⨯=+=+=40.28cos cos 4125
.534125
.32405.22
22
222
2
222a a a a a a r r h mz h r r αα
α
[][]362
.1)'tan (tan 40)'tan (tan 1321
)'tan (tan )'tan (tan 21
212211=-+-=-+-=ααααπααααπεa a a a a z z
满足要求。

凸轮机构的设计计算:
(1)已知条件 :凸轮的基圆半径r b=60mm ,滚子半径r T=15mm ,偏距e=15mm,凸轮以等角速度转动n=300r/min ,推程角︒=1200φ,远休止角︒=60s φ,回程角︒=120'0φ,近休止角︒=60's φ,从动件运动规律推程和回程都是简谐运动,推程H=10mm ,许用压力角:推程[]︒=30α;回程[]︒=75'α (2)运动分析:
(a)推程:根据余弦运动规律 (b)回程:根据课本公式
(3)根据运动分析得出a v s 、、关于ϕ的表达式,通过循环。

每隔5~10度,计算出
a v s 、、的具体数值,制成表格,绘制a v s 、、 的曲线 。

(4)凸轮的轮廓设计:用解析法 (a)求出理论轮廓坐标方程
0001cos(())2h s πϕϕ⎡⎤
'=
+-Φ-Φ⎢⎥'Φ⎣⎦'''Φ+Φ≤≤Φ+Φ+Φ
注意其中:
2^2^0e r s b -=
轴负侧时;
,当导路线偏于轴正侧时;
,当导路线偏于;
,当凸轮逆时针旋转时;,当凸轮顺时针旋转时X 1-X 11-1=+==+=δ
δ
η
η (b)求出实际轮廓坐标方程
2)^(2)^('2)^(2)^('ϕ
ϕϕϕ
ϕϕd dy d dx d dx
r y y d dy d dx d dy
r x x r
r
+=+±=μ
注意其中的符号。

(c)根据计算出的轮廓坐标方程,通过循环,每隔5~10度, 计算出轮廓坐标的具体数值,制成表,并绘制理论轮廓曲和 实际轮廓曲线。

(5)凸轮的压力角α校核: (a)凸轮的推程压力角,根据
0tan s s e d ds +-=ηδϕ
应该满足[]αα≤,否则重新设计。

其中:
轴负侧时;
,当导路线偏于轴正侧时;,当导路线偏于;,当凸轮逆时针旋转时;,当凸轮顺时针旋转时X 1-X 11-1=+==+=δδ
η
η
(b )凸轮的回程压力角,根据公式也应满足[]αα≤,
否则要重新设计。

(6)用图解法(反转法)作出凸轮的理论轮廓曲线和实际轮廓曲线的几个特殊点(比如起始点、远休止点、30度)。

3.1程序的算法流程图:凸轮机构算法流程图
Y N
Y N
开始
输入已知数据
''00,,,,,,,s s T b H e r r φφφφ 0=ϕ
计算ϕϕ2^/2^/d s d d ds 、
Y N
N Y
Y
N
3.2程序清单及程序中符号的含义: 齿轮机构:
Private Sub Command1_Click()
'定义常量
Const pi As Single = 3.1415926
ha = 1 '齿顶高系数
c = 0.25 '顶隙系数
b = 20 * pi / 180 '分度圆压力角
'计算程序
z1 = Val(Text1.Text) '齿轮1的齿数
?'0'0φφφϕ++≤s S=0,v=0,a=0 计算s 、ϕϕ2^/2^/d s d d ds 、 计算压力角α
[]?αα≤b b b r r r ∆+=计算x,y,x',y' ?360<ϕ2+=ϕϕ
输出图形和数据 结束
z2 = Val(Text2.Text) '齿轮2的齿数
a1 = Val(Text3.Text) '实际中心距
m = Val(Text4.Text) '模数
d1 = m * z1 '齿轮1分度圆直径
d2 = m * z2 '齿轮2分度圆直径
r1 = d1 / 2 '齿轮1分度圆半径
r2 = d2 / 2 '齿轮2分度圆半径
db1 = m * z1 * Cos(b)
db2 = m * z2 * Cos(b)
a = (d1 + d2) / 2 '标准中心距
t = Sqr(1 - (Cos(b) * a / a1) ^ 2) / (Cos(b) * a / a1)
b1 = Atn(t) '啮合角
xmin1 = ha * (17 - z1) / 17 '齿轮1的最小变位系数
xmin2 = ha * (17 - z2) / 17 '齿轮2的最小变位系数
x = (z1 + z2) * (Tan(b1) - b1 - (Tan(b) - b)) / (2 * Tan(b)) '变位系数'判断传动类型
If x > 0 Then
Picture1.Print "齿轮正传动", "x="; x
Else
If x < 0 Then
Picture1.Print "齿轮负传动", "x="; x
Else
Picture1.Print "齿轮零传动", "x="; x
End If
End If
'假设x1,再根据x求x1
X1 = xmin1 + 0.1
X2 = x - X1
'判断假设正确性
If X2 >= xmin2 Then
Picture1.Print "x1假设满足条件,x2也满足条件" Else
Picture1.Print "x1假设不满足条件"
End If
y = (a1 - a) / m '中心距变动系数
dy = X1 + X2 - y '齿高变动系数
ha1 = (ha + X1 - dy) * m '齿轮1的齿顶高
ha2 = (ha + X2 - dy) * m '齿轮2的齿顶高
hf1 = (ha + c - X1) * m '齿轮1的齿根高
hf2 = (ha + c - X2) * m '齿轮2的齿根高
h = (2 * ha + c - dy) * m '全齿高
da1 = d1 + 2 * ha1 '齿轮1的齿顶圆直径
da2 = d2 + 2 * ha2 '齿轮2的齿顶圆直径
ra1 = da1 / 2
ra2 = da2 / 2
df1 = d1 - 2 * hf1 '齿轮1的齿根圆直径
df2 = d2 - 2 * hf2 '齿轮2的齿根圆直径
rb1 = m * z1 * Cos(b) / 2 '齿轮1的基圆直径
rb2 = m * z2 * Cos(b) / 2 '齿轮2的基圆直径
c1 = Atn(Sqr(ra1 ^ 2 - rb1 ^ 2) / rb1) '齿轮1的齿顶圆压力角
c2 = Atn(Sqr(ra2 ^ 2 - rb2 ^ 2) / rb2) '齿轮2的齿顶圆压力角
ea = (z1 * (Tan(c1) - Tan(b1)) + z2 * (Tan(c2) - Tan(b1))) / (2 * pi)
s1 = pi * m / 2 + 2 * pi * m * X1 * Tan(b) '齿轮1的分度圆齿厚
s2 = pi * m / 2 + 2 * pi * m * X2 * Tan(b) '齿轮2的分度圆齿厚
sa1 = s1 * r1 / ra1 - 2 * ra1 * Tan(Tan(c1) - c1 - (Tan(b) - b)) '小齿轮1齿顶厚
sa2 = s2 * r2 / ra2 - 2 * ra2 * Tan(Tan(c2) - c2 - (Tan(b) - b)) '大齿轮2
齿顶厚
Picture1.Print "齿数"; "z1="; z1; "z2="; z2, "变位系数"; "x1="; Int(X1 * 1000) / 1000; "x2="; Int(X2 * 1000) / 1000 '重合度
Picture1.Print "模数m="; m, "分度圆直径"; "d1="; d1; "d2="; d2, Picture1.Print "啮合角b1="; Int(b1 * 180 / pi * 1000) / 1000,
Picture1.Print "基圆直径"; "db1="; Int(db1 * 1000) / 1000; "db2=";
Int(db2 * 1000) / 1000
Picture1.Print "齿根圆直径"; "df1="; Int(df1 * 1000) / 1000; "df2="; Int(df2 * 1000) / 1000; ; "sa1="; Int(sa1 * 1000) / 1000; "sa2="; Int(sa2 * 1000) / 1000;
Picture1.Print
Picture1.Print "中心距a="; a1, "齿顶圆直径""da1="; Int(da1 * 1000) / 1000; "da2="; Int(da2 * 1000) / 1000; "da1="; Int(da1 * 1000) / 1000; "da2="; Int(da2 * 1000) / 1000;
Picture1.Print
'判断重合度ea是否符合条件
If ea >= 1.1 Then
Picture1.Print "重合度ea满足要求""ea="; Int(ea * 1000) / 1000 Else
Picture1.Print "重合度ea不满足要求""ea="; Int(ea * 1000) / 1000 End If
'判断小齿轮1的齿厚是否满足条件
If sa1 >= 0.25* m Then
Picture1.Print "小齿轮1齿顶厚满足要求"; "sa1="; Int(sa1 * 1000) / 1000; "sa2="; Int(sa2 * 1000) / 1000
Else
Picture1.Print "小齿轮1齿顶厚不满足要求"; "sa1="; Int(sa1 * 1000) / 1000; "sa2="; Int(sa2 * 1000) / 1000
End If
Picture1.Print "中心距变动系数y="; Int(y * 1000) / 1000, "齿高变动系数dy="; Int(dy * 1000) / 1000
End Sub
Private Sub Command2_Click()
Picture1.Cls
End Sub
凸轮机构:
Public tj As Single '定义全局变量
Private Sub Command2_Click()
'符号定义及常量声明
Dim e As Single '定义e为偏距
Dim rb As Single '定义rb为基圆半径
Dim rr As Single '定义rr为滚子半径
Dim h As Single '定义h为从动件位移
Dim tcj As Single '定义tcj为推程角
Dim jxj As Single '定义jxj为近休止角
Dim yxj As Single '定义yxj为远休止角
Dim hcj As Single '定义hcj为回程角
Dim s As Single '定义s为位移符号
Const pi = 3.1415926
e = Val(Text1.Text) '输入偏距e
rb = Val(Text2.Text) '输入基圆半径rb
rr = Val(Text3.Text) '输入滚子半径rr
h = Val(Text4.Text) '输入从动件位移h
n1 = Val(Text5.Text) '输入齿轮1的转速n1
z1 = Val(Text6.Text) '齿轮1的齿数z1
z2 = Val(Text7.Text) '齿轮2的齿数z2
w = 2 * pi * n1 * z1 / z2 '输入凸轮的转速rad/s
tcj = pi / 180 * Val(Text8.Text) '转换成弧度制的推程角
jxj = pi / 180 * Val(Text9.Text) '转换成弧度制的远休止角
hcj = pi / 180 * Val(Text10.Text) '转换成弧度制的近休止角
yxj = pi / 180 * Val(Text11.Text) '转换成弧度制的回程角
amax = 0 '假设最大压力角的正切值为0
s0 = Sqr(rb ^ 2 - e ^ 2)
Form1.Picture1.Circle (1500, 3500), 10 * rb, RGB(120, 0, 0) '画基圆For tj = 0 To 2 * pi Step 0.0872222 '利用For循环语句
If tj < tcj Then
s = h / 2 * (1 - Cos(pi * tj / tcj)) '假设推程采用余弦加速度运动规律x = (s0 + s) * Sin(tj) + e * Cos(tj) '坐标方程
y = (s0 + s) * Cos(tj) - e * Sin(tj) '坐标方程
v = pi * h * w / (2 * tcj) * Sin(pi * tj / tcj) '推程运动的速度
dA = pi ^ 2 * h * w ^ 2 / (2 * tcj ^ 2) * Cos(pi * tj / tcj) '推程运动的加速度
Picture1.PSet (10 * x + 1500, -10 * y + 3500), RGB(255, 0, 0) Picture1.PSet (500 * tj + 3000, -10 * s + 2000), RGB(150, 0, 0) Picture1.PSet (500 * tj + 3000, -v / 100 + 2000), RGB(255, 0, 0)
Picture1.PSet (500 * tj + 3000, -dA / 100000 + 2000), RGB(0, 0, 0)
Q = (pi * h) / (2 * tcj) * Sin(pi / tcj * tj) 'ds/dtj
A = s0 * Cos(tj) + Q * Sin(tj) + s * Cos(tj) - e * Sin(tj) 'dx/dtj
B = -s0 * Sin(tj) + Q * Cos(tj) - s * Sin(tj) - e * Cos(tj) 'dy/dtj
X1 = x + rr * B / Sqr(A ^ 2 + B ^ 2)
Y1 = y - rr * A / Sqr(A ^ 2 + B ^ 2)
'利用条件语句找出最大压力角
If amax < Abs(Q - e) / (s + s0) Then
amax = Abs(Q - e) / (s + s0)
Else
amax = amax
End If
Picture1.PSet (10 * X1 + 1500, -10 * Y1 + 3500), RGB(0, 0, 0) '到图片框中描点绘制轮廓曲线
ElseIf tj < (tcj + yxj) Then
s = h
Q = 0
x = (s0 + s) * Sin(tj) + e * Cos(tj)
y = (s0 + s) * Cos(tj) - e * Sin(tj)
v = 0
dA = 0
Picture1.PSet (10 * x + 1500, -10 * y + 3500), RGB(255, 0, 0) Picture1.PSet (500 * tj + 3000, -10 * s + 2000), RGB(150, 0, 0) Picture1.PSet (500 * tj + 3000, -v / 100 + 2000), RGB(255, 0, 0)
Picture1.PSet (500 * tj + 3000, -dA / 100000 + 2000), RGB(0, 0, 0)
A = (s0 + s) * Cos(tj) - e * Cos(tj)
B = -(s0 + s) * Sin(tj) - e * Cos(tj)
X1 = x + rr * B / Sqr(A ^ 2 + B ^ 2)
Y1 = y - rr * A / Sqr(A ^ 2 + B ^ 2)
If amax < Abs(Q - e) / (s + s0) Then
amax = Abs(Q - e) / (s + s0)
Else
amax = amax
End If
Picture1.PSet (10 * X1 + 1500, -10 * Y1 + 3500), RGB(0, 0, 0)
ElseIf tj < (tcj + yxj + hcj) Then
s = h / 2 * (1 + Cos(pi / hcj * (tj - tcj - yxj)))
Q = -(pi * h) / (2 * hcj) * Sin(pi / hcj * (tj - tcj - yxj))
x = (s0 + s) * Sin(tj) + e * Cos(tj)
y = (s0 + s) * Cos(tj) - e * Sin(tj)
v = -pi * h * w / (2 * hcj) * Sin(pi * (tj - tcj - yxj) / hcj)
dA = -pi ^ 2 * h * w ^ 2 / (2 * hcj ^ 2) * Cos(pi * (tj - tcj - yxj) / hcj) Picture1.PSet (10 * x + 1500, -10 * y + 3500), RGB(255, 0, 0) Picture1.PSet (500 * tj + 3000, -10 * s + 2000), RGB(150, 0, 0) Picture1.PSet (500 * tj + 3000, -v / 100 + 2000), RGB(255, 0, 0)
Picture1.PSet (500 * tj + 3000, -dA / 100000 + 2000), RGB(0, 0, 0)
A = s0 * Cos(tj) + Q * Sin(tj) + s * Cos(tj) - e * Sin(tj)
B = -s0 * Sin(tj) + Q * Cos(tj) - s * Sin(tj) - e * Cos(tj)
X1 = x + rr * B / Sqr(A ^ 2 + B ^ 2)
Y1 = y - rr * A / Sqr(A ^ 2 + B ^ 2)
If amax < Abs(Q - e) / (s + s0) Then
amax = Abs(Q - e) / (s + s0)
Else
amax = amax
End If
Picture1.PSet (10 * X1 + 1500, -10 * Y1 + 3500), RGB(0, 0, 0)
Else
s = 0
Q = 0
x = (s0 + s) * Sin(tj) + e * Cos(tj)
y = (s0 + s) * Cos(tj) - e * Sin(tj)
v = 0
dA = 0
Picture1.PSet (10 * x + 1500, -10 * y + 3500), RGB(255, 0, 0) Picture1.PSet (500 * tj + 3000, -10 * s + 2000), RGB(150, 0, 0) Picture1.PSet (500 * tj + 3000, -v / 100 + 2000), RGB(255, 0, 0)
Picture1.PSet (500 * tj + 3000, -dA / 100000 + 2000), RGB(0, 0, 0)
A = s0 * Cos(tj) - e * Sin(tj)
B = -s0 * Sin(tj) - e * Cos(tj)
X1 = x + rr * B / Sqr(A ^ 2 + B ^ 2)
Y1 = y - rr * A / Sqr(A ^ 2 + B ^ 2)
If amax < Abs(Q - e) / (s + s0) Then
amax = Abs(Q - e) / (s + s0)
Else
amax = amax
End If
Picture1.PSet (10 * X1 + 1500, -10 * Y1 + 3500), RGB(0, 0, 0)
End If
Next tj
'判断压力角是否在a1到a2的允许范围之内
If amax > Tan(pi * Val(Text12.Text) / 180) And amax < Tan(pi * Val(Text13.Text) / 180) Then
Text14.Text = "满足压力角条件且最大压力角为" & Int(100 * Atn(amax) / pi * 180) / 100 & "°"
Else
Text14.Text = "不满足压力角条件且最大压力角为" & Int(100 * Atn(amax) / pi * 180) / 100 & "°"
End If
Command2.Enabled = False
End Sub
Private Sub Command1_Click()
'坐标系1
Picture1.Line (2500, 2000)-(6500, 2000)
Picture1.Line (6500, 2000)-(6300, 1900)
Picture1.Line (6500, 2000)-(6300, 2100)
Picture1.Line (3000, 3200)-(3000, 100)
Picture1.Line (3000, 100)-(2900, 300) Picture1.Line (3000, 100)-(3100, 300) '坐标系2
Picture1.Line (100, 3500)-(4000, 3500) Picture1.Line (4000, 3500)-(3800, 3400) Picture1.Line (4000, 3500)-(3800, 3600) Picture1.Line (1500, 1500)-(1500, 6000) Picture1.Line (1500, 1500)-(1400, 1700) Picture1.Line (1500, 1500)-(1600, 1700) Command2.Enabled = True Command1.Enabled = False
End Sub
Private Sub Command3_Click()
'清屏
Picture1.Cls
Text14.Text = ""
Command1.Enabled = True
End Sub
Private Sub Command5_Click()
tj = 0 Form1.Hide Form2.Show
Timer1.Enabled = True End Sub
Private Sub Command4_Click() Unload Me End Sub
3.4
计算结果列表:
齿轮机构计算结果
理论中心距 25.66=a
最小变位系数 353.1;235.02min 1min -==x x 齿顶高 4125.3;18.321==a a h h
齿根高 055.2;2875.221==f f h h
齿轮正传动 X=0.764150686866238 变位系数 X 1=0,335 ;X 2=0.428 分度圆直径 mm d mm d 100;5.3221==
齿根圆直径
mm d mm d f f 894.95;926.2721==
基圆直径 mm d mm d b b 969.93;54.3021==
齿顶圆直径 mm d mm d a a 823.106;855.3821==
啮合角 ︒
=721.23'α
重合度 362.1=αε
中心距变动系数 7.0=y
齿高变动系数 064.0=∆y
齿厚
754.2;768.021==a a s s
凸轮机构的计算结果
ϕ
)(mm s )
(s mm v / )2^/s mm a (
推程阶段 0° 0 0 33.754 5° 0.4278 5.3623 33.4652 10° 1.7037 10.6328 32.6039 15° 3.8060 15.7214 31.1846 20° 6.6987 20.541 29.2318 25° 10.3323 25.0091 26.7788 30° 14.6447 29.0494 23.8677 35°
19.5619
32.5925
20.5481
40°25.0000 35.5781 16.8770 45°30.8658 37.9548 12.9171 50°37.0590 39.6822 8.7362 55°43.4737 40.7305 4.4058 60°50.0000 41.0820 0 65°56.5263 40.7305 -4.4058 70°62.9410 39.6822 -8.7362 75°69.1342 37.9548 -12.9171 80°75.0000 35.5781 -16.8770 85°80.4381 32.5925 -20.5481 90°85.3553 29.0494 -23.8677 95°89.6677 25.0091 -26.7788 100°93.3013 20.5410 -29.2318 105°96.1940 15.7214 -31.1846 110°98.2963 10.6328 -32.6039 115°99.5722 5.3623 -33.4652 120°100 0 -33.754
回程阶段
180°100 0 -33.754 185°99.5722 -5.3623 -33.4652 190°98.2963 -10.6328 -32.6039 195°96.1940 -15.7214 -31.1846 200°93.3013 -20.541 -29.2318 205°89.6677 -25.0091 -26.7788 210°85.3553 -29.0494 -23.8677 215°80.4381 -32.5925 -20.5481 220°75.0000 -35.5781 -16.8770 225°69.1342 -37.9548 -12.9171 230°62.9410 -39.6822 -8.7362 235°56.5263 -40.7305 -4.4058 240°50.0000 -41.0820 0 245°43.4737 -40.7305 4.4058 250°37.0590 -39.6822 8.7362 255°30.8658 -37.9548 12.9171 260°25.0000 -35.5781 16.8770 265°19.5619 -32.5925 20.5481
270°14.6447 -29.0494 23.8677
275°10.3323 -25.0091 26.7788
280° 6.6987 -20.5410 29.2318
285° 3.8060 -15.7214 31.1846
290° 1.7037 -10.6328 32.6039
295°0.4278 -5.3623 33.4652
300°0 0 33.754
其中在远休止角是s保持100mm不变,在近休止角时s保持0mm不变。

3.5图解法计算结果:
画图;
3.6解析法与图解法的结果比较:
图解法是有一定的误差的,没有解析法那么的精确,通过两者之间的比较,发现两者的计算结果的差异,在所能承受的误差范围内,两者的结果基本符合,这也说明机构的设计是成功的。

计算结果的对比表
4、课程设计心得
5、参考文献
[1] 田竹友.微机在机械原理中的应用[M].北京:机械工业出版社,2019
[2]王知行.机械原理计算机辅助设计[M].北京:机械工业出版社,2019
第 31 页。

相关文档
最新文档