机械必威体育网址

标题: 发个子程序，很方便的…可以记录每把刀具加工数量 [打印本页]

---

作者: wang413362569    时间: 2011-11-12 20:11
标题: 发个子程序，很方便的…可以记录每把刀具加工数量
IF[ FIX[#1] LE 0 ] GOTO101;(如果加工数量小于等于零.转移至101段，只计数不报警)
& S% x0 p! G4 i. ]) d4 @#3=FIX[#4120/100];(检测当前刀具号，化为个位数并取整)
#2=#3+500;(加工数量要储存到变量号的计算)
0 E  N8 ^' k- x% i3 k4 cIF[#[#2]GE#1]GOTO100;(判断是否达到加工数量)
N101#[#2]=#[#2]+1;(加工数量加一)
5 l8 }/ ]$ x# `# j  I5 U/ xM99;
N100M9;(加工到指定数值时执行)
M5;
, b) ~+ q! a/ e7 J7 v: j#19=#3*100-200;(计算要换哪把刀，此处为十工位斜导轨机床，换刀为减两个刀位)
" s* y3 B6 ~4 L1 T* I* ZIF[#19 EQ 0] THEN#19=1000;(计算刀具号为0时，执行T1000)
IF[#19 EQ -101 ] THEN#19=900;(同上)
T#19;(换刀，将要换刀片的刀换出来)
#[#2]=0;(清空计数变量)
: f4 n# r0 J5 u5 i* F1 {#3000=#3(T ERROR);(发出报警，后面括号里为报警信息，报警编号为3000＋＃3，如果是1号刀，编号就为3001)
* {% U" i4 g6 n8 ~/ l4 q  |9 ]
$ `( K) g0 ~- X* q* }

---

作者: wang413362569    时间: 2011-11-12 20:14
主程序为
O1
G50 S1800 M3;
. n! w$ b# C/ I% k  aG96 S240 T0101 M8;
" y: @* z, d* K6 n1 Y/ ~G65 P(子程序号) A(加工上限);
G00X150Z1;
9 D. \0 d6 s! b…
6 J5 I/ ]0 z1 A, H6 C9 x' ~0 h( F) f2 E…
; v1 d6 j1 ?# M! N5 P7 IM30;

---

作者: wang413362569    时间: 2011-11-12 20:19
加工数量存储在公共变量里，不会因为断电而被清除，适合交接班，不需检查刀片是否能使用，程序会自动监控报警提醒换刀，如1号刀，加工数量被存储在＃501中，报警后会被清零！

---

作者: wang413362569    时间: 2011-11-12 20:23
如果不指定加工数量或者指定加工数量小于1时，将只记数不报警提醒换刀，已存储的加工变量可以随时更改，改变与刀具号相对应的公共变量即可，这样可以更灵活使用

---

作者: yyjj77    时间: 2011-11-12 20:34
不错,值得借鉴!!!!{:soso_e100:}

---

作者: wang413362569    时间: 2011-11-12 20:39
最方便还是做成G代码调用，并将子程序锁起来防删除…希望能给大家生产带来方便，不足之处还请各位大侠多多指点

---

作者: cralosfan    时间: 2011-11-12 21:34
过来看看。。。。。。。。。。

---

作者: wang413362569    时间: 2011-11-12 21:53
自己顶顶……………在车床上测试过了，蛮好用的

---

作者: 昂嘟嘟    时间: 2011-11-12 22:10
{:soso_e100:}{:soso_e189:}

---

作者: wang413362569    时间: 2011-11-13 06:08
利用这个程序可以把每把刀的加工数量单独记录到公共变量里面去，一号刀记录到＃501里面，二号刀记录到＃502里面，依此类推…每次执行加工时他都会去比对下这把刀的加工数量是否超出你设定的值（即A（＃1）值）。如果超过证明刀片已经不能再加工了，程序会把机床停了，把要换的刀转过来，并报警哪把刀要换，报3001是一号刀，报3002是二号刀，依此类推…报警后相对应变量被清零，重新计数

---

作者: wang413362569    时间: 2011-11-13 06:15
出了点小错第一段应该放在#3=#2+500之后，不然到#1值小于1时会报警，嘿嘿…大家多看看，很好用的

---

作者: wang413362569    时间: 2011-11-13 11:56
没人懂，很郁闷…………

---

作者: 战神弟弟    时间: 2011-11-13 12:17
点子不错，但是宏程序不太懂，不用会安全点，期待有简单的G代码诞生

---

作者: wang413362569    时间: 2011-11-13 13:47
程序里面不执行移动指令的，只换刀…可以做成G代码！

---

作者: wang413362569    时间: 2011-11-13 13:47

战神弟弟 发表于 2011-11-13 12:17
点子不错，但是宏程序不太懂，不用会安全点，期待有简单的G代码诞生

7 `* O  m. Y% t) R/ ]程序里面不执行移动指令的，只换刀…可以做成G代码！

---

作者: lxh888    时间: 2011-11-13 21:44
好家伙，有思想。顶你。

---

作者: wang413362569    时间: 2011-11-13 22:10

lxh888 发表于 2011-11-13 21:44
好家伙，有思想。顶你。

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

---

作者: oleg0007    时间: 2011-11-14 10:58
很多厂家的系统有刀具寿命管理功能，这个宏程序相当于模拟了寿命管理，很不错。

---

作者: wang413362569    时间: 2011-11-17 10:59

oleg0007 发表于 2011-11-14 10:58
9 T# L' J; `; ], _- m很多厂家的系统有刀具寿命管理功能，这个宏程序相当于模拟了寿命管理，很不错。

+ w8 S0 [! ~7 U9 S法兰克也有刀具管理功能，但是不会用…求指教

---

作者: oleg0007    时间: 2011-11-17 11:05

wang413362569 发表于 2011-11-17 10:59
0 J8 U8 V5 c  W6 Y. a法兰克也有刀具管理功能，但是不会用…求指教

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

---

作者: 小镇岁月123    时间: 2016-8-17 00:00
楼主确实很用心，挺不错的，学习了。
1 G) i' o6 f, g% |# {: ^4 x2 L本人觉得在第一次寿命到的时候报警，这时候如果技术人员没空换刀，作业员可提醒技术员并消除报警使用刀具第二次寿命继续加工，在第二次报警后就必须停机换刀了，也许这样会好些。
1 D# s6 c' j! D+ i$ d                             IF [#501 EQ 500] GOTO 210
                             IF [#501 GE 550] GOTO 210
                              、   
                              、
5 ]  u+ m  Q/ _( |                             N210;
                             #501=#501+1;
3 w4 X4 a+ l+ k+ X$ U! i/ x) O                             #3000=1   (T1 UP)                                      

---

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

---

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

---

作者: cxs1140    时间: 2017-6-19 21:56
收藏了,有时间再研究一下

---

欢迎光临 机械必威体育网址 (//www.szfco.com/)

Powered by Discuz! X3.4