HEIDENHAIN TNC 426 (280 462) - Manual (Página 253)

10 Programación: Subprogramas y repeticiones parciales de un programa 240
22 LBL 10
23 Q16 = Q6 - Q10 - Q108
24 FN 0: Q20 = +1
25 FN 0: Q24 = +Q4
26 Q25 = (Q5 - Q4) / Q13
27 CYCL DEF 7.0 PUNTO CERO
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
32 CYCL DEF 10.1 ROT+Q8
33 L X+0 Y+0 R0 F MAX
34 L Z+5 R0 F1000 M3
35 CC Z+0 X+0
36 LP PR+Q16 PA+Q24 FQ11
37 LBL 1
38 L Y+Q7 R0 FQ11
39 FN 1: Q20 = +Q20 + +1
40 FN 1: Q24 = +Q24 + +Q25
41 FN 11: IF +Q20 GT +Q13 GOTO LBL 99
42 LP PR+Q16 PA+Q24 FQ12
43 L Y+0 R0 FQ11
44 FN 1: Q24 = +Q24 + +Q25
45 FN 1: Q20 = +Q20 + +1
46 FN 12: IF +Q20 LT +Q13 GOTO LBL 1
47 LBL 99
48 CYCL DEF 10.0 GIRO
49 CYCL DEF 10.1 ROT+0
50 CYCL DEF 7.0 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
55 END PGM ZYLIN MM Subprograma 10: Mecanizado
Calcular la sobremedida y hta. en relación al radio del cílindro
Fijar el contador de 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 de giro 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
Corte longitudinal en la dirección Y+
Actualización del contador de 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 corte longitudinal
Corte longitudinal en la dirección Y–
Actualización del contador de cortes
Actualización del ángulo en el espacio
Pregunta si no está terminado , en caso afirmativo salto al LBL 1
Anular el giro
Anular el desplazamiento del punto cero
Final del subprograma
1
0
.1
0 Ejemplos de pr
ogr
amación