8 LBL 1
9 L IZ-4 R0 FMAX
10 APPR CT X+2 Y+30 CCA90 R+5 RL F250
11 FC DR- R18 CLSD+ CCX+20 CCY+30
12 FLT
13 FCT DR- R15 CCX+50 CCY+75
14 FLT
15 FCT DR- R15 CCX+75 CCY+20
16 FLT
17 FCT DR- R18 CLSD- CCX+20 CCY+30
18 DEP CT CCA90 R+5 F1000
19 L X-20 Y+0 R0 FMAX
20 CALL LBL 1 REP 4/4
21 L Z+250 R0 FMAX M2
22 END PGM PGMREP MM
iTNC 530 HEIDENHAIN
Marque pour répétition de partie de programme
Passe en profondeur incrémentale (dans le vide)
Aborder le contour
Contour
Quitter le contour
Dégager l'outil
Retour au LBL 1; au total quatre fois
Dégager l'outil, fin du programme
497