HEIDENHAIN iTNC 530 Manuel D'utilisation page 378

39 LBL 2
40 LP PR+Q6 PA+Q24 FQ12
41 Q24 = +Q24 - +Q14
42 FN 11: IF +Q24 GT +Q5 GOTO LBL 2
43 LP PR+Q6 PA+Q5
44 L Z+Q23 R0 F1000
45 L X+Q26 R0 FMAX
46 Q28 = +Q28 + +Q18
47 Q24 = +Q4
48 CYCL DEF 10.0 ROTATION
49 CYCL DEF 10.0 ROT+Q28
50 FN 12: IF +Q28 LT +Q9 GOTO LBL 1
51 FN 9: IF +Q28 EQU +Q9 GOTO LBL 1
52 CYCL DEF 10.0 ROTATION
53 CYCL DEF 10.1 ROT+0
54 CYCL DEF 7.0 POINT ZÉRO
55 CYCL DEF 7.1 X+0
56 CYCL DEF 7.2 Y+0
57 CYCL DEF 7.3 Z+0
58 LBL 0
59 END PGM SPHERE MM
378
Aborder l'„arc" vers le haut
Actualiser l'angle dans l'espace
Question: arc terminé ?. Si non, saut au LBL 2
Aborder l'angle final dans l'espace
Dégager l'outil dans l'axe de broche
Prépositionnement pour l'arc suivant
Actualiser la position angulaire dans le plan
Annuler l'angle dans l'espace
Activer nouvelle position angulaire
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
Programmation: paramètres Q