T：需計算刀具數量的總數。
R：刀具壽命數值寄儲地址。（R700.即為數據存入#700 #799變量內。）
Q：刀具長度數據寄儲地址。（Q970.即為刀長數據存入#970 #999變量內。）
W：刀具壽命計數增量值。

注：
        以上參數不可少輸入，同時不可隨意輸入，當出現3099（SET ERROR）報警時，請檢查相關參數是否設置正確。

此套程序為智能化，當更換刀具后，當前所更換的刀具壽命數值會自動清零重新計數；當刀具壽命達到設定值時，CNC觸發(fā)報警并提示相關刀具壽命到期，此時當前刀具壽命計數被自動清零，若需查看當前刀具加工數量值可查看#730變量值，需要注意的是#730變量值再次啟動CNC時則會自動被清空！！！
   以下為宏程序主體：

%
O8586(************TOOL LIFE DUE**********)
(******PROGRAM WEI_HE 20170823******)
(**********G65 P8586 T6. R700. Q970.  W1.********)
#110=#17
IF[#20 EQ #0] GOTO9999
IF[#20 LE 0.] GOTO9999
IF[#20 GT 21.] GOTO9999
IF[#18 EQ #0] GOTO9999
IF[#18 LT 500.] GOTO9999
IF[#18 GT 970.] GOTO9999
IF[#23 EQ #0] GOTO9999
IF[#110 LT 500.] GOTO9999
IF[#110 GT 970.] GOTO9999
IF[#999 EQ 170823.] GOTO100
#1=1.
#2=#110
WHILE[#1 LE #20]DO1
#[#2+#1]=#[11000.+#1]
#1=#1+1.
#999=170823.
END1
N100
#1=1.
WHILE[#1 LE #20]DO1
#2=11000.
#3=#2+#1
#4=#110.
#5=#4+#1
#100=#[#3]
#101=#[#5]
IF[#100 NE #101] GOTO9000
#1=#1+1.
END1
#1=1.
#31=#18+30.
WHILE [#1 LE #20] DO1
#[#18+[#1]]=#[#18+[#1]]+#23
#1=#1+1.
END
#1=1.
WHILE [#1 LE 5.] DO1
#[#1]=#0
#1=#1+1.
END1
#1=#0
#29=1.
#30=1.
#[#31]=#0
#27=#18
#28=#20
(****************************)
(****************************)
(****************************)
#1=3000.  （T01 刀具壽命總數設置）
#2=3000. （T02 刀具壽命總數設置）
#3=3000. （T03刀具壽命總數設置）
#4=3000. （T04 刀具壽命總數設置）
#5=3000. （T05 刀具壽命總數設置）
#6=3000. （T06 刀具壽命總數設置）
#7=3000. （T07 刀具壽命總數設置）
#8=3000. （T08 刀具壽命總數設置）
#9=3000. （T09 刀具壽命總數設置）
#10=3000.（T10 刀具壽命總數設置）
(此數據可根據需要自行更改或增加刀具，必須與主程序刀具總數T值相對應，否則出現報警！！！)
(****************************)
(****************************)
(****************************)
WHILE[#30 LE #28] DO2
IF[#[#29] EQ #0] GOTO9999
IF[#[#29] EQ 0.] GOTO9999
#29=#29+1.
#30=#30+1.
END2
#29=1.
WHILE[#29 LE #28] DO3
IF[#[#27+#29] GE #[#29]] GOTO#29
#29=#29+1.
END3
M99
( )
N1
#[#31]=#[#27+1.]
#[#27+1.]=0.
#3000=1(T01 LIFE DUE END)
N2
#[#31]=#[#27+2.]
#[#27+2.]=0.
#3000=2(T02 LIFE DUE END)
N3
#[#31]=#[#27+3.]
#[#27+3.]=0.
#3000=3(T03 LIFE DUE END)
N4
#[#31]=#[#27+4.]
#[#27+4.]=0.
#3000=4(T04 LIFE DUE END)
N5
#[#31]=#[#27+5.]
#[#27+5.]=0.
#3000=5(T05 LIFE DUE END)
N6
#[#31]=#[#27+6.]
#[#27+6.]=0.
#3000=6(T06 LIFE DUE END)
N7
#[#31]=#[#27+7.]
#[#27+7.]=0.
#3000=7(T07 LIFE DUE END)
N8
#[#31]=#[#27+8.]
#[#27+8.]=0.
#3000=8(T08 LIFE DUE END)
N9
#[#31]=#[#27+9.]
#[#27+9.]=0.
#3000=9(T09 LIFE DUE END)
N10
#[#31]=#[#27+10.]
#[#27+10.]=0.
#3000=10(T10 LIFE DUE END)
N11
#[#31]=#[#27+11.]
#[#27+11.]=0.
#3000=11(T11 LIFE DUE END)
N12
#[#31]=#[#27+12.]
#[#27+12.]=0.
#3000=12(T12 LIFE DUE END)
N13
#[#31]=#[#27+13.]
#[#27+13.]=0.
#3000=13(T13 LIFE DUE END)
N14
#[#31]=#[#27+14.]
#[#27+14.]=0.
#3000=14(T14 LIFE DUE END)
N15
#[#31]=#[#27+15.]
#[#27+15.]=0.
#3000=15(T15 LIFE DUE END)
N16
#[#31]=#[#27+16.]
#[#27+16.]=0.
#3000=16(T16 LIFE DUE END)
N17
#[#31]=#[#27+17.]
#[#27+17.]=0.
#3000=17(T17 LIFE DUE END)
N18
#[#31]=#[#27+18.]
#[#27+18.]=0.
#3000=18(T18 LIFE DUE END)
N19
#[#31]=#[#27+19.]
#[#27+19.]=0.
#3000=19(T19 LIFE DUE END)
N20
#[#31]=#[#27+20.]
#[#27+20.]=0.
#3000=20(T20 LIFE DUE END)
N21
#[#31]=#[#27+21.]
#[#27+21.]=0.
#3000=21(T21 LIFE DUE END)
N9000
#[#18+#1]=0.
#[#110+#1]=#[11000.+#1]
GOTO100
N9999
#3000=99(SET ERROR)