|
现有龚老师 刀路命名宏
有没有大神参考帮忙修改下
如图 刀具名称是D6 刀具实际大小是D4 用此宏重命名出来的是读取刀具名称 而不是实际大小 有没大神帮忙改改
DIALOGS MESSAGE OFF
DIALOGS ERROR OFF
//-----------重命名----------
INT i=1
FOREACH toolpath IN folder('TOOLPATH') {
STRING thname=toolpath.Name
STRING toolname=toolpath.tool.name
STRING LIST StrList=tokens(toolname,"_")
STRING NewName=select(i<10,"0"+string(i)+"-"+$StrList[0],string(i)+"-"+$StrList[0])
RENAME TOOLPATH $thname $NewName
$i=i+1
}
DIALOGS MESSAGE OFF
DIALOGS ERROR OFF
|
|