深孔深槽 通用宏

G50 S800 G96 S70 M3 T0909 G0 X#505 Z20. M8 #1=#503 () #2=#504 () #3=[#505-[#506+#507*2]] (X余量) #6=#508 (槽宽的切削总次数) WHILE[#1LE#500] DO1 #5=#505 (X) #4=0(次数) WHILE[#4LE#6] DO2 IF[#1GT[#512]] GOTO400 (啄式结束判断 变为退出孔口或槽口模式) IF[#509EQ0] GOTO300 N400 G0 Z#510 X#5 N300 G4 U#502 G0 Z-#2 G1 Z-#1 F.04 IF[#509EQ0]GOTO200 #4=#4+#509 IF[#514EQ0] GOTO700 IF[#513EQ0] GOTO700 IF[#1GT#514] THEN#6=#513 IF[#1GT#514] THEN#5=#5-#3/#513 IF[#1GT#514] GOTO500 N700 #5=#5-#3/#508 N500 END2 N200 IF[#1EQ#500]GOTO100 #2=#1-#502 IF[#514EQ0] GOTO800 IF[#1GT#514] THEN#1=#1+#511 IF[#1GT#514] GOTO600 N800#1=#1+#501 N600IF[#1GT#500] THEN#1=#500 END1 N100 G0 Z50. M9 G28 W0 M30 % #500=22 (Z项终点值) #501=0.5 (Z项切削步距) #502=0.5 (Z项G0定位步距) #503=0.5 (Z项切削初始切深) #504=-2 (Z项G0初始定位) #505=38.9 (槽大径值或孔中心值) #506=22.1 (槽小径值) #507=3 (刀宽) #508=4 (槽宽的切削总次数) #509=1 (槽宽的切削累加记数的单位 当为0时，则钻深孔模式带啄式 当不为0时，则切深槽模式不带啄式 ) #510=20 (退出孔口距离) #511=.25 (改变的每刀切深值) #512=5 (倍径) #513=0 (改变槽宽的切削总次数) #514=15 (切深槽模式改变槽宽的切削总次数和切深的Z项长度 当为0时，则不改变 当不为0时，则改变。钻深孔模式只改变切深 当为0时，则不改变 当不为0时，则改变)