G40 G80 G90 G17 G49 G54
G00 X0 Y0 Z5 S600 M03 M08
#1= (螺距)
#2= (螺纹公径)
#3= (刀具半径)
#4= (螺纹深度)
#5=#1(Z轴坐标)
N20 G00 Z0 (先下降Z轴)
N30 G01 X[#2-#3] F50 (再进刀X轴,刀具在螺纹的内侧)
N40 #5=#5+#1 (对Z轴坐标赋值运算)
N50 G02I-[#2-#3] Z-#5(铣削一圈螺纹)
N60 IF[#5LT#4]GOTO40
N70 G00 X0 M09(离开螺纹)
N80 Z5(抬刀)
N90 M30