HEIDENHAIN TNC 620 (81760x-02) Manuel d'utilisation
Page 362

Programmation : paramètres Q
9.13 Exemples de programmation
9
362
TNC 620 | Manuel d'utilisation HEIDENHAIN Dialogue texte clair | 3/2015
21 LBL 10
Sous-programme 10 : usinage
22 Q16 = Q6 -Q10 - Q108
Calcul du rayon du cylindre en fonction de l'outil et de la
surépaisseur
23 FN 0: Q20 = +1
Initialiser le compteur
24 FN 0: Q24 = +Q4
Copier l'angle initial dans l'espace (plan Z/X)
25 Q25 = (Q5 -Q4) / Q13
Calculer l'incrément angulaire
26 CYCL DEF 7.0 POINT ZÉRO
Décaler le point zéro au centre du cylindre (axe X)
27 CYCL DEF 7.1 X+Q1
28 CYCL DEF 7.2 Y+Q2
29 CYCL DEF 7.3 Z+Q3
30 CYCL DEF 10.0 ROTATION
Position angulaire dans le plan
31 CYCL DEF 10.1 ROT+Q8
32 L X+0 Y+0 R0 FMAX
Prépositionnement dans le plan, au centre du cylindre
33 L Z+5 R0 F1000 M3
Prépositionnement dans l'axe de broche
34 LBL 1
35 CC Z+0 X+0
Initialiser le pôle dans le plan Z/X
36 LP PR+Q16 PA+Q24 FQ11
Aborder position initiale du cylindre, avec plongée en pente
37 L Y+Q7 R0 FQ12
Coupe longitudinale dans le sens Y+
38 FN 1: Q20 = +Q20 + +1
Actualiser le compteur
39 FN 1: Q24 = +Q24 + +Q25
Actualiser l’angle dans l'espace
40 FN 11: IF +Q20 GT +Q13 GOTO LBL 99
Question : usinage terminé ?. Si oui, saut à la fin
41 LP PR+Q16 PA+Q24 FQ11
Aborder “l'arc“ pour exécuter la coupe longitudinale
suivante
42 L Y+0 R0 FQ12
Coupe longitudinale dans le sens Y–
43 FN 1: Q20 = +Q20 + +1
Actualiser le compteur
44 FN 1: Q24 = +Q24 + +Q25
Actualiser l’angle dans l'espace
45 FN 12: IF +Q20 LT +Q13 GOTO LBL 1
Question : continuer usinage ?, si oui, saut au LBL 1
46 LBL 99
47 CYCL DEF 10.0 ROTATION
Désactiver la rotation
48 CYCL DEF 10.1 ROT+0
49 CYCL DEF 7.0 POINT ZÉRO
Annuler le décalage du point zéro
50 CYCL DEF 7.1 X+0
51 CYCL DEF 7.2 Y+0
52 CYCL DEF 7.3 Z+0
53 LBL 0
Fin du sous-programme
54 END PGM ZYLIN