发个子程序，很方便的…可以记录每把刀具加工数量

wang413362569 · 发表于 2011-11-12 20:11:21

IF[ FIX[#1] LE 0 ] GOTO101;(如果加工数量小于等于零.转移至101段，只计数不报警)
#3=FIX[#4120/100];(检测当前刀具号，化为个位数并取整)
#2=#3+500;(加工数量要储存到变量号的计算)
IF[#[#2]GE#1]GOTO100;(判断是否达到加工数量)
N101#[#2]=#[#2]+1;(加工数量加一)
M99;
N100M9;(加工到指定数值时执行)
M5;
#19=#3*100-200;(计算要换哪把刀，此处为十工位斜导轨机床，换刀为减两个刀位)
IF[#19 EQ 0] THEN#19=1000;(计算刀具号为0时，执行T1000)
IF[#19 EQ -101 ] THEN#19=900;(同上)
T#19;(换刀，将要换刀片的刀换出来)
#[#2]=0;(清空计数变量)
#3000=#3(T ERROR);(发出报警，后面括号里为报警信息，报警编号为3000＋＃3，如果是1号刀，编号就为3001)

cxs1140 · 发表于 2017-6-19 21:56:22

收藏了,有时间再研究一下

一叶飘_Zs2ds · 发表于 2017-6-19 11:16:19

楼主你好，看了你写的东西受益匪浅，你写的程序我感觉找到了知音，我对这类的程序非常痴迷，我一直在加你QQ，可是你QQ需要回答问题，我非常希望我们能成为朋友一起相互交流学习，共同进步，我希望你能看见我的回复加我QQ 248089529 电话18957410260，如果有喜欢研究这类程序的朋友也可以加我QQ一起交流学习

一叶飘_Zs2ds · 发表于 2017-6-19 11:08:48

不知道楼主在不在，我对宏程序非常痴迷，在你这里学习了很多东西，我也有写一些坐标系统计算、工作台自动校正的程序。当我看见你发的这个贴子，我感觉碰见知音了，我一直在找你加你QQ，可是你QQ加不上，需要回答问题，我希望你看见我的留言能加下我QQ，我们可以一起相互交流学习，共同进步。我QQ248089529 电话18957410260 我也欢迎喜欢研究这类的朋友加我QQ交流学习哈

小镇岁月123 · 发表于 2016-8-17 00:00:37

楼主确实很用心，挺不错的，学习了。
本人觉得在第一次寿命到的时候报警，这时候如果技术人员没空换刀，作业员可提醒技术员并消除报警使用刀具第二次寿命继续加工，在第二次报警后就必须停机换刀了，也许这样会好些。
                           IF [#501 EQ 500] GOTO 210
                           IF [#501 GE 550] GOTO 210
                           、
                           、
                           N210;
                           #501=#501+1;
                           #3000=1 (T1 UP)

oleg0007 · 发表于 2011-11-17 11:05:18

wang413362569 发表于 2011-11-17 10:59
3 S% R4 b0 q) _8 B法兰克也有刀具管理功能，但是不会用…求指教

。。。看书吧，用户手册上都有~~~

wang413362569 · 发表于 2011-11-17 10:59:46

oleg0007 发表于 2011-11-14 10:58* l& K4 c) l! r" j1 x
很多厂家的系统有刀具寿命管理功能，这个宏程序相当于模拟了寿命管理，很不错。

法兰克也有刀具管理功能，但是不会用…求指教

oleg0007 · 发表于 2011-11-14 10:58:32

很多厂家的系统有刀具寿命管理功能，这个宏程序相当于模拟了寿命管理，很不错。

wang413362569 · 发表于 2011-11-13 22:10:10

lxh888 发表于 2011-11-13 21:44! K9 Y) V# v+ d0 B" {( I X
好家伙，有思想。顶你。

谢了，有知心的…痛哭流涕呀

lxh888 · 发表于 2011-11-13 21:44:06

好家伙，有思想。顶你。

		自动登录	找回密码
密码			注册会员