HEIDENHAIN iTNC 530 Modo De Empleo página 663

40 LBL 2
41 LP PR+Q6 PA+Q24 FQ12
42 FN 2: Q24 = +Q24 - +Q14
43 FN 11: IF +Q24 GT +Q5 GOTO LBL 2
44 LP PR+Q6 PA+Q5
45 L Z+Q23 R0 F1000
46 L X+Q26 R0 FMAX
47 FN 1: Q28 = +Q28 + +Q18
48 FN 0: Q24 = +Q4
49 CYCL DEF 10.0 GIRO
50 CYCL DEF 10.0 ROT+Q28
51 FN 12: IF +Q28 LT +Q9 GOTO LBL 1
52 FN 9: IF +Q28 EQU +Q9 GOTO LBL 1
53 CYCL DEF 10.0 GIRO
54 CYCL DEF 10.1 ROT+0
55 CYCL DEF 7.0 PUNTO CERO
56 CYCL DEF 7.1 X+0
57 CYCL DEF 7.2 Y+0
58 CYCL DEF 7.3 Z+0
59 LBL 0
60 END PGM CILINDRO MM
HEIDENHAIN iTNC 530
Desplazar hacia arriba el "arco" aproximado
Actualización del ángulo en el espacio
Pregunta si el arco está terminado, si no retroceso a LBL 2
Llegada al ángulo final en el espacio
Retroceso según el eje de la hta.
Posicionamiento previo para el siguiente arco
Actualización de la posición de giro en el plano
Anular el ángulo en el espacio
Activar la nueva posición de giro
Pregunta si no está terminado, en caso afirmativo salto al LBL 1
Anular el giro
Anular el desplazamiento del punto cero
Final del subprograma
663