HEIDENHAIN TNC 640 Manuel D'utilisation page 248

6 L X+15 Y+10 R0 FMAX M3
7 CALL LBL 1
8 L X+45 Y+60 R0 FMAX
9 CALL LBL 1
10 L X+75 Y+10 R0 FMAX
11 CALL LBL 1
12 L Z+250 R0 FMAX M2
13 LBL 1
14 CYCL CALL
15 L IX+20 R0 FMAX M99
16 L IY+20 R0 FMAX M99
17 L IX-20 R0 FMAX M99
18 LBL 0
19 END PGM SP1 MM
248
Aborder le point initial du groupe de trous 1
Appeler le sous-programme du groupe de trous
Aborder le point initial du groupe de trous 2
Appeler le sous-programme du groupe de trous
Aborder le point initial du groupe de trous 3
Appeler le sous-programme du groupe de trous
Fin du programme principal
Début du sous-programme 1: groupe de trous
Trou 1
Aborder le 2ème trou, appeler le cycle
Aborder le 3ème trou, appeler le cycle
Aborder le 4ème trou, appeler le cycle
Fin du sous-programme 1
Programmation: sous-programmes et répétitions de parties de programme