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