22
LBL
0
23
Q 6 = Q6 - Q 0 - Q 08
24
FN 0: Q20 = +
25
FN 0: Q24 = +Q4
26
Q25 = (Q5 - Q4) / Q 3
27
CYCL DEF 7.0 PUNTO CERO
28
CYCL DEF 7.
X+Q
29
CYCL DEF 7.2 Y+Q2
30
CYCL DEF 7.3 Z-Q3
3
CYCL DEF
0.0 GIRO
32
CYCL DEF
0.
ROT+Q8
33
L X+0 Y+0 R0 F MAX
34
L Z+5 R0 F 000 M3
35
CC Z+0 X+0
36
LP PR+Q 6 PA+Q24 FQ
37
LBL
38
L Y+Q7 R0 FQ
39
FN
: Q20 = +Q20 + +
40
FN
: Q24 = +Q24 + +Q25
4
FN
: IF +Q20 GT +Q 3 GOTO LBL 99
42
LP PR+Q 6 PA+Q24 FQ 2
43
L Y+0 R0 FQ
44
FN
: Q20 = +Q20 + +
45
FN
: Q24 = +Q24 + +Q25
46
FN
2: IF +Q20 LT +Q 3 GOTO LBL
47
LBL 99
48
CYCL DEF
0.0 GIRO
49
CYCL DEF
0.
ROT+0
50
CYCL DEF 7.0 PUNTO CERO
5
CYCL DEF 7.
X+0
52
CYCL DEF 7.2 Y+0
53
CYCL DEF 7.3 Z+0
54
LBL 0
55
END PGM CILIN MM
248
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 inicial 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 de la hta.
Fijar el polo en el plano Z/X
Llegada a la pos. inicial sobre el cilindro, profundización inclinada en
la pieza
Corte 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 corte longitudinal
Corte 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 está terminado, en caso afirmativo salto al LBL 1
Anular el giro
Anular el desplazamiento del punto cero
Final del subprograma
10 Programación: Parámetros Q