HEIDENHAIN TNC 620 (340 56x-01) - Manuel (Page 454)

454 10 Programmation: Paramètres Q
1
0
.13 Ex
emples de pr
ogr
a
mmation
18 L Z+100 R0 FMAX M2 Dégager l'outil, fin du programme
19 LBL 10 Sous-programme 10: Usinage
20 CYCL DEF 7.0 POINT ZÉRO Décaler le point zéro au centre de l’ellipse
21 CYCL DEF 7.1 X+Q1
22 CYCL DEF 7.2 Y+Q2
23 CYCL DEF 10.0 ROTATION Calculer la position angulaire dans le plan
24 CYCL DEF 10.1 ROT+Q8
25 Q35 = (Q6 - Q5) / Q7 Calculer l'incrément angulaire
26 Q36 = Q5 Copier l’angle initial
27 Q37 = 0 Initialiser le compteur pour les pas fraisés
28 Q21 = Q3 * COS Q36 Calculer la coordonnée X du point initial
29 Q22 = Q4 * SIN Q36 Calculer la coordonnée Y du point initial
30 L X+Q21 Y+Q22 R0 FMAX M3 Aborder le point initial dans le plan
31 L Z+Q12 R0 FMAX Prépositionnement à la distance d’approche dans l’axe de broche
32 L Z-Q9 R0 FQ10 Aller à la profondeur d’usinage
33 LBL 1
34 Q36 = Q36 + Q35 Actualiser l’angle
35 Q37 = Q37 + 1 Actualiser le compteur
36 Q21 = Q3 * COS Q36 Calculer la coordonnée X effective
37 Q22 = Q4 * SIN Q36 Calculer la coordonnée Y effective
38 L X+Q21 Y+Q22 R0 FQ11 Aborder le point suivant
39 FN 12: IF +Q37 LT +Q7 GOTO LBL 1 Demande si travail non encore terminé, si oui, retour à LBL 1
40 CYCL DEF 10.0 ROTATION Annuler la rotation
41 CYCL DEF 10.1 ROT+0
42 CYCL DEF 7.0 POINT ZÉRO Annuler le décalage du point zéro
43 CYCL DEF 7.1 X+0
44 CYCL DEF 7.2 Y+0
45 L Z+Q12 R0 FMAX Aller à la distance d’approche
46 LBL 0 Fin du sous-programme
47 END PGM ELLIPSE MM