內梯形螺紋（Tr40x7）的宏程式
系統：FANUC－oimait
程式設計思想：每一層分中、右、左三分，每一刀的Z軸方向的起刀點都不同
1、內梯形螺紋加工程式：
G54G99
M3S100
T0101
G0Z3
X33
#101=0.2; 每一刀的的深度（半徑）
#102=4 梯形螺紋的深度（半徑）
#103=1 分層切削的次數
N90 G0U[2*#101*#103]
G32Z-32F7
G0X32
Z[3+[#102-#101]*0.268+A]； A是槽底寬-刀尖寬的一半
U[2*#101*#103]
Z[3-[#102-#101]*0.268-A] 梯形螺紋的牙頂寬：0.366x螺距梯形螺紋的牙底寬：螺距-牙頂寬-2倍的（螺紋深度Xtg15°）
#102=#102-0.2
#103=#103+1
IF[#103LE20]GOTO90；
G0Z100
M5
M30
內梯形螺紋（Tr40x7）的宏程式
系統：FANUC－oimait
程式設計思想：每一層分中、右、左三分，每一刀的Z軸方向的起刀點都不同
1、內梯形螺紋加工程式：
G54G99
M3S100
T0101
G0Z3
X33
#101=0.2; 每一刀的的深度（半徑）
#102=4 梯形螺紋的深度（半徑）
#103=1 分層切削的次數
N90 G0U[2*#101*#103]
G32Z-32F7
G0X32
Z[3+[#102-#101]*0.268+A]； A是槽底寬-刀尖寬的一半
X33
U[2*#101*#103]
G32Z-32F7
G0X32
Z[3-[#102-#101]*0.268-A] 梯形螺紋的牙頂寬：0.366x螺距梯形螺紋的牙底寬：螺距-牙頂寬-2倍的（螺紋深度Xtg15°）
X33
U[2*#101*#103]
G32Z-32F7
G0X32
G0Z3
X33
#102=#102-0.2
#103=#103+1
IF[#103LE20]GOTO90；
G0Z100
M5
M30