iCAx开思网

标题: 主轴转速的后处理 [打印本页]

作者: legendfly 时间: 2005-4-1 14:05
标题: 主轴转速的后处理
主轴转速是齿轮变速，想实现在变速时自动插入主轴暂停指令、系统暂停指令和主起动指令。请指点！

作者: legendfly 时间: 2005-4-20 08:32
自己顶一下！
我想数不带刀库的数控设备在换刀时也应插入主轴暂停指令、系统暂停指令和主轴起动指令。
请帮一下吧。

作者: 我爱计算机 时间: 2005-5-3 22:22
大哥，这个是个很简单的问题，只需要后置处理里下点功夫，但我想没人会为您专门做一个的！你就将就点吧，自己加吧。

作者: sinderal 时间: 2005-5-4 17:33

legendfly wrote:
主轴转速是齿轮变速，想实现在变速时自动插入主轴暂停指令、系统暂停指令和主起动指令。请指点！

要寫FIL, 貼一小段你要的NC程序...有空幫你整整..你自己打開要用的那個後處理機器配置文件 (Uncx01.Pxx, Uncx01.Fxx)

作者: legendfly 时间: 2005-5-7 16:44
如果转速发生变化程序如下,在S指令前加入以下指令。
M5
M12
M3

作者: jeson2008 时间: 2005-5-7 23:20
将下面的文件加入到你用的后置处理文件 (Uncx01.Fxx)中.
然后输出程序,试试能不能达到你的要求

CIMFIL / ON, SPINDL  $$ Starts
DMY=POSTF(20)  $$ save
QA=POSTF(7,4)
IF (QA.EQ.(ICODEF(RPM))) THEN
AUXFUN/05;  AUXFUN/12;  AUXFUN/03
END IF
DMY=POSTF(21)  $$ restore
DMY=POSTF(13)  $$ Process
CIMFIL/OFF

(详见附图1)

作者: jeson2008 时间: 2005-5-7 23:23
有兴趣的话,试试下面的文件,方法同上!

CIMFIL / ON, SPINDL  $$ Starts
DMY=POSTF(20)  $$ save
QA=POSTF(7,4)    
IF (QA.EQ.(ICODEF(OFF)).OR.QA.EQ.(ICODEF(ON))) THEN  
DMY=POSTF(21)  $$ restore
DMY=POSTF(13)  $$ Process
ELSE
AUXFUN/05;  AUXFUN/12;  AUXFUN/03
   END IF
DMY=POSTF(21)  $$ restore
DMY=POSTF(13)  $$ Process
CIMFIL/OFF

作者: legendfly 时间: 2005-5-9 22:13
谢谢楼上的兄弟，有了，如下：
N00050 T0101
N00055 M5
N00060 M12
N00065 M3
N00070 S800
N00075 G00 X46.752 Z2.
两种方法输出结果好象一样的。请详解。
但连续两个S800就不应该输出M5 M12 M3了。应如何加入判断？

作者: jeson2008 时间: 2005-5-10 22:09
试试下面的文件

(方法如上)

$$ ****************************************************
YRPM=0
CIMFIL / ON, SPINDL               $$ Starts
DMY=POSTF(20)    $$ Save
YRPM=POSTF(1,2,10)
QA=POSTF(7,4)
QAA=POSTF(7,5)    
   IF (QA.EQ.(ICODEF(RPM)).AND.QAA.NE.YRPM)THEN
AUXFUN/05;  AUXFUN/12;  AUXFUN/03
   END IF
DMY=POSTF(21)    $$ Restore
DMY=POSTF(13)    $$ Process
CIMFIL/OFF
$$ ****************************************************

作者: legendfly 时间: 2005-5-11 11:29

没有变化，但如下改动后，S800处不输出M5M12M3。是否新旧转速附值时出错了。
$$ ****************************************************
YRPM=0
CIMFIL / ON, SPINDL $$ Starts
DMY=POSTF(20) $$ Save
YRPM=POSTF(1,2,10)
QA=POSTF(7,4)
QAA=POSTF(7,5)
   IF (QA.EQ.(ICODEF(RPM)).AND.QAA.NE.800)THEN
AUXFUN/05;  AUXFUN/12;  AUXFUN/03
   END IF
DMY=POSTF(21) $$ Restore
DMY=POSTF(13) $$ Process
CIMFIL/OFF
$$ ****************************************************

作者: legendfly 时间: 2005-5-11 11:39
自己再试，如下
NEWRPM=0
OLDRPM=0
CIMFIL / ON, SPINDL $$ Starts
DMY=POSTF(20) $$ Save
NEWRPM=POSTF(1,2,10)
QA=POSTF(7,4)
QAA=POSTF(7,5)
   IF (QA.EQ.(ICODEF(RPM)).AND.QAA.NE.OLDRPM)THEN
AUXFUN/05;  AUXFUN/12;  AUXFUN/03
   END IF
OLDRPM=QAA
DMY=POSTF(21) $$ Restore
DMY=POSTF(13) $$ Process
CIMFIL/OFF

成了。
再次感谢jeson2008！！！！

作者: jeson2008 时间: 2005-5-11 19:50

小伙子,好样的!

作者: margar2016 时间: 2016-9-25 07:40
谢谢分享!谢谢分享!

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