Определение угловых скоростей и ускорений

↑

▷ Содержание

⇐ ПредыдущаяСтр 2 из 4Следующая ⇒

Угловые скорости и ускорения определим для третьего положения механизма:

0,8/(187*0,002)=2,14

(12*0,1)/(187*0,002)=3,21

Направление угловых скоростей и ускорений указывают векторы относительных скоростей и относительных тангенциальных ускорений, если их перенести в соответствующие точки механизма.

Определение скоростей и ускорений центров масс звеньев

Скорости и ускорения центров масс звеньев определим из плана скоростей и плана ускорений для третьего положения механизма.

Относительные угловые скорости звеньев, образующих вращательную пару, определим по формуле:

ω_отн = ω_ij = ω_i ± ω_j

Знак “+” ставится при разном направлении угловых скоростей звеньев, а “−” −при одинаковом направлении.

ω₁₂ = ω₁ – ω₃ =10,47-2,14=8,33

Аналитический метод расчёта

Кулисный механизм состоит из звеньев: кривошипа 1, кулисного камня 2, кулисы 3 и стойки.

Положение точки А определяется уравнениями:

Угол размаха кулисы можно определить по уравнению:

Скорость точки А1, принадлежащей кривошипу 1 равна:

Скорость точки А3, принадлежащей кулисе 3 равна:

Расстояние AB:

(5)

Угловая скорость кулисы:

Продифференцируем уравнение по времени:

Расчёт скоростей и ускорений на ЭВМ

Sub Kulis ()

Const H = 0.430

Const L0 = 0.16

Const L1 =0.092

Const a = 0.27

Const Wl = 10,67

i = 2

For fl = 18 * 3.14 / 180 To 378 * 3.14 /180 Step 30 * 3.14 /180

Cosf3 = L1 * cos(fl)/ (((LI ^ 2 + L0 * LI * sin(fl)) ^ (1 / 2))

U31 = (cosf3 ^ 2) * (LI ^ 2 + L0 * LI * sin(fl)) /(LI ^ 2 * (cos(fl)^ 2))

T = (LI ^ 2) + L0 * LI * sin(fl)

Q = (LI ^ 2) + (L0 ^ 2) + 2 * L0 * LI * sin(fl)

w3 = Wl * (T / Q)

up31=(L0*LI*cos(fl)*(L0^2 - LI^2)) /(((L0^2) - (LI^2) + 2*L0*LI*sin(fl))^2)

e3=(Wl ^2)*up31

sinf3 = (L0 + LI * sin(fl)) / ((LO ^ 2 + LI ^ 2 +2*LO*L1 * sin(fl)) ^ (1 / 2))

u53=(a/(sinf3^2))

vb = w3 * u53

Worksheets(1).Cells(3, I + 1).Value = CDbl(Format(vb, "Fixed"))

Up53 = (2 *a * cosf3) / (sinf3 ^ 3)

Ab =(w3 ^ 2) * up53 + e3 * u53

Worksheets(l).Cells(8,1 + 1).Value = CDbl(Forrnat(ab, "Fixed"))

Worksheets(l).Cells(2, i). Value -1 - 2

Worksheets(l).Cells(7, i). Value = 1-2

I = I + 1

Next fl

Worksheets(l).Cells(2, l). Value = "Vb,м/c"

Worksheets(l).Cells(3, 1). Value = "Аналитические"

Worksheets(l).Cells(4, 1). Value = "Графические"

Worksheets(l).Cells(7, l). Value = "ab,м/c"

Worksheets(l).Cells(8, 1). Value = " Аналитические "

Worksheets(l).Cells(9, l). Value = "Графические"

Worksheets(l).Cells(l, 1). Value = "Taблица1"

Worksheets(l).Cells(l, 5). Value - "Значения скоростей Vb, м/с"

Worksheets(l).Cells(6, l). Value = "Taблица 2"

Worksheets(l).Cells(6, 5).Value = "Значения ускорений ab, м/с²"

End Sub

Таблица 1.3 – Значения скоростей

Таблица 1.4 – Значения ускорений

Диаграммы скоростей и ускорений:

Рисунок 1.4 – Диаграмма скоростей

Рисунок 1.5 – Диаграмма ускорений

Познавательные статьи:



Алгоритмические операторы Matlab

Конструирование и порядок расчёта дорожной одежды

Исследования учёных: почему помогают молитвы?

Почему терпят неудачу многие предприниматели?