那位好心人帮我把后处理刀名检查去掉，不然处理报警####

daixin19871017

朋友给的四轴后处理，定制了刀名检查，如何删掉，请哪位好心大哥帮忙去掉，任何刀名都能处理。不胜感激，谢谢！






补充内容 (2021-11-2 20:26):
global mom_tool_name index topword


#-----------------------------------------------------------------------ma20180115
set index [string first "-" $mom_tool_name]
set topword [string range $mom_to...

补充内容 (2021-11-2 20:27):
global mom_tool_name index topword


#-----------------------------------------------------------------------ma20180115
set index [string first "-" $mom_tool_name]
set topword [string range $mom_tool_name 0 [expr $index-1]]


if {$topword != "TL" && $topword != "013" && $topword != "303" && $topword != "304" && $topword != "302" && $topword != "042" && $topword != "045" && $topword != "TX26" && $topword != "010" && $topword != "018" } {
     MOM_abort "  Tool name must be IPNA! Please reselect tool!  "
   }

daixin19871017

U.re 发表于 2021-11-2 23:08
试试看

哥，刀名可以了，但是丝锥报警，用规定的刀名就不会报警，附件有par 体帮我看看，谢谢!

daixin19871017

U.re 发表于 2021-11-2 23:08
试试看

哥你太厉害了可以正常使用，怎么改的能告诉我吗？

U.re

试试看

U.re

daixin19871017

那我大神帮忙我解决一下，谢谢了！

daixin19871017

global mom_tool_name index topword


#-----------------------------------------------------------------------ma20180115
set index [string first "-" $mom_tool_name]
set topword [string range $mom_tool_name 0 [expr $index-1]]


if {$topword != "TL" && $topword != "013" && $topword != "303" && $topword != "304" && $topword != "302" && $topword != "042" && $topword != "045" && $topword != "TX26" && $topword != "010" && $topword != "018" } {
     MOM_abort "  Tool name must be IPNA! Please reselect tool!  "
   }



global mom_tool_material_description topword mom_tool_material_description


if {$topword != "TX26"} {
     if {![info exists mom_tool_material_description] || $mom_tool_material_description == "" || $mom_tool_material_description == "High Speed Steel"} {
          MOM_abort " *** The cutting tool material without registering, please contact CIM *** "
        }
   }

daixin19871017

global mom_tool_name index topword   #-----------------------------------------------------------------------ma20180115 set index [string first "-" $mom_tool_name] set topword [string range $mom_tool_name 0 [expr $index-1]]   if {$topword != "TL" && $topword != "013" && $topword != "303" && $topword != "304" && $topword != "302" && $topword != "042" && $topword != "045" && $topword != "TX26" && $topword != "010" && $topword != "018" } {      MOM_abort "  Tool name must be IPNA! Please reselect tool!  "    }