|
IF[ FIX[#1] LE 0 ] GOTO101;(如果加工數(shù)量小于等于零.轉(zhuǎn)移至101段,只計數(shù)不報警)
0 G2 j, [ S2 _5 k% V; P/ |8 i) s#3=FIX[#4120/100];(檢測當前刀具號,化為個位數(shù)并取整)- J* z8 X3 W9 M/ W* j, O
#2=#3+500;(加工數(shù)量要儲存到變量號的計算)* F7 I# [" d2 M0 q+ i- Y6 l! x. W' C
IF[#[#2]GE#1]GOTO100;(判斷是否達到加工數(shù)量)
; \( S" r* u& u" n3 Q, NN101#[#2]=#[#2]+1;(加工數(shù)量加一)
7 p) w/ R3 B+ J3 u% L' B# JM99;8 G. z% z: i+ d7 [5 @- V( D$ Q4 W
N100M9;(加工到指定數(shù)值時執(zhí)行)
2 l/ ?. E" X% M, S( Y6 JM5;& n9 w" B2 w$ d3 d9 S
#19=#3*100-200;(計算要換哪把刀,此處為十工位斜導(dǎo)軌機床,換刀為減兩個刀位)! V2 H9 T2 c, C
IF[#19 EQ 0] THEN#19=1000;(計算刀具號為0時,執(zhí)行T1000)3 R6 l, @0 P0 @' Z
IF[#19 EQ -101 ] THEN#19=900;(同上)0 d3 W. _8 @6 f9 r7 F
T#19;(換刀,將要換刀片的刀換出來): f; @/ s: z' z
#[#2]=0;(清空計數(shù)變量)
5 m) t/ N+ O1 s0 K#3000=#3(T ERROR);(發(fā)出報警,后面括號里為報警信息,報警編號為3000+#3,如果是1號刀,編號就為3001)
! }$ x$ P5 U% G2 Y7 E4 `8 V5 q+ g
2 [" Y R+ o1 L: y/ C+ K* N/ s |
|