HEIDENHAIN iTNC 530 Modo De Empleo página 301

N190 G00 Z+250 M2 *
N200 G98 L10 *
N210 G54 X+Q1 Y+Q2 *
N220 G73 G90 H+Q8 *
N230 Q35 = ( Q6 - Q5 ) / Q7 *
N240 Q36 = +Q5 *
N250 Q37 = +0 +0 *
N260 Q21 = Q3 * COS Q36 *
N270 Q22 = Q4 * SIN Q36 *
N280 G00 G40 X+Q21 Y+Q22 M3 *
N290 Z+Q12 *
N300 G01 Z-Q9 FQ10 *
N310 G98 L1 *
N320 Q36 = Q36 + Q35 *
N330 Q37 = Q37 + 1 *
N340 Q21 = Q3 * COS Q36 *
N350 Q22 = Q4 * SIN Q36 *
N360 G01 X+Q21 Y+Q22 FQ11 *
N370 D12 P01 +Q37 P02 +Q7 P03 1 *
N380 G73 G90 H+0 *
N390 G54 X+0 Y+0 *
N400 G00 G40 Z+Q12 *
N410 G98 L0 *
N99999999 %ELLIPSE G71 *
HEIDENHAIN iTNC 530
Retirar la herramienta, final del programa
Subprograma 10: Mecanizado
Desplazar el punto cero al centro de la elipse
Calcular la posición angular en el plano
Calcular el paso angular
Copiar el ángulo inicial
Iniciar el contador de tramos de fresado (cortes)
Calcular la coordenada X del punto inicial
Calcular la coordenada Y del punto inicial
Llegada al punto inicial en el plano
Posicionamiento previo a la distancia de seguridad en el eje de hta.
Desplazamiento a la profundidad de mecanizado
Actualización del ángulo
Actualización del contador de tramos de fresado (cortes)
Calcular la coordenada X actual
Calcular la coordenada Y actual
Llegada al siguiente punto
Pregunta si no está terminado, en caso afirmativo salto al Label 1
Anular el giro
Anular el desplazamiento del punto cero
Llegada a la distancia de seguridad
Final del subprograma
301