HEIDENHAIN TNC 640 Manuel D'utilisation page 246

7 LBL 1
8 L IZ-4 R0 FMAX
9 APPR CT X+2 Y+30 CCA90 R+5 RL F250
10 FC DR- R18 CLSD+ CCX+20 CCY+30
11 FLT
12 FCT DR- R15 CCX+50 CCY+75
13 FLT
14 FCT DR- R15 CCX+75 CCY+20
15 FLT
16 FCT DR- R18 CLSD- CCX+20 CCY+30
17 DEP CT CCA90 R+5 F1000
18 L X-20 Y+0 R0 FMAX
19 CALL LBL 1 REP 4
20 L Z+250 R0 FMAX M2
21 END PGM PGMREP MM
246
Marque pour répétition de partie de pgm
Passe en prof. incrémentale (dans le vide)
Approche du contour
Contour
Quitter le contour
Dégager l'outil
Saut en arrière au LBL 1; au total quatre fois
Dégager l'outil, fin du programme
Programmation: sous-programmes et répétitions de parties de programme