O0001
#1=30 (skylės skersmuo)
#2=20 (skylės gylis)
#3=20 (įrankio skersmuo)
#4=0 (Z koordinatė)
#5=1 (kiekvieno sluoksnio pjovimo gylis)
#6=[#1-#3]/2 (įrankio centro pasukimo skersmuo) S2000 M03
G54 G90 G00 X0 Y0 Z50.
G0X#6 (G0 greitai juda virš apatinio įrankio taško)
Z[-#4+1] (G0 nukrenta iki 1. Z-#4 paviršiuje, ty ties Z1.)
G1Z-#4F200. (G1 Z kryptimi nukrenta iki dabartinio pradinio apdorojimo gylio Z-#4)
WHILE[#4LT#2]DO1 (kai apdirbimo gylis #4 yra mažesnis nei skylės gylis #2, ciklas 1 programa)
#4=#4+#5 (kiekvieno sluoksnio pjovimo gylis)
G3I-#6Z-#4F500. (G03 prieš laikrodžio rodyklę apdorojama spirale į kitą sluoksnį)
END1 (1 ciklo pabaiga)
G3I-#6 (pasiekite skylės gylį, G03 eina visą ratą prieš laikrodžio rodyklę)
G1X[#6-1] (G01 grąžina 1 į centrą, ty ištraukia įrankį)
G0Z50.
M30





