iCAx开思网

标题: 切槽宏程序 [打印本页]

作者: 99879259sq 时间: 2005-5-1 18:25
标题: 切槽宏程序
(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 时间: 2005-5-1 19:08

作者: ygc111 时间: 2005-5-1 22:16
弱弱地问：这个应用在哪里呀

作者: magic_tianhai 时间: 2005-5-1 23:18
怎么用？

作者: lovestef 时间: 2005-5-2 10:32
楼主大哥，把宏程序的学习资料上传一下啊。谢谢

作者: 99879259sq 时间: 2005-5-2 17:57
这个是车床上的切槽宏。有些系统没有这种循环。比如华中世纪星。。把它输入系统中，使用时直接调用子程序就可以了
M98P0003X40z-30D2E0.2I1J2F0.05 ;x,z为终点槽底坐标，D刀宽，E精加余量,I每次退刀量,J为吃刀深)
至于资料你得了解一下计算机高级语言

作者: 99879259sq 时间: 2005-5-2 18:05

RRRQQQ wrote:

你笑什么，这可是我的心血啊，

我还没破零呢

作者: 我爱妹妹 时间: 2005-5-3 23:54
不错不错很好很好
不过写的不够详细，现在切槽槽底槽顶都有圆弧或直倒角你没有考虑希望你编出来。
另外问一下你的附件是哪里搞的能给我发份完整的吗？
谢谢 jlzho@163.com

作者: 99879259sq 时间: 2005-5-4 09:14
槽底圆角和倒角用G72固定循环就可以了

欢迎光临 iCAx开思网 (https://www.icax.org/)