HEIDENHAIN TNC 426 (280 476) - Manual (Página 424)

398 10 Programación: Parámetros Q
1
0
.1
1 Ejem
pl
os
de p
ro
g
ra
m
a
c
ión
20 CALL LBL 10 Llamada al mecanizado
21 L Z+100 R0 F MAX M2 Retirar la herramienta, final del programa
22 LBL 10 Subprograma 10: Mecanizado
23 Q16 = Q6 - Q10 - Q108 Calcular la sobremedida y la hta. en relación al radio del cílindro
24 FN 0: Q20 = +1 Fijar el contador de cortes
25 FN 0: Q24 = +Q4 Copiar el ángulo inicial en el espacio (plano Z/X)
26 Q25 = (Q5 - Q4) / Q13 Calcular el paso angular
27 CYCL DEF 7.0 PUNTO CERO Desplazar el punto cero al centro del cilindro (eje X)
28 CYCL DEF 7.1 X+Q1
29 CYCL DEF 7.2 Y+Q2
30 CYCL DEF 7.3 Z+Q3
31 CYCL DEF 10.0 GIRO Calcular la posición angular en el plano
32 CYCL DEF 10.1 ROT+Q8
33 L X+0 Y+0 R0 F MAX Posicionamiento previo en el plano en el centro del cilindro
34 L Z+5 R0 F1000 M3 Posicionamiento previo en el eje de la hta.
35 LBL 1
36 CC Z+0 X+0 Fijar el polo en el plano X/Z
37 LP PR+Q16 PA+Q24 FQ11 Aproximación a la posición de partida, con profundización inclinada en
la pieza
38 L Y+Q7 R0 FQ12 Corte longitudinal en la dirección Y+
39 FN 1: Q20 = +Q20 + +1 Actualizar el contador de cortes
40 FN 1: Q24 = +Q24 + +Q25 Actualización del ángulo en el espacio
41 FN 11: IF +Q20 GT +Q13 GOTO LBL 99 Pregunta si está terminado, en caso afirmativo salto al final
42 LP PR+Q16 PA+Q24 FQ11 Aproximación al “arco” para el siguiente corte longitudinal
43 L Y+0 R0 FQ12 Corte longitudinal en la dirección Y–
44 FN 1: Q20 = +Q20 + +1 Actualizar el contador de cortes
45 FN 1: Q24 = +Q24 + +Q25 Actualización del ángulo en el espacio
46 FN 12: IF +Q20 LT +Q13 GOTO LBL 1 Pregunta si no está terminado, en caso afirmativo salto al LBL 1
47 LBL 99
48 CYCL DEF 10.0 GIRO Anular el giro
49 CYCL DEF 10.1 ROT+0
50 CYCL DEF 7.0 PUNTO CERO Cancelar el desplazamiento del punto cero
51 CYCL DEF 7.1 X+0
52 CYCL DEF 7.2 Y+0
53 CYCL DEF 7.3 Z+0
54 LBL 0 Final del subprograma
55 END PGM CILIN MM