HEIDENHAIN TNC 640 (34059x-02) - Manual (Página 345)

Ejemplos de programación 9.13
9
TNC 640 | Modo de empleo Diálogo en lenguaje conversacional HEIDENHAIN | 12/2013
345
9.13 Ejemplos de programación
Ejemplo: Elipse
Desarrollo del programa
El contorno de las elipses se aproxima mediante
muchas rectas pequeñas (definible mediante Q7).
Cuantos más puntos se calculen más cortas serán las
rectas y más suave la curva.
La dirección del fresado se determina mediante el
ángulo inicial y final en el plano:
Dirección del mecanizado en el sentido horario:
Ángulo inicial > Ángulo final
Dirección de mecanizado en el sentido antihorario:
Ángulo inicial < Ángulo final
No se tiene en cuenta el radio de la hta.
0 BEGIN PGM ELLIPSE MM
1 FN 0: Q1 =+50
Centro eje X
2 FN 0: Q2 = +50 Centro eje Y
3 FN 0: Q3 =+50 Semieje X
4 FN 0: Q4 = +30 Semieje Y
5 FN 0: Q5 =+0 Ángulo inicial en el plano
6 FN 0: Q6 =+360 Ángulo final en el plano
7 FN 0: Q7 = +40 Número de pasos de cálculo
8 FN 0: Q8 = +0 Posición angular de la elipse
9 FN 0: Q9 = +5 Profundidad de fresado
10 FN 0: Q10 =+100 Avance al profundizar
11 FN 0: Q11 = +350 Avance de fresado
12 FN 0: Q12 = +2 Distancia de seguridad para posicionamiento previo
13 BLK FORM 0.1 Z X+0 Y+0 Z-20 Definición de la pieza en bruto
14 BLK FORM 0.2 X+100 Y+100 Z+0
15 TOOL CALL 1 Z S4000
Llamada a una herramienta
16 L Z+250 R0 FMAX Retirar la herramienta
17 CALL LBL 10 Llamada al mecanizado
18 L Z+100 R0 FMAX M2 Retirar la herramienta, final del programa
19 LBL 10 Subprograma 10: Mecanizado
20 CYCL DEF 7.0 PUNTO CERO Desplazar el punto cero al centro de la elipse
21 CYCL DEF 7.1 X+Q1
22 CYCL DEF 7.2 Y+Q2
23 CYCL DEF 10.0 GIRO
Calcular la posición angular en el plano
24 CYCL DEF 10.1 ROT+Q8
25 Q35 = (Q6 -Q5) / Q7
Calcular el paso angular
26 Q36 = Q5 Copiar el ángulo inicial
27 Q37 = 0 Iniciar el contador de tramos de fresado (cortes)