分享五轴联动和去掉多余角度后处理（3）

uglxqwx

谢谢楼主分享

uglxqwx

谢谢楼主分享{:smile:}

样胜

{:}{:}{:}

zhulei520718

谢谢分享

南山忘远

谢谢大佬分享！！！

似曾相识999999

楼主 这个可以帮忙分解一个吗？我只想要这个判断提示 “有两个夹具偏置值相同”谢谢。

#=============================================================
proc PB_CMD_output_multi_mcs { } {
#=============================================================
global mom_fixture_offset_value
global mom_pos Totals_mcs
global mom_prev_pos n_c n_d n_e
global mom_operation_name
global mom_tool_number
global mom_inside_outside_tolerances
global mom_parent_group_name
global mom_group_name offset_flag
global mom_mcsname_attach_opr
global mom_out_angle_pos Zm1 Zm2
global mom_oper_geom stl tml tnl itl
global mom_mcsname_attach_opr tmll tmlll

if {![info exists offset_flag]} {
set offset_flag 0
}
if { $mom_fixture_offset_value == 0 } {
set n_e [expr 54]}
set n_c [expr $mom_fixture_offset_value+53]
set n_d [expr 0-$mom_fixture_offset_value]
if {$mom_fixture_offset_value >= 1} {
set n_e $n_c
}
if {$mom_fixture_offset_value < "0"} {
set n_e 54.1\ P[format "%1.0f" $n_d]
}
if {$mom_fixture_offset_value <= -10} {
set n_e 54.1\ P[format "%02.0f" $n_d]
}
set stl [expr $stl+1]
set tml($stl) $mom_fixture_offset_value
set tnl($stl) $mom_mcsname_attach_opr($mom_operation_name)
set tmll($stl) $n_e
set tmlll($stl) $mom_mcsname_attach_opr($mom_operation_name)
#MOM_output_literal "(当前坐标系：G$tmll($stl))"
for {set itl 0} {$itl < $stl} {incr itl} {
#MOM_output_literal "(排列坐标系：$tmlll($itl): G$tmll($itl))"
if {$tml($itl) == $mom_fixture_offset_value} {
set stl [expr $stl-1]
if {[string compare $tnl($itl) $mom_mcsname_attach_opr($mom_operation_name)]} {
MOM_output_to_listing_device "******************************************************************
   温馨提示您 : 几何体名（$mom_mcsname_attach_opr($mom_operation_name)）的夹具偏置值与另外一个几何体夹具偏置值相同(是：$mom_fixture_offset_value)！请重新检查设置!
******************************************************************"
  MOM_display_message  "温馨提示您:
     几何体名（$mom_mcsname_attach_opr($mom_operation_name)）的夹具偏置值与另外一个几何体夹具偏置值相同(是：$mom_fixture_offset_value)！请重新检查设置!"
  MOM_abort "报警提示：有两个夹具偏置值相同！"
}
return
}
}

后面代码没有复制。

lookwendy*

谢谢大佬分享！！！持续更新{:}

草样年华789

码这么多字还附这么多图片辛苦了

第120904名菜鸟

楼主大好人！

Wwo

祝作者长命百岁1111