切槽宏程序

99879259sq

(M98P0003X40z-30D2E0.2I1J2F0.05  ;x,z为终点槽底坐标，D刀宽，E精加余量,I每次退刀量,J为吃刀深)
%0003
    #40=#30
    #50=#40+0.1
    #42=#32+#3
    #52=#42
IF   [AR[#3]EQ0]OR[AR[#23]EQ0]OR[AR[#25]EQ0]
     M99
ENDIF(如果终点槽底坐标和刀宽没有定义则返回主程序)
  IF   [AR[#8]EQ0]
       #8=100
ENDIF
  G0X[#17]
   G01G99 Z[#25+#3]F0.5
WHILE[#42]GT[#25+#4]
    #40=#40-5  
    WHILE[#40]GT[#23+#4]
        G01X[#40]F[#5]
        #40=#40-#8-#7
        G01U[-[#7]]F0.5
        G04X1
   ENDW
   G01X[#23+#4]F[#5]
       X[#50]F0.5
       #42=#42-[#3]*0.7
   G01G99 Z[#42]F0.5
ENDW
   G01Z[#23+#4]F0.5
   G01X[#23+#4]F[#5]
          X[#50]F0.5
          W-0.1
          U0.2W0.1F[#5]
          X[#23]
          Z[#52]
          X[#50]
M99
       
  
加点分吧　斑主

RRRQQQ

ygc111

magic_tianhai

lovestef

99879259sq

99879259sq

我爱妹妹

99879259sq