自动记录每把刀加工数量和装刀时间的宏程序代码

#1=10001
#2=601(DAO-CHANG)
#3=631(JIA-GONG-SHU-LIANG)
#4=661(HUAN-DAO-SHI-JIAN)
#5=#2+16(DAO-JU-SHU-LIANG)
WHILE[#2LE#5]DO1
IF[ABS[#[#2]-#[#1]]LE0.03]GOTO1
#[#3]=0
#[#4]=#3011-FIX[#3011*0.0001]*10000+FIX[#3012*0.01]*0.0001
#[#2]=#[#1]
N1
#2=#2+1
#1=#1+1
#4=#4+1
#[#3]=#[#3]+1
#3=#3+1
END1
M99

适用于三菱系统。如果是法兰克，要把第一行的10001改成11001

刀长补正会自动抄到变量#601-#616中
每把刀的加工数量会记录在#631-#646中，换刀后会自动清零
装刀时间会记录在变量#661-#676中，比如现在是9月15号21点42分。就会显示915.2142