Инструкция по эксплуатации HEIDENHAIN TNC 640 (34059x-02)
Страница 352
Программирование: Q-параметры
9.13 Примеры программирования
9
352
TNC 640 | Руководство пользователя «Диалог открытым текстом HEIDENHAIN» | 12/2013
27 FN 1: Q16 = +Q6 + -Q10
Учитывать припуск на радиус наконечника щупа
28 CYCL DEF 7.0 НУЛЕВАЯ ТОЧКА
Смещение нулевой точки в центр наконечника щупа
29 CYCL DEF 7.1 X+Q1
30 CYCL DEF 7.2 Y+Q2
31 CYCL DEF 7.3 Z-Q16
32 CYCL DEF 10.0 РАЗВОРОТ
Пересчет начального угла при угловом положении на
плоскости
33 CYCL DEF 10.1 ROT+Q8
34 LBL 1
Предварительное позиционирование на оси шпинделя
35 CC X+0 Y+0
Установка полюса на X/Y-плоскости для
предварительного позиционирования
36 LP PR+Q26 PA+Q8 R0 FQ12
Предварительное позиционирование на плоскости
37 CC Z+0 X+Q108
Установите полюс на Z/X-плоскости, со смещением на
значение радиуса инструмента
38 L Y+0 Z+0 FQ12
Перемещение на глубину
39 LBL 2
40 LP PR+Q6 PA+Q24 FQ12
Проход по приближенной “дуге” вверх
41 FN 2: Q24 = +Q24 - +Q14
Актуализация пространственного угла
42 FN 11: IF +Q24 GT +Q5 GOTO LBL 2
Запрос готова ли дуга; если нет, то возврат к LBL 2
43 LP PR+Q6 PA+Q5
Подход к конечному углу в пространстве
44 L Z+Q23 R0 F1000
Вывод инструмента по оси шпинделя
45 L X+Q26 R0 FMAX
Предварительное позиционирование для следующей
дуги
46 FN 1: Q28 = +Q28 + +Q18
Актуализация углового положения на плоскости
47 FN 0: Q24 = +Q4
Сброс пространственного угла
48 CYCL DEF 10.0 РАЗВОРОТ
Активация нового углового положения
49 CYCL DEF 10.0 ROT+Q28
50 FN 12: IF +Q28 LT +Q9 GOTO LBL 1
51 FN 9: IF +Q28 EQU +Q9 GOTO LBL 1
Запрос, готово ли; если нет, то возврат к LBL 1
52 CYCL DEF 10.0 РАЗВОРОТ
Сброс вращения
53 CYCL DEF 10.1 ROT+0
54 CYCL DEF 7.0 НУЛЕВАЯ ТОЧКА
Отмена смещения нулевой точки
55 CYCL DEF 7.1 X+0
56 CYCL DEF 7.2 Y+0
57 CYCL DEF 7.3 Z+0
58 LBL 0
Конец подпрограммы
59 END PGM KUGEL MM