求助UG后处理程序头输出所有刀具列表

行盈流税 · 发表于 2022-3-13 20:23:43

(T01 H01 D00 飞刀_D50)
(    H02 D01          )
(    H03 D02          )
(    H04 D05          )
(T05 H05 D00 铣刀_D12)
(T06 H06 D00 铣刀_D10)
(T07 H07 D00 铣刀_D8)
(    H08 D06             )
(    H09 D07             )
(    H10 D10          )
(程序头输出所有刀具信息且不重复分别读取一把刀的全部H号和半径补偿号 H号和D号不重复)
(求助大神后处理能达到这种效果有偿QQ:313094316)
(UG12.0版本无阉割和加密或者提供TCL代码语句)

xzt7566 · 发表于 2022-3-15 10:59:08

行盈流税 · 发表于 2022-3-15 13:51:40

描述的清楚些有几把刀用来光刀我用H号调底面公差 D号调侧壁公差有好几处公差这几把刀都是这种情况

xzt7566 · 发表于 2022-3-15 10:55:33

3axis_sinumerik_tool_lib.zip (70.06 KB, 下载次数: 342) 这是一个西门子带刀具列表的后处理
你看看按图修改就可以达到效果了

行盈流税 · 发表于 2022-3-15 10:22:17

xzt7566 发表于 2022-3-15 08:29
看了下你的这个后处理,还没有带刀具列表的程式头的结构, 想改差得太远了, 这不是几行TCL代码就能完成的. ...

把语法露出来我能看懂一部分的

xzt7566 · 发表于 2022-3-15 08:29:31

行盈流税发表于 2022-3-14 18:20
那你来个实现这个效果的后处理 H和T不用管我看看TCL代码

看了下你的这个后处理,还没有带刀具列表的程式头的结构, 想改差得太远了, 这不是几行TCL代码就能完成的. 找个现成的比较好改.

行盈流税 · 发表于 2022-3-14 18:25:57

for { set ii 0 } { $ii < $wo20 } { incr ii } {
if {$pk($ii) == "$kj $ki $km $mom_tool_name" } {
set wo20 [expr $wo20-1]

}
}

### 这个代码就是检查刀具不重复的关键语句刀具不重复不难一把刀有多个H号和半径补偿号如何在放在一起输出难在这刀具的H号半径补偿号有多少个分别在哪把刀一目了然

行盈流税 · 发表于 2022-3-14 18:20:37

xzt7566 发表于 2022-3-14 13:43
这个倒是容易实现, 不过G43后面的H和T如果不一致, 有很多机床会报警的, 这么做的意义何在

那你来个实现这个效果的后处理 H和T不用管我看看TCL代码

xzt7566 · 发表于 2022-3-14 13:43:53

这个倒是容易实现, 不过G43后面的H和T如果不一致, 有很多机床会报警的, 这么做的意义何在

行盈流税 · 发表于 2022-3-14 11:44:56

M70.rar (58.1 KB, 下载次数: 402)

[求助] 求助UG后处理程序头输出所有刀具列表

相关帖子

浏览过的版块