HEIDENHAIN iTNC 530 Manuel D'utilisation page 320

N210 G00 G40 Z+250 M2 *
N220 G98 L10 *
N230 Q16 = Q6 - Q10 - Q108 *
N240 Q20 = +1 *
N250 Q24 = +Q4 *
N260 Q25 = ( Q5 - Q4 ) / Q13 *
N270 G54 X+Q1 Y+Q2 Z+Q3 *
N280 G73 G90 H+Q8 *
N290 G00 G40 X+0 Y+0 *
N300 G01 Z+5 F1000 M3 *
N310 G98 L1 *
N320 I+0 K+0 *
N330 G11 R+Q16 H+Q24 FQ11 *
N340 G01 G40 Y+Q7 FQ12 *
N350 Q20 = +Q20 + 1 *
N360 Q24 = +Q24 + +Q25 *
N370 D11 P01 +Q20 P02 +Q13 P03 99 *
N380 G11 R+Q16 H+Q24 FQ11 *
N390 G01 G40 Y+0 FQ12 *
N400 D01 Q20 P01 +Q20 P02 +1 *
N410 D01 Q24 P01 +Q24 P02 +Q25 *
N420 D12 P01 +Q20 P02 +Q13 P03 1 *
N430 G98 L99 *
N440 G73 G90 H+0 *
N450 G54 X+0 Y+0 Z+0 *
N460 G98 L0 *
N99999999 %CYLIN G71 *
320
Dégager l'outil, fin du programme
Sous-programme 10: usinage
Calcul du rayon polaire en tenant compte 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 oblique dans la
matière
Passe longitudinale dans le sens Y+
Actualiser le compteur
Actualiser l'angle dans l'espace
Question: 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: non terminé ?, si oui, saut au LBL 1
Annuler la rotation
Annuler le décalage du point zéro
Fin du sous-programme
Programmation: Paramètres Q