7 L X+15 Y+10 R0 FMAX M3
8 CALL LBL 1
9 L X+45 Y+60 R0 FMAX
10 CALL LBL 1
11 L X+75 Y+10 R0 FMAX
12 CALL LBL 1
13 L Z+250 R0 FMAX M2
14 LBL 1
15 CYCL CALL
16 L IX.20 R0 FMAX M99
17 L IY+20 R0 FMAX M99
18 L IX-20 R0 FMAX M99
19 LBL 0
20 END PGM UP1 MM
HEIDENHAIN iTNC 530
Startpunt boringgroep 1 benaderen
Subprogramma voor boringgroep oproepen
Startpunt boringgroep 2 benaderen
Subprogramma voor boringgroep oproepen
Startpunt boringgroep 3 benaderen
Subprogramma voor boringgroep oproepen
Einde van het hoofdprogramma
Begin van subprogramma 1:boringgroep
Boring 1
Boring 2 benaderen, cyclus oproepen
Boring 3 benaderen, cyclus oproepen
Boring 4 benaderen, cyclus oproepen
Einde van subprogramma 1
531