|
IF[ FIX[#1] LE 0 ] GOTO101;(如果加工数量小于等于零.转移至101段,只计数不报警)
8 h1 B; v6 w9 n5 [1 }* E#3=FIX[#4120/100];(检测当前刀具号,化为个位数并取整)7 Y$ `; I% `' x3 C9 z3 I
#2=#3+500;(加工数量要储存到变量号的计算)
( G' ]% h- r& t6 v! xIF[#[#2]GE#1]GOTO100;(判断是否达到加工数量)
$ w* d3 Y2 P G, k1 rN101#[#2]=#[#2]+1;(加工数量加一)6 n. u8 i( c7 V
M99;
# P2 e% h" T* x, r; s# I1 a6 iN100M9;(加工到指定数值时执行)
1 v# R0 l6 O }* N/ nM5;0 C ~) R2 n" t3 I# e
#19=#3*100-200;(计算要换哪把刀,此处为十工位斜导轨机床,换刀为减两个刀位)
- X6 x5 y, \/ N) nIF[#19 EQ 0] THEN#19=1000;(计算刀具号为0时,执行T1000)( |& z$ ?# g4 O' T
IF[#19 EQ -101 ] THEN#19=900;(同上)
& J8 P, h; D' QT#19;(换刀,将要换刀片的刀换出来) U. M* m% `' {" v5 I! | N4 C
#[#2]=0;(清空计数变量)
& t0 ^) I- _% _$ H, l+ {#3000=#3(T ERROR);(发出报警,后面括号里为报警信息,报警编号为3000+#3,如果是1号刀,编号就为3001)% a8 {5 [+ A0 w5 K$ l+ m
% }6 z0 B1 |1 l. t
|
|