[代码分享]再度降低你的编程失误风险！不同刀具使用相同刀号时出现提示
本帖最后由 destiny0515 于 2019-4-8 16:45 编辑有人（就是我）在编程时由于粗心，出现不同刀具却用了同一个刀号的情况，轻则废活废刀，重则撞机。前阵子看到有人提出来这个问题，可是大神们懒得细说，萌新们又找不到门径。我班门弄斧的写了一些代码，经过测试可用。那么就把代码放在这里，大神可以给些建议，萌新拿去学习，欢迎大家讨论，共同进步。觉得好的同学们给个赞吧效果图：
**** Hidden Message *****
补充内容 (2019-4-9 10:02):
129楼更新代码：提示相同的两把刀具名称，可更快捷的知道哪把刀出现错误输入
补充内容 (2019-4-9 13:17):
注：此代码中的“MOM_display_message”只能在NX9.0及以上版本使用，如果是低版本，可以替换为“MOM_abort”
补充内容 (2019-4-13 09:15):
更正一处错误：主贴中第一段代码在无论[第一个刀具]有无内容，均需插入，可降低报错的可能性。感谢@zhaopengg的反馈。
补充内容 (2019-6-3 01:12):
559楼更新代码：原代码在一定条件下会误报重复刀号，请直接跳至559楼使用新代码。
感谢大家的反馈。 本帖最后由 destiny0515 于 2019-6-3 01:04 编辑
gn02362507 发表于 2019-6-2 21:57
一次后处理多个刀具及刀号时且不按照顺序，提醒刀具名称有误。
经过一段时间的测试，发现贴中代码在一些情况下会有bug出现。经过向前辈请教，更正了代码，并在小圈子内进行了测试，暂未出现误报情况。
本次使用了[数组]命令，使得代码更加精简。
使用以下代码时，需移除本帖中已使用的其他所有代码。将以下代码插入至"工序起始序列">>"刀轨开始"下。
static/image/hrline/line1.png
global mom_tool_number mom_tool_name tool_seq tool_name_array tool_num_array
if {!} {
set tool_seq 0
}
set tool_name_array($tool_seq) $mom_tool_name
set tool_num_array($tool_seq) T
set i 0
while {$i<$tool_seq} {
if {$tool_num_array($i)=="T"} {
incr tool_seq -1
if {!} {
MOM_display_message "闪光蜗牛提示：刀具 $mom_tool_name 与\
$tool_name_array($i) 使用了相同刀具号 请检查"
}
}
incr i
}
incr tool_seq
destiny0515 发表于 2019-4-24 06:23
语法有错误。你复制过去后，不要修改，点确定试试
这个厉害了而且高级最主要好玩哈哈哈 本帖最后由 destiny0515 于 2019-4-9 10:07 编辑
jianfeng13148 发表于 2019-4-8 18:14
能同时提示与那把刀相同就好了
经过测试，这个功能已经实现
将主贴第二段代码替换为以下：
global mom_tool_number mom_tool_name
global tn tNo
if {==-1} {
lappend tn $mom_tool_name
if {!=-1} {
set st
if {} {
set st
}
set sn
MOM_display_message "\n\n 闪光蜗牛提示：刀具 $mom_tool_name 与 $sn 使用了相同刀具号 请确认\n\n"
}
lappend tNo $mom_tool_number
}
补充内容 (2019-6-3 01:05):
以上代码在一定条件下会出bug，请使用559楼的新代码 花了不少工夫才把新方案的代码看明白。感觉新方案(使用数组+while语句)其实效率不如原方案(使用列表)。假设有很多条刀路，那么靠后的刀路判断次数过多。在极端情况下，如果有100条路且所用刀具都不重复的话，那么第100刀路需要判断100次；第99条刀路要判断99次。以此类推。即便是有重复的刀具，刀库也一共只有14支刀，那么靠后的刀路也还是会判断14次。这么多次判断，执行效率应该不如旧方案。 destiny0515 发表于 2019-6-3 00:51
经过一段时间的测试，发现贴中代码在一些情况下会有bug出现。经过向前辈请教，更正了代码，并在小圈子内 ...
这条代码每个操作都会提示一次，要是100个就会提示100次这样会浪费时间。要是把它修改成相同刀具提示后就不再提醒就好啦 (ˇˇ）彬～ 发表于 2019-4-22 14:52
假如需要不同刀具名用同一个刀好怎么办
这个是提示功能，不是报警，所以还是会正常的出程序 645+45+45+45+45 RE: [代码分享]再度降低你的编程失误风险！不同刀具使用相同刀号时出现提示 [修改] 自己动手丰衣足食 学习一下 不同刀具使用相同刀号时出现提示 666666 谢谢分享 谢谢楼主的无私分享 学习 谢谢分享@！！@！@