13 примеры программиров ания – Инструкция по эксплуатации HEIDENHAIN TNC 320 (340 551-01)
Страница 376
376
10 Программирование: Q-параметры
10.13
Примеры
программиров
ания
20 LBL 10
Подпрограмма 10: обработка
21 CYCL DEF 7.0 НУЛЕВАЯ ТОЧКА
Перемести нулевую точку в центр эллипса
22 CYCL DEF 7.1 X+Q1
23 CYCL DEF 7.2 Y+Q2
24 CYCL DEF 10.0 ПОВОРОТ
Угловое положение на поверхности пересчитать
25 CYCL DEF 10.1 ROT+Q8
26 Q35 = (Q6 - Q5) / Q7
Рассчитать шаг угла
27 Q36 = Q5
Копировать угол старта
28 Q37 = 0
Установить счётчик проходов
29 Q21 = Q3 * COS Q36
Расчитать X-координату точки старта
30 Q22 = Q4 * SIN Q36
Расчитать Y-координату точки старта
31 L X+Q21 Y+Q22 R0 FMAX M3
Наезд на точку старта на поверхности
32 L Z+Q12 R0 FMAX
Предпозиционировать на безопасное расстояние на оси
шпинделя
33 L Z-Q9 R0 FQ10
Перемещение на глубину обработки
34 LBL 1
35 Q36 = Q36 + Q35
Актуализовать угол
36 Q37 = Q37 + 1
Актуализовать счётчик проходов
37 Q21 = Q3 * COS Q36
Расчёт актуальной X-координаты
38 Q22 = Q4 * SIN Q36
Расчёт актуальной Y-координаты
39 L X+Q21 Y+Q22 R0 FQ11
Наезд следующей точки
40 FN 12: IF +Q37 LT +Q7 GOTO LBL 1
Запрос не готов ли, если да то возврат к LBL 1
41 CYCL DEF 10.0 ПОВОРОТ
Сброс поворота
42 CYCL DEF 10.1 ROT+0
43 CYCL DEF 7.0 НУЛЕВАЯ ТОЧКА
Сброс перемещения нулевой точки
44 CYCL DEF 7.1 X+0
45 CYCL DEF 7.2 Y+0
46 L Z+Q12 F0 FMAX
Проезд на безопасное расстояние
47 LBL 0
Конец подпрограммы
48 END PGM ELLIPSE MM