Cześć. A może być tak? Bez parametrów.

0 BEGIN PGM KULA MM
1 BLK FORM 0.1 Z X-20 Y-20 Z-40
2 BLK FORM 0.2 X+20 Y+20 Z+0
3 TOOL CALL 5 Z S2100 ; FREZ D10 KULA
4 L Z+20 R0 FMAX M3
5 L X+0 Y+0 R0 FMAX
6 L Z+0 R0 F100
7 LBL 1
8 CC X+0 Z-25
9 CP IPA-1 DR- F100
10 CC X+0 Y+0
11 CP DR- F500
12 CALL LBL 1 REP89
13 LBL 2
14 CC X+0 Y+0
15 CP IPA-360 IZ-0.2 DR- F500
16 CALL LBL 2 REP99
17 L Z+10 R0 F500
18 STOP M30
19 END PGM KULA MM

Sprawdzone tylko na symulatorze.