分享一个后处理带刀单最小Z深度的的

mynx · 发表于 2019-12-30 16:31:57

Hau.............

13685703581 · 发表于 2019-12-31 09:43:15

是不是这样的

独孤东方 · 发表于 2021-7-10 14:30:26

set tmp_file_name "${ptp_file_name}1"

if {[file exists $tmp_file_name]} {
MOM_remove_file $tmp_file_name
}

MOM_close_output_file $ptp_file_name

file rename $ptp_file_name $tmp_file_name

set ifile [open $tmp_file_name r]
set ofile [open $ptp_file_name w]

#############################################
global mom_output_file_basename
global mom_part_name

puts $ofile "%"
set a [clock format [clock seconds] -format "%Y-%m-%d"]
puts $ofile "( $a )"
puts $ofile "( Max Z = [format %.3f $mom_sys_max_travel(2)] MIN Z = [format %.3f $mom_sys_min_travel(2)] )"
global tooli numbers toolnumbers sametoolZmin
global toollistend ii iii Step numbers
for { set ii 0 } { $ii < $numbers } { incr ii } {
set iii [expr $ii+1 ]
puts $ofile "( $toollistend($ii) ZMIN=[format "%.3f" $sametoolZmin($toolnumbers($iii))] )"
}
set buf ""
while { [gets $ifile buf] > 0 } {
puts $ofile $buf
}
close $ifile
close $ofile
MOM_remove_file $tmp_file_name
MOM_open_output_file $ptp_file_name

mayzhang1024 · 发表于 2021-7-11 08:05:21

最大深度还是最小深度，应该是Z轴最小坐标吧。

mynx · 发表于 2021-7-11 12:05:06

Good..................

ug1029 · 发表于 2021-7-19 17:18:23

谢谢分享！谢谢分享！

非法非法 · 发表于 2021-7-23 08:35:48

第一把刀不输出？

zcb1588* · 发表于 2021-12-21 11:35:22

谢谢楼主分享

306795015 · 发表于 2022-4-27 20:21:38

这个第一把刀是T刀会报警，刀R角信息输出有点问题

[分享] 分享一个后处理带刀单最小Z深度的的