HEIDENHAIN iTNC 530 Manuel D'utilisation page 309

N190 G00 Z+250 M2 *
N200 G98 L10 *
N210 G54 X+Q1 Y+Q2 *
N220 G73 G90 H+Q8 *
N230 Q35 = ( Q6 - Q5 ) / Q7 *
N240 Q36 = +Q5 *
N250 Q37 = +0 +0 *
N260 Q21 = Q3 * COS Q36 *
N270 Q22 = Q4 * SIN Q36 *
N280 G00 G40 X+Q21 Y+Q22 M3 *
N290 Z+Q12 *
N300 G01 Z-Q9 FQ10 *
N310 G98 L1 *
N320 Q36 = Q36 + Q35 *
N330 Q37 = Q37 + 1 *
N340 Q21 = Q3 * COS Q36 *
N350 Q22 = Q4 * SIN Q36 *
N360 G01 X+Q21 Y+Q22 FQ11 *
N370 D12 P01 +Q37 P02 +Q7 P03 1 *
N380 G73 G90 H+0 *
N390 G54 X+0 Y+0 *
N400 G00 G40 Z+Q12 *
N410 G98 L0 *
N99999999 %ELLIPSE G71 *
iTNC 530 HEIDENHAIN
Dégager l'outil, fin du programme
Sous-programme 10 : usinage
Décaler le point zéro au centre de l'ellipse
Calculer la position angulaire dans le plan
Calculer l'incrément angulaire
Copier l'angle initial
Initialiser le compteur
Calculer la coordonnée X du point initial
Calculer la coordonnée Y du point initial
Aborder le point initial dans le plan
Prépositionnement à la distance d'approche dans l'axe de broche
Aller à la profondeur d'usinage
Actualiser l'angle
Actualiser le compteur
Calculer la coordonnée X effective
Calculer la coordonnée Y effective
Aborder le point suivant
Demande si usinage non terminé, si oui, retour au label 1
Annuler la rotation
Annuler le décalage du point zéro
Aller à la distance d'approche
Fin du sous-programme
309