HEIDENHAIN iTNC 530 Manuel D'utilisation page 341

40 LBL 2
41 LP PR+Q6 PA+Q24 FQ12
42 FN 2: Q24 = +Q24 - +Q14
43 FN 11: IF +Q24 GT +Q5 GOTO LBL 2
44 LP PR+Q6 PA+Q5
45 L Z+Q23 R0 F1000
46 L X+Q26 R0 FMAX
47 FN 1: Q28 = +Q28 + +Q18
48 FN 0: Q24 = +Q4
49 CYCL DEF 10.0 ROTATION
50 CYCL DEF 10.0 ROT+Q28
51 FN 12: IF +Q28 LT +Q9 GOTO LBL 1
52 FN 9: IF +Q28 EQU +Q9 GOTO LBL 1
53 CYCL DEF 10.0 ROTATION
54 CYCL DEF 10.1 ROT+0
55 CYCL DEF 7.0 POINT ZÉRO
56 CYCL DEF 7.1 X+0
57 CYCL DEF 7.2 Y+0
58 CYCL DEF 7.3 Z+0
59 LBL 0
60 END PGM SPHÈRE MM
iTNC 530 HEIDENHAIN
Aborder l'„arc" vers le haut
Actualiser l'angle dans l'espace
Demande si un arc est terminé, si non, retour 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
Demande si travail non encore terminé, si oui, retour au LBL 1
Annuler la rotation
Annuler le décalage du point zéro
Fin du sous-programme
341