Worksheets(3).Range("b4") = z6
Worksheets(3).Range("a5") = "m"
Worksheets(3).Range("b5") = m
Worksheets(3).Range("a6") = "h1"
Worksheets(3).Range("b6") = h1
Worksheets(3).Range("a7") = "c"
Worksheets(3).Range("b7") = c
For i = 1 To 21
Worksheets(3).Cells(i + 8, 1).Value = i
Next i
'вычисление
Worksheets(3).Range("b8") = "полученные значения"
Worksheets(3).Range("c8") = "шестерня 5"
Worksheets(3).Range("d8") = "колесо 6"
Worksheets(3).Range("b9") = "суммарное число зубьев z"
z = z5 + z6
Worksheets(3).Range("c9") = z
Worksheets(3).Range("b10") = "min коэффициент смещения X"
x5 = (17 - z5) / 17
x6 = -x5
Worksheets(3).Range("c10") = x5
Worksheets(3).Range("d10") = x6
Worksheets(3).Range("b11") = "угол профиля исходного контура"
v = 20
q = 0.348888
Worksheets(3).Range("c11") = v
Worksheets(3).Range("b12") = "делительное межосевое расстояние a"
a = 0.5 * m * (z5 + z6)
Worksheets(3).Range("c12") = a
Worksheets(3).Range("b13") = "inv20"
inv = 0.0149
Worksheets(3).Range("c13") = inv
Worksheets(3).Range("b14") = "межосевое расстояние aw"
Worksheets(3).Range("c14") = a
Worksheets(3).Range("b15") = "делительная высота головки зуба ha"
ha5 = m * (h1 + x5)
ha6 = m * (h1 + x6)
Worksheets(3).Range("c15") = ha5
Worksheets(3).Range("d15") = ha6
Worksheets(3).Range("b16") = "делительная высота ножки зуба hf"
hf5 = m * (h1 + c - x5)
hf6 = m * (h1 + c - x6)
Worksheets(3).Range("c16") = hf5
Worksheets(3).Range("d16") = hf6
Worksheets(3).Range("b17") = "высота зуба h"
h = ha5 + hf5
Worksheets(3).Range("c17") = h
'диаметры
Worksheets(3).Range("b18") = "делительный диаметр d"
d5 = m * z5
d6 = m * z6
Worksheets(3).Range("c18") = d5
Worksheets(3).Range("d18") = d6
Worksheets(3).Range("b19") = "основной диаметр db"
db5 = m * z5 * Cos(q)
db6 = m * z6 * Cos(q)
Worksheets(3).Range("c19") = db5
Worksheets(3).Range("d19") = db6
Worksheets(3).Range("b20") = "начальный диаметр dw"
dw5 = d5
dw6 = d6
Worksheets(3).Range("c20") = dw5
Worksheets(3).Range("d20") = dw6
Worksheets(3).Range("b21") = "диаметр вершин зубьев da"
da5 = m * z5 + 2 * m * (h1 + x5)
da6 = m * z6 + 2 * m * (h1 + x6)
Worksheets(3).Range("c21") = da5
Worksheets(3).Range("d21") = da6
Worksheets(3).Range("b22") = "диаметр впадин зубьев df"
df5 = m * z5 - 2 * m * (h1 + c - x5)
df6 = m * z6 - 2 * m * (h1 + c - x6)
Worksheets(3).Range("c22") = df5
Worksheets(3).Range("d22") = df6
Worksheets(3).Range("b23") = "делительная толщина зубьев S"
s5 = 0.5 * 3.14 * m + 2 * m * x5 * Tan(q)
s6 = 0.5 * 3.14 * m + 2 * m * x6 * Tan(q)
Worksheets(3).Range("c23") = s5
Worksheets(3).Range("d23") = s6
Worksheets(3).Range("b24") = "основная толщина зубьев Sb"
sb5 = db5 * (3.14 / (2 * z5) + 2 * x5 * Tan(q) / z5 + inv)
sb6 = db6 * (3.14 / (2 * z6) + 2 * x6 * Tan(q) / z6 + inv)
Worksheets(3).Range("c24") = sb5
Worksheets(3).Range("d24") = sb6
Worksheets(3).Range("b25") = "начальная толщина зубьев Sw"
sw5 = s5
sw6 = s6
Worksheets(3).Range("c25") = sw5
Worksheets(3).Range("d25") = sw6
Worksheets(3).Range("b26") = "делительный шаг P"
p = 3.14 * m
Worksheets(3).Range("c26") = p
Worksheets(3).Range("b27") = "основной шаг pb"
pb = 3.14 * m * Cos(q)
Worksheets(3).Range("c27") = pb
Worksheets(3).Range("b28") = "радиус кривизны галтели r"
r = 0.4 * m
Worksheets(3).Range("c28") = r
Worksheets(3).Range("b29") = "коэффициент торцевого перекрытия e"
t5 = (((da5 / db5) ^ 2) - 1) ^ 0.5
t6 = (((da6 / db6) ^ 2) - 1) ^ 0.5
e = (z5 * t5 + z6 * t6 - (z5 + z6) * Tan(q)) / (2 * 3.14)
Worksheets(3).Range("c29") = e
End Sub
Список литературы
1Алехнович В.М.”Теория механизмов и манипуляторов”. Издательство высшая школа.1985г.
2.Машков А.А.”Теория механизмов и манипуляторов”. Издательство высшая школа.1971г.
Приложение
исходные данные | |||
наимено- вание параметра | обозначение | единица измерения | значение |
O1-A | r | м | 0.113 |
О1-О2 | e | м | 0.35 |
B-O2 | r1 | м | 0.7 |
y | y | м | 0.14 |
BC | l | м | 0.21 |
w1 | w1 | с | 13.80 |
угол размаха | b | рад | 0.87266 |
результаты вычислений | |||
угол поворота | перемещение | скорость | ускорение |
0 | -0.004922 | -0.00083 | 5.38194 |
0.5236 | 0.0141113 | 0.60678 | 3.80533 |
1.0472 | 0.0561586 | 0.865058 | 2.90399 |
1.5708 | 0.1068522 | 0.935913 | 1.44724 |
2.0944 | 0.1582127 | 0.898178 | -0.2797 |
2.61799 | 0.2054088 | 0.789663 | -1.6989 |
3.14159 | 0.2447813 | 0.613949 | -2.4693 |
3.66519 | 0.2716014 | 0.3239 | -2.9936 |
4.18879 | 0.275994 | -0.23141 | -3.9887 |
4.71239 | 0.235559 | -1.32772 | -4.7289 |
5.23599 | 0.128899 | -2.26762 | 2.34036 |
5.75959 | 0.0256355 | -1.20752 | 6.53008 |
6.28319 | -0.004922 | -0.00083 | 5.38168 |
результаты аналитического расчета | |||||
начальные параметры | |||||
m3 | 6 | ||||
m4 | 70 | ||||
m5 | 120 | ||||
полученные значения | |||||
N | u3 | mu3 | u4 | mu4 | u5 |
0 | -57.2731 | -2.34731 | -114.527 | 17.41795 | -1.1E+07 |
1 | -164.798 | -6.93282 | -337.12 | 50.99269 | -1.6E+08 |
2 | -276.534 | -11.8008 | -569.925 | 85.85486 | -3.5E+08 |
3 | -274.011 | -11.6716 | -564.147 | 84.71694 | -4E+08 |
4 | -144.589 | -5.97045 | -293.037 | 43.71576 | -2.5E+08 |
5 | -14.8626 | 0.344928 | -18.0173 | -1.93163 | -5.5E+07 |
6 | -27.7479 | 0.975466 | -49.8168 | -7.57031 | -8453251 |
7 | -108.177 | -5.36884 | -240.551 | 36.11039 | -1.7E+08 |
8 | -270.175 | -12.9273 | -589.596 | 88.70336 | -3.8E+08 |
9 | -305.491 | -14.5559 | -664.985 | 100.0586 | -4.3E+08 |
10 | -193.961 | -9.33578 | -424.105 | 63.86084 | -2.6E+08 |
11 | -67.0119 | -3.22456 | -145.531 | 22.04901 | -5.8E+07 |
12 | -56.9106 | -2.33274 | -113.79 | 17.30617 | -1.1E+07 |
результаты аналитического расчета | |||
начальные параметры | |||
z5 | 12 | ||
z6 | 40 | ||
m | 5 | ||
h1 | 1 | ||
c | 0.25 | ||
полученные значения | шестерня 5 | колесо 6 | |
1 | суммарное число зубьев z | 52 | |
2 | min коэффициент смещения X | 0.2941177 | -0.294 |
3 | угол профиля исходного контура | 20 | |
4 | делительное межосевое расстояние a | 130 | |
5 | inv20 | 0.0149 | |
6 | межосевое расстояние aw | 130 | |
7 | делительная высота головки зуба ha | 6.4705887 | 3.5294 |
8 | делительная высота ножки зуба hf | 4.7794117 | 7.7206 |
9 | высота зуба h | 11.25 | |
10 | делительный диаметр d | 60 | 200 |
11 | основной диаметр db | 56.385206 | 187.95 |
12 | начальный диаметр dw | 60 | 200 |
13 | диаметр вершин зубьев da | 72.941177 | 207.06 |
14 | диаметр впадин зубьев df | 50.441177 | 184.56 |
15 | делительная толщина зубьев S | 8.9199084 | 6.7801 |
16 | основная толщина зубьев Sb | 9.2226541 | 9.1721 |
17 | начальная толщина зубьев Sw | 8.9199084 | 6.7801 |
18 | делительный шаг P | 15.7 | |
19 | основной шаг pb | 14.754129 | |
20 | радиус кривизны галтели r | 2 | |
21 | коэффициент торцевого перекрытия e | 1.5002282 |
[C1]ω