O0001
G99 M03 S200 T0101;
G00 X32 Z5.1;(循环起点，Z轴向右边移动)
#1=28;(齿顶圆直径）
#2=19.4 ;(齿根圆直径等于19.2，留了0.2精加工余量）
N10 G92 X[#1] Z-45  F6.28;(车蜗杆）
G00 X32 Z4.9;(循环起点，Z轴向左边移动)
G92 X[#1] Z-45  F6.28;(车蜗杆)
G00 X32 Z5.1;(循环起点，Z轴向右边移动)
G92 X[#1] Z-45  F6.28;(车蜗杆)
#1=#1- 0.25;(每次循环的切削深度0.25 mm)
IF[#1GE#2] GOTO 10;(如果#1大于或等于#2就执行N10.即控制全齿高尺寸）。
G00 X150 Z10;
M05;
M30;

O0001
G99 M03 S200 T0101;
G00 X32 Z5.147;(循环起点，Z轴向右边移动)
#1=19.8;(从齿槽直径19.8处开始精加工)
#2=19.1;(齿根圆直径等于19.2，留了0.1精加工余量)
N10  G92 X[#1] Z-45  F6.28;(车蜗杆）
G00 X32 Z4.853;(循环起点，Z轴向左边移动)
G92 X[#1] Z-45  F6.28;(车蜗杆）
G00 X32 Z5.147;(循环起点，Z轴向右边移动)
G92 X[#1] Z-45  F6.28;(车蜗杆）
#1=#1- 0.1;(侮次循环的切削深度0.25 mm)
IF[#1GE#2] GOTO10;(如果#1大于或等于#2就执行N10，即控制全齿高尺寸)。
G00 X150 Z10;
M05;
M30: