|
|
只针对小白，大神勿喷，毕竟我自己也是个小白，之前分享的代码有BUG， 今天闲着没事用AI试试修改，结果还真的可以，下面分享出来，希望能帮到有用的人
# 输出刀补(D.N) 余量（XY Z)
# 全局变量声明
global mom_operation_type # 点对点或钻孔操作 当前加工类型的名称
global mom_stock_part # 部件侧面余量
global mom_stock_floor # 部件底面余量
global mom_tool_cutcom_register # 刀具直径补偿寄存器
global mom_stock_part_use # 使底面余量与侧面余量一致（0 = off, 1 = on）
# 余量同步与初始化
if {[info exists mom_stock_part_use] && $mom_stock_part_use} {
set mom_stock_floor $mom_stock_part
}
set mom_stock_floor [expr {[info exists mom_stock_floor] ? $mom_stock_floor : 0}]
# 刀补抑制判断
if {[info exists mom_tool_cutcom_register] && $mom_tool_cutcom_register == 0} {
set suppress_td 1
}
# 格式化输出
if {$mom_operation_type ni {"Point to Point" "Drilling"}} {
set fmt "%.3f"
# 处理 XY 余量
set xy [string trimright [format $fmt $mom_stock_part] {0.}]
if {$xy eq ""} { set xy "0." }
# 处理 Z 余量
set z [string trimright [format $fmt $mom_stock_floor] {0.}]
if {$z eq ""} { set z "0." }
# 生成消息内容
set msg [expr {[info exists suppress_td] && $suppress_td ?
"XY=$xy mm Z=$z mm" :
"D.N=D[format %1.0f $mom_tool_cutcom_register] XY=$xy mm Z=$z mm"}]
MOM_output_literal "($msg)"
}
# 清理临时变量
catch {unset mom_stock_part_use suppress_td}
|
|
发表于 
