HEIDENHAIN TNC 640 (34059x-01) ISO programming - Manuel (Page 291)

HEIDENHAIN TNC 640 291
8.12 Ex
emples de pr
ogr
a
mmation
N200 G00 G40 Z+250 M2 * Dégager l'outil, fin du programme
N210 G98 L10 * Sous-programme 10: usinage
N220 Q16 = Q6 - Q10 - Q108 * Calcul du rayon du cylindre en fonction de l'outil et de la surépaisseur
N230 D00 Q20 P01 +1 * Initialiser le compteur
N240 D00 Q24 P01 +Q4 * Copier l'angle initial dans l'espace (plan Z/X)
N250 Q25 = ( Q5 - Q4 ) / Q13 * Calculer l'incrément angulaire
N260 G54 X+Q1 Y+Q2 Z+Q3 * Décaler le point zéro au centre du cylindre (axe X)
N270 G73 G90 H+Q8 * Position angulaire dans le plan
N280 G00 G40 X+0 Y+0 * Prépositionnement dans le plan, au centre du cylindre
N290 G01 Z+5 F1000 M3 * Prépositionnement dans l'axe de broche
N300 G98 L1 *
N310 I+0 K+0 * Initialiser le pôle dans le plan Z/X
N320 G11 R+Q16 H+Q24 FQ11 * Aborder position initiale du cylindre, avec plongée en pente
N330 G01 G40 Y+Q7 FQ12 * Coupe longitudinale dans le sens Y+
N340 D01 Q20 P01 +Q20 P02 +1 * Actualiser le compteur
N350 D01 Q24 P01 +Q24 P02 +Q25 * Actualiser l’angle dans l'espace
N360 D11 P01 +Q20 P02 +Q13 P03 99 * Question: usinage terminé ?. Si oui, saut à la fin
N370 G11 R+Q16 H+Q24 FQ11 * Aborder “l'arc“ pour exécuter la coupe longitudinale suivante
N380 G01 G40 Y+0 FQ12 * Coupe longitudinale dans le sens Y–
N390 D01 Q20 P01 +Q20 P02 +1 * Actualiser le compteur
N400 D01 Q24 P01 +Q24 P02 +Q25 * Actualiser l’angle dans l'espace
N410 D12 P01 +Q20 P02 +Q13 P03 1 * Question: continuer usinage ?, si oui, saut au LBL 1
N420 G98 L99 *
N430 G73 G90 H+0 * Annuler la rotation
N440 G54 X+0 Y+0 Z+0 * Annuler le décalage du point zéro
N450 G98 L0 * Fin du sous-programme
N99999999 %CYLIN G71 *