|
IF[ FIX[#1] LE 0 ] GOTO101;(如果加工数量小于等于零.转移至101段,只计数不报警)+ h" }' H [- i" D ]
#3=FIX[#4120/100];(检测当前刀具号,化为个位数并取整)
) z* [ Y1 L0 r: l9 e/ G* @; E! p2 v, {#2=#3+500;(加工数量要储存到变量号的计算)
) @. z f3 Q; x) WIF[#[#2]GE#1]GOTO100;(判断是否达到加工数量)6 T2 R6 k6 q, Z2 n/ o1 h
N101#[#2]=#[#2]+1;(加工数量加一)
/ N5 `! {+ g# b1 q2 S* VM99;
$ [7 g9 m7 S% ], Y- {N100M9;(加工到指定数值时执行)
( H: d4 W, ]1 O1 x7 e) a" kM5;
0 P$ S* r2 g& A4 F#19=#3*100-200;(计算要换哪把刀,此处为十工位斜导轨机床,换刀为减两个刀位) o' O% F( C" x/ C. O _
IF[#19 EQ 0] THEN#19=1000;(计算刀具号为0时,执行T1000): p1 _2 X1 c5 G- ?4 _/ A( x/ b
IF[#19 EQ -101 ] THEN#19=900;(同上)' R) F3 C2 ?/ f4 \
T#19;(换刀,将要换刀片的刀换出来), _- r7 K6 q4 o: _( I
#[#2]=0;(清空计数变量)* b) A2 F: ?( w' v6 K. }+ C% B
#3000=#3(T ERROR);(发出报警,后面括号里为报警信息,报警编号为3000+#3,如果是1号刀,编号就为3001)' v0 T7 T' M) t( j9 c8 t
! q( B9 X8 R8 A6 O- h( X/ a: v: k2 I
|
|