车圆弧螺纹宏程序在 Fanuc-0i Tc系统上试过,有興趣的朋友可以試試O0001;M04 S500 T0101; G00 X-10 Z5 M08; （螺纹起刀点）G65 P0002 K0.5; （调用0002号宏程序，赋值#6为0.5，往下以此类推，螺纹共车了5刀）G65 P0002 K0.9;G65 P0002 K1.2;G65 P0002 K1.5;G65 P0002 K1.7;G00 Z300 M09;M30;这是主程序，子程序在下面。O0002; #3=0; （圆弧角度自变量）N1 #1=50*SIN#3; （圆弧X轴坐标，圆弧半径为50） #2=50*COS#3; （圆弧Z轴坐标) #4=2*#1-#6； (#4为直径，#6为圆弧X轴中心坐标） #5=#2-50； （#5为圆弧Z值，-50为圆弧Z轴中心坐标） G32 X#4 Z#5 F1.5;（车螺纹，螺距为1.5） #3=#3+5; （角度自变量，递增5度）IF#3LE180 GOTO1;（如果角度小于等于180，在N1 与IF之间循环） G32 W-20 F2; （外圆螺纹，螺距为2）G00 X110; （X轴退刀） Z5; （回到螺纹起刀点） X-10; M99;
