Вызов обработки Отвод инструмента, конец программы Подпрограмма 10: обработка Перемещение нулевой точки в центр эллипса Пересчет углового по

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