HEIDENHAIN iTNC 530 Manual De Uso Y Operación página 365

20 L Z+100 R0 FMAX M2
21 LBL 10
22 Q16 = Q6 - Q10 - Q108
23 Q20 = +1
24 Q24 = +Q4
25 Q25 = (Q5 - Q4) / Q13
26 CYCL DEF 7.0 PUNTO CERO
27 CYCL DEF 7.1 X+Q1
28 CYCL DEF 7.2 Y+Q2
29 CYCL DEF 7.3 Z+Q3
30 CYCL DEF 10.0 GIRO
31 CYCL DEF 10.1 ROT+Q8
32 L X+0 Y+0 R0 FMAX
33 L Z+5 R0 F1000 M3
34 LBL 1
35 CC Z+0 X+0
36 LP PR+Q16 PA+Q24 FQ11
37 L Y+Q7 R0 FQ12
38 Q20 = +Q20 + +1
39 Q24 = +Q24 + +Q25
40 FN 11: IF +Q20 GT +Q13 GOTO LBL 99
41 LP PR+Q16 PA+Q24 FQ11
42 L Y+0 R0 FQ12
43 Q20 = +Q20 + +1
44 Q24 = +Q24 + +Q25
45 FN 12: IF +Q20 LT +Q13 GOTO LBL 1
46 LBL 99
47 CYCL DEF 10.0 GIRO
48 CYCL DEF 10.1 ROT+0
49 CYCL DEF 7.0 PUNTO CERO
50 CYCL DEF 7.1 X+0
51 CYCL DEF 7.2 Y+0
52 CYCL DEF 7.3 Z+0
53 LBL 0
54 END PGM ZYLIN
HEIDENHAIN iTNC 530
Retirar la herramienta, final del programa
Subprograma 10: Mecanizado
Calcular la sobremedida y la hta. en relación al radio del cílindro
Iniciar el contador de tramos de fresado (cortes)
Copiar el ángulo en el espacio (plano Z/X)
Calcular el paso angular
Desplazar el punto cero al centro del cilindro (eje X)
Calcular la posición angular en el plano
Posicionamiento previo en el plano en el centro del cilindro
Posicionamiento previo en el eje del cabezal
Fijar el polo en el plano Z/X
Llegada a la pos. inicial sobre el cilindro, profundización inclinada en
la pieza
Tramo longitudinal en la dirección Y+
Actualización del contador de tramos de fresado (cortes)
Actualización del ángulo en el espacio
Pregunta si esta terminado, en caso afirmativo salto al final
Aproximación al "arco" para el siguiente tramo longitudinal
Tramo longitudinal en la dirección Y-
Actualización del contador de tramos de fresado (cortes)
Actualización del ángulo en el espacio
Pregunta si no esta terminado, si es sí salto a LBL 1
Anular el giro
Anular el desplazamiento del punto cero
Final del subprograma
365