宏程序解釋說明：

使用方法：G65 P8586 T10. R700. Q970. W1.

T：需計(jì)算刀具數(shù)量的總數(shù)。

R：刀具壽命數(shù)值寄儲(chǔ)地址。（R700.即為數(shù)據(jù)存入#700-#799變量內(nèi)。）

Q：刀具長度數(shù)據(jù)寄儲(chǔ)地址。（Q970.即為刀長數(shù)據(jù)存入#970-#999變量內(nèi)。）

W：刀具壽命計(jì)數(shù)增量值。

注：

        以上參數(shù)不可少輸入，同時(shí)不可隨意輸入，當(dāng)出現(xiàn)3099（SET ERROR）報(bào)警時(shí)，請檢查相關(guān)參數(shù)是否設(shè)置正確。

此套程序?yàn)橹悄芑?，?dāng)更換刀具后，當(dāng)前所更換的刀具壽命數(shù)值會(huì)自動(dòng)清零重新計(jì)數(shù)；當(dāng)?shù)毒邏勖_(dá)到設(shè)定值時(shí)，CNC觸發(fā)報(bào)警并提示相關(guān)刀具壽命到期，此時(shí)當(dāng)前刀具壽命計(jì)數(shù)被自動(dòng)清零，若需查看當(dāng)前刀具加工數(shù)量值可查看#730變量值，需要注意的是#730變量值再次啟動(dòng)CNC時(shí)則會(huì)自動(dòng)被清空?。?！

文｜Dream Catcher

著｜CNC編程工程師（ID：LENS-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 刀具壽命總數(shù)設(shè)置）
#2=3000. （T02 刀具壽命總數(shù)設(shè)置）

#3=3000. （T03刀具壽命總數(shù)設(shè)置）

#4=3000. （T04 刀具壽命總數(shù)設(shè)置）

#5=3000. （T05 刀具壽命總數(shù)設(shè)置）

#6=3000. （T06 刀具壽命總數(shù)設(shè)置）

#7=3000. （T07 刀具壽命總數(shù)設(shè)置）

#8=3000. （T08 刀具壽命總數(shù)設(shè)置）

#9=3000. （T09 刀具壽命總數(shù)設(shè)置）

#10=3000.（T10 刀具壽命總數(shù)設(shè)置）

 (此數(shù)據(jù)可根據(jù)需要自行更改或增加刀具，必須與主程序刀具總數(shù)T值相對應(yīng)，否則出現(xiàn)報(bào)警！??！)

(****************************)
(****************************)
(****************************)
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)

(Tue Jul 25 13:33:46 2017)
(Tel-13826552493---Dream Catcher)
(CAM Engineer-LENS-DT001267)

%

 特別說明

 宏程序內(nèi)部未解釋說明的變量嚴(yán)禁修改?。?！

  以下為程序上CNC實(shí)踐效果

友情提示：

若您在使用本宏程序時(shí)還有任何疑問，請與我聯(lián)系。