写个法兰克跟兄弟系统能用的刀具寿命宏程序

这三个变量为刀具寿命
#5601=计数数模式选择
#5701=刀库第一把刀总寿命
#5801= 刀库第一把刀已加工寿命
例如：自动增加刀具寿命
子程序o0001
N1
#2=12(几把刀需要加寿命就填几)
#1=#1+1
IF[#1GT#2]G0TO3
IF[#[5800+#1]EQ1]G0TO2(自检所有刀具寿命)
GOTO1
N2
#[5800+#1]=#[5700+#1]（加寿命）
GOTO1
N3
M99