HEIDENHAIN TNC 426 (280 462) - Manuel (Page 253)

10 Programmation: Sous-programmes et répétitions de parties de programme 240
22 LBL 10
23 Q16 = Q6 - Q10 - Q108
24 FN 0: Q20 = +1
25 FN 0: Q24 = +Q4
26 Q25 = (Q5 - Q4) / Q13
27 CYCL DEF 7.0 POINT ZERO
28 CYCL DEF 7.1 X+Q1
29 CYCL DEF 7.2 Y+Q2
30 CYCL DEF 7.3 Z-Q3
31 CYCL DEF 10.0 ROTATION
32 CYCL DEF 10.1 ROT+Q8
33 L X+0 Y+0 R0 F MAX
34 L Z+5 R0 F1000 M3
35 CC Z+0 X+0
36 LP PR+Q16 PA+Q24 FQ11
37 LBL 1
38 L Y+Q7 R0 FQ11
39 FN 1: Q20 = +Q20 + +1
40 FN 1: Q24 = +Q24 + +Q25
41 FN 11: IF +Q20 GT +Q13 GOTO LBL 99
42 LP PR+Q16 PA+Q24 FQ12
43 L Y+0 R0 FQ11
44 FN 1: Q24 = +Q24 + +Q25
45 FN 1: Q20 = +Q20 + +1
46 FN 12: IF +Q20 LT +Q13 GOTO LBL 1
47 LBL 99
48 CYCL DEF 10.0 ROTATION
49 CYCL DEF 10.1 ROT+0
50 CYCL DEF 7.0 POINT ZERO
51 CYCL DEF 7.1 X+0
52 CYCL DEF 7.2 Y+0
53 CYCL DEF 7.3 Z+0
54 LBL 0
55 END PGM ZYLIN MM Sous-programme 10: Usinage
Calcul surépaisseur et outil par rapport au rayon du cylindre
Initialiser le compteur de pas fraisés
Copier l‘angle initial dans l‘espace (plan Z/X)
Calculer le pas angulaire
Décaler le point zéro au centre du cylindre (axe X)
Calculer la 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 cyclindre, obliquement dans la matière
Coupe longitudinale dans le sens Y+
Actualiser le compteur
Actualiser l‘angle dans l‘espace
Demande si travail terminé, si oui, aller à la fin
Aborder l‘“arc“ pour usiner la coupe longitudinale suivante
Coupe longitudinale dans le sens Y–
Actualiser le compteur
Actualiser l‘angle dans l‘espace
Demande si travail non encore terminé, si oui, retour à LBL 1
Annuler la rotation
Annuler le décalage du point zéro
Fin du sous-programme
1
0
.1
0 Ex
emples de pr
ogr
ammation