Файл: С.А. Рябов Шпиндельные узлы станков.pdf

IF ml = 1 OR ml = 2 OR m1 = 3 THEN GOTO 5 25 IF ml = 1 THEN GOTO 30

IF ml = 2 OR ml = 3 THEN GOTO 35 IF ml = 4 OR ml = 5 THEN GOTO 45

30 PRINT "(t5)Радиальная податливость подшип. с нулевым зазоромнатягом, стоящего"

INPUT "в передней опоре = "; t5

PRINT "(t6)Коэф. радиальной податливости подшипника, стоящего" INPUT "в передней опоре = "; t6

s1 = t5 * t6

s2 = 4 * p1 * t19 * (1 + t1 / t2) / (pi * t1 * t3) c1 = p1 / (s1 + s2)

GOTO 50

35 INPUT "(14)Диаметр шариков подшипника, стоящего в передней опоре ="; t4

INPUT "(17)Коэф. осевой податливости подшип. стоящего в передней опоре ="; t7

s1 = .03 * t4 * t7

s2 = 4 * p1 * t19 * (1 + t1 / t2) / (pi * t1 * t3)

40 PRINT "(z1)Теперь введите кол-во подшипников , стоящих в передней опоре (1-4)"

INPUT z1

IF z1 > 4 OR z1 < 1 THEN GOTO 40 с1 = z1 * p1 / (2 * (s1 + s2))

GOTO 50

45 PRINT "(zl)Теперь введите: кол-во подшипников , стоящих в передней опоре (1-4)"

INPUT z1

IF z1 > 4 OR z1 < 1 THEN GOTO 45

PRINT "Внутренний диаметр подшипника выбирать из ряда

(40,45,50,55,60,65,70,75,80,"

PRINT “85,90,95,100,110,120,130,140,150,160,170,180,190,200,220, 240,250)"

INPUT "(t1)Внутренний диаметр подшипника, стоящего в передней опоре ="; t1

Рис. 7. Продолжение

GOSUB 1000 SCREEN 0

50 PRINT : PRINT "Исходные данные для вычисления жёсткости задней опоры :"

INPUT "(р2)Введите ожидаемую нагрузку на заднюю опору :"; р2 PRINT: PRINT "1.3182100"

PRINT "2. 36100"

PRINT "3.46100" PRINT "4. 2007100" PRINT "5. 4074000"

55 INPUT "(m2)Выберите тип подшипника, стоящего в задней опоре (1- 5) :"; m2

IF m2 > 5 OR m2 < 1 THEN GOTO 55

IF m2 = 1 OR m2 = 2 OR m2 = 3 THEN GOTO 10 57 IF m2 = 1 THEN GOTO 60

IF m2 = 2 OR m2 = 3 THEN GOTO 65 IF m2 = 4 OR m2 = 5 THEN GOTO 75

60 PRINT "(t12)Радиальная податливость подшип. с нулевым зазоромнатягом, стоящего"

INPUT "в задней опоре = "; t12

PRINT "(е13)Коэф. радиальной податливости подшипника, стоящего

"

INPUT "в задней опоре = "; t13 s3 = t12 * t13

s4 = 4 * р2 * t19 * (1 + t8 / t9) / (pi * t8 * t10) c2 = p2 / (s3 + s4)

GOTO 80

65 INPUT "(t11)Диаметр шариков подшипника, стоящего в задней опоре ="; t11

INPUT "(t14)Коэф. осевой податливости подшип., стоящего в задней опоре ="; t14

s3 = .03 * t11 * t14

s4 = 4 * p2 * t19 * (1 + t8 / t9) / (pi * t8 * t10)

70 PRINT "(z2)Теперь введите кол-во подшипников , стоящих в задней опоре (1-4)"

INPUT z2

Рис. 7. Продолжение

IF z2 > 4 OR z2 < 1 THEN GOTO 70 c2 = z2 * p2 / (2 * (s3 + s4))

GOTO 80

75 PRINT "(z2)Теперь введите: кол-во подшипников , стоящих в задней опоре (1-4)"

INPUT z2

IF z2 > 4 OR z2 < 1 THEN GOTO 45

PRINT "Внутренний диаметр подшипника выбирать из ряда

(40,45,50,55,60,65,70,75,80,

PRINT "85,90,95,100,110,120,130,140,150,160,170,180,190,200,220, 240,250)"

INPUT "(t8)Внутренний диаметр подшипника, стоящего в передней опоре =", t8

GOSUB 1000 c1=c11

80 m1=1/c1

m2 = 1 / с2

s5 = pi * (t17 ^ 2)/4

s6 = .4 * t20

s7 = pi * (t17 ^ 4)/64

а = -6 * t20 * s7 * m1 / t15 - 3 * t20 * s7 / (s5 * s6) b = -6 * t20 * s7 * (m1(1 – t18) + m2)

g = (a ^ 3) / 27 + (b ^ 2) / 4 q = -b / 2 + SQR(g)

г = -b / 2 - SQR(g)

IF г < 0 THEN GOTO 85

l1 = (ЕХР(.333 * LOG(q))) + (EXP(.333 * LOG(r))) GOTO 90

85 г = ABS(r)

l1 = (ЕХР(.333 * LOG(q))) - (ЕХР(.333 * LOG(r))) 90 l0 = 2.5 * t15

IF l1 – 10 > 0 THEN GOTO95 l2 = l0

GOTO 100 95 l2 = l1

100 s8 = pi * (t16 ^ 4) / 64

Рис. 7. Продолжение

s9 = pi * (t16 ^ 2) / 4

s10 = (t15 ^ 2) * ((t15 / s8) + (l2 * (1 – t18) / s7)) / (3 * t20) s11 = m1 * (((t15 * (1 – t18) + 12) / 12) ^ 2)

s13 = t ^ 5 / (s6 * s9)

s14 = (t15 ^ 2) * (1 – t18) / (s5 * s6 * l2) у = 1 / (s10 + s11 + s12 + s13 + s14) CLS

PRINT "Вывод результата расчётов :": PRINT PRINT "(с1)Жёсткость передней опоры равна :"; с1 PRINT "(с2)Жёсткость задней опоры равна :"; с2

PRINT "(l1)Оптимальное межопорное расстояние , полученное в результате расчёта:"; l1

PRINT "(l2)Скорректированное оптимальное межопорное расстояние:"; l2

PRINT "(у)Радиальная жёсткость шпиндельного узла :"; у END

1000 REM PRINT "Подпрограмма выбора жёсткости опор для подшипников качения 2007100 и 4074000"

IF t8 > О THEN t1 = 0 ELSE GOTO 1005 c11 = c1

1005 IF t1 = 40 OR t8 = 40 THEN GOTO 1010 ELSE GOTO 1015 1010 IF m1 = 4 THEN c1 = 20000

IF m2 = 4 THEN c2 = 20000 IF m1 = 5 THEN c1 = 48000 IF m2 = 5 THEN c2 = 48000 GOTO 1265

1255 IF t1 = 250 OR t8 = 250 THEN GOTO 1260 ELSE GOTO 1300 1260 IF m1 = 4 THEN c1 = 330000

IF m2 = 4 THEN c2 = 330000 IF m1 = 5 THEN c1 = 440000 IF m2 = 5 THEN c2 = 440000 1265 c1 = c1 * z1 : c2 = c2 * z2

RETURN

1300 PRINT "Ошибка в выборе диаметра подшипника !!!": END

Рис. 7. Окончание

3. ТРЕБОВАНИЯ К ОТЧЁТУ

Отчёт оформляется в соответствии с требованиями к текстовым документам и должен содержать исходные данные для расчёта, блоксхему программы и результатов расчёта, выводы.

4. СПИСОК ИСПОЛЬЗУЕМОЙ ЛИТЕРАТУРЫ

1. Прохоров А. Ф. Конструктор и ЭВМ.- М.: Машиностроение,

1987. -272 с.

2. Пуш В. Э. Конструирование металлорежущих станков. -М.: Машиностроение, 1977. -392 с.

3.Решетов Д. Н. и др. Детали и механизмы металлорежущих станков: В 2-х.- М.: Машиностроение, 1972. -520 с.

4.Лизогуб В. А. Несущие системы и шпиндельные узлы металлорежущих станков. -М.: ВЗМИ, 1977. -124 с.

5.Сабиров Ф. С. Расчёт и конструирование станков. Применение ЭВМ в курсовых и дипломных проектах: Учеб. пособие. - М.: Мосстанкин, 1982. - 36 с.

6.Тарзиманов Г. А. Проектирование металлорежущих станков.

-3-е изд., перераб. и доп. - М.: Машиностроение, 1980. -288 с.

Составители Сергей Александрович Рябов и др.

ШПИНДЕЛЬНЫЕ УЗЛЫ СТАНКОВ

Методические указания к выполнению практических работ по курсу „ Конструирование, расчёт и САПР станков и станочных комплексов" для студентов по специальности 120200 "Металлорежущие станки и инструменты"

Редактор З.М.Савина

ЛР № 020313 от 23. 12. 96.

Подписано в печать 18. 09. 99. Формат 60х84/16.

Бумага офсетная. Отпечатано на ризографе. Уч.-изд.л. 1,0. Тираж 75. Заказ Кузбасский государственный технический университет.

650026, Кемерово, ул. Весенняя, 28.

Типография Кузбасского государственного технического университета. 650099, Кемерово, ул. Д. Бедного, 4а