模具论坛

 找回密码
 注册

扫一扫,微信登录

QQ登录

只需一步,快速开始

搜索
热搜: 冲压 注塑 求助
    回车查看更多
    论坛可能已存在您要发布的主题帖 关闭
      查看: 3609|回复: 15

      [分享] 自己写的一个螺旋铣宏程序

      [复制链接]
      发表于 2009-5-15 16:38:18 | 显示全部楼层 |阅读模式
      自己写的一个螺旋铣宏程序,系统为FANUC30i

      本帖子中包含更多资源

      您需要 登录 才可以下载或查看,没有帐号?注册

      x

      评分

      1

      查看全部评分

       楼主| 发表于 2009-5-15 17:35:15 | 显示全部楼层
      G65P9120 I_ D_ H_ R_ Z_ F_ S_ Q_ M_
      I(加工孔径) D(刀具补偿号) R(快速接近点) Z(孔底Z点) F(进给)
      S(Z轴进给速度) Q(1次的进给量) M(M1为G91/M省略G90)
      发表于 2009-5-15 17:39:27 | 显示全部楼层
      程式不大帮LZ貼出來


      O9100(CALC OFFSET & ABSIO Z POS)
      #100=99
      G4
      #100=ROUND[#100]
      #101=#100-ROUND [FIX[#100/100]*100]-ROUND[#100-FIX[#100/10]*10](NC/UNIT)
      #102=ROUND[#100-FIX[#100/10]*10](OFST TYRE)
      IF[#102EQ0]GOTO98
      IF[#102EQ1]GOTO98
      IF[#102EQ2]GOTO98
      #3000=143(NC UNIT DATA ERROR #100)
      N98IF[#7EQ#0]GOTO94
      IF[#102EQ0]GOTO1(TYPE A)
      IF[#102EQ1]GOTO2(TYPE B)
      IF[#102EQ2]GOTO3(TYPE C)
      N1(TYPE A)
      IF[#100GE200]GOTO11
      #30=#[2000+#7]
      GOTO91
      N11#30=#[10000+#7]
      GOTO91
      N2(TYPE B)
      IF[#100GE200]GOTO12
      #30=#[2000+#7]+#[2200+#7]
      GOTO91
      N12#30=#[10000+#7]+#[11000+#7]
      GOTO91
      N3(TYPE C)
      IF[#100EQ12]GOTO13
      IF[#100GE200]GOTO13
      #30=#[2400+#7]+#[2600+#7]
      GOTO91
      N13#30=#13000+#7]+#[12000+#7]
      N91IF[#30NE0]GOTO94
      #3000=141(OFFSET ERROR)
      N94(READ Z ABSIO)
      IF[#101EQ60]GOTO21(C5)
      ABSIO
      N20(EXCEPT HD)
      #33=#5003
      GOTO99
      N21(HD)
      #33=#5003
      N99M99



      O9100(CALC OFFSET & ABSIO Z POS)
      #100=99
      G4
      #100=ROUND[#100]
      #101=#100-ROUND [FIX[#100/100]*100]-ROUND[#100-FIX[#100/10]*10](NC/UNIT)
      #102=ROUND[#100-FIX[#100/10]*10](OFST TYRE)
      IF[#102EQ0]GOTO98
      IF[#102EQ1]GOTO98
      IF[#102EQ2]GOTO98
      #3000=143(NC UNIT DATA ERROR #100)
      N98IF[#7EQ#0]GOTO94
      IF[#102EQ0]GOTO1(TYPE A)
      IF[#102EQ1]GOTO2(TYPE B)
      IF[#102EQ2]GOTO3(TYPE C)
      N1(TYPE A)
      IF[#100GE200]GOTO11
      #30=#[2000+#7]
      GOTO91
      N11#30=#[10000+#7]
      GOTO91
      N2(TYPE B)
      IF[#100GE200]GOTO12
      #30=#[2000+#7]+#[2200+#7]
      GOTO91
      N12#30=#[10000+#7]+#[11000+#7]
      GOTO91
      N3(TYPE C)
      IF[#100EQ12]GOTO13
      IF[#100GE200]GOTO13
      #30=#[2400+#7]+#[2600+#7]
      GOTO91
      N13#30=#13000+#7]+#[12000+#7]
      N91IF[#30NE0]GOTO94
      #3000=141(OFFSET ERROR)
      N94(READ Z ABSIO)
      IF[#101EQ60]GOTO21(C5)
      ABSIO
      N20(EXCEPT HD)
      #33=#5003
      GOTO99
      N21(HD)
      #33=#5003
      N99M99
      发表于 2009-5-15 17:49:28 | 显示全部楼层
      不错
        有没有高人 将FANUC30i该换为 西门子的 以便大家共同学习
      谢谢
      发表于 2009-5-15 21:38:22 | 显示全部楼层
      螺旋铣我倒有,没你这个复杂
      发表于 2009-5-16 00:25:25 | 显示全部楼层
      LS可以把程式发上來共享,有解說更佳
      咱會給你加分的

      歡迎高手的參與
      发表于 2009-5-16 21:03:06 | 显示全部楼层
      学习中
      发表于 2009-5-17 09:38:50 | 显示全部楼层
      ,拿出来分享一下咯。
      发表于 2009-5-17 09:43:26 | 显示全部楼层
      ,拿出来分享一下咯。
       楼主| 发表于 2009-5-19 17:32:24 | 显示全部楼层
      给大家说一下宏程序

      下面是字母所对应的变量号:
      A是#1       I是#4        D是#7     H是#11
      B是#2      J是#5        E是#8     M是#13
      C是#3      K是#6       F是#9

      Q是#17    T是#20    W是#23    Z是#26   
      R是#18    U是#21    X是#24   
      S是#19     V是#22    Y是#25   

      下面是字母的含义:
      EQ   等于       NE 不等于
      GT   大于       GE大于等于
      LT    小于       LE小于等于

      #i=ABS[#j]      绝对值
      #i=FIX[#j]        小数点以下舍去



      G65P9120 I_ D_ H_ R_ Z_ F_ S_ Q_ M_         为主程序
      O9120      O9100                                                    为子程序

      给大家简单说一下,

      评分

      1

      查看全部评分

      发表于 2009-5-19 22:26:02 | 显示全部楼层
      好像在很多系统可以用G91来实现螺旋下刀啊~
      %0001
      G54G17G90
      M03S1000
      G00X20
      Z5
      G01Z1F200
      G91G03I-20z-1L11
      G90G03I-20
      G1X0
      G00Z100
      M5
      M30

      评分

      1

      查看全部评分

      发表于 2010-12-14 09:43:24 | 显示全部楼层

      回复 楼主 的帖子

      我是新手,看了有点晕,不够详细
      发表于 2010-12-15 09:25:00 | 显示全部楼层
      看的迷糊,版主,或者哪位老大帮忙加上注释啊!!!再次谢过...
      发表于 2010-12-18 08:46:56 | 显示全部楼层
      应该还有更简单的吧!!!
      发表于 2010-12-18 16:19:23 | 显示全部楼层
      应该还有更简单的吧!!!
      发表于 2011-10-12 11:31:39 | 显示全部楼层
      非常有学习指导意义!!
      您需要登录后才可以回帖 登录 | 注册

      本版积分规则

      关闭

      招聘信息 上一条 /5 下一条

      关闭

      求职信息 上一条 /5 下一条

      关闭

      技术求助 上一条 /5 下一条

      QQ|小黑屋|手机版|模具论坛 ( 浙ICP备15037217号 )

      GMT+8, 2025-7-22 13:53

      Powered by Discuz! X3.4

      © 2001-2013 Comsenz Inc.

      快速回复
      返回顶部
      返回列表
       
      客服电话:0577-61318188
      模具论坛交流群:
      模具论坛交流群
      工作时间:
      08:30-17:30