车削锥螺纹的宏程序

一段锥螺纹，小端的螺纹大径12，小径7.5，大小端直径差2.21，长度26，FANUC数车编程。

O0001;

#14=12 

#1=10.0  (第1轮切削结束的深度）

#2=9.0   (第2轮切削结束的深度）

#3=8.2   (第3轮切削结束的深度）

#4=7.7   (第4轮切削结束的深度）  

#5=7.5   (第5轮切削结束的深度）

#6=0.20  (第1轮切削每刀切削深度）

#7=0.10  (第2轮切削每刀切削深度）

#8=0.08  (第3轮切削每刀切削深度）

#9=0.05  (第4轮切削每刀切削深度）

#10=0.04 (第5轮切削每刀切削深度）

G99 M03 S600

#15=#14

N100 #15=#15-#6

G01 X#15 F0.3

G32 U2.21 W-26 F3

G00 X20

G00 W26

IF[#15GT#1]GOTO100

M98P17000

N200#15=#15-#7

G01 X#15 F0.3

G32 U2.21 W-26 F3

G00 X20

G00 W26

IF[#15GT#2]GOTO200

M98P17000

N300#15=#15-#8

G01 X#15 F0.3

G32 U2.21 W-26 F3

G00 X20

G00 W26

IF[#15GT#3]GOTO300

M98P17000

N400#15=#15-#9

G01 X#15 F0.3

G32 U2.21 W-26 F3

G00 X20

G00 W26

IF[#15GT#4]GOTO400

M98 P17000

N500#15=#15-#10

G01 X#15 F0.3

G32 U2.21 W-26 F3

G00 X20

G00 W26

IF[#15GT#5]GOTO500

M98 P17000

M05

M30

O7000;

G01 X#15 F0.3

G01 W-0.1 F0.3

G32 U2.21 W-26 F3

G00 X20

G00 W26

G00 U-2.21

M99

这个程序的复杂在于，把螺纹分成不同深度的5层切削，每层的吃刀深度也不同，并且，每切削完一刀后，调用子程序，把Z坐标负向移动0.1再车一刀。