自己收集的UG后处理定制命令

ddyl996656

刀名字

global mom_tool_name

global mom_tool_diameter

global mom_tool_corner1_radius

MOM_output_literal "(NAME:$mom_tool_name )"

MOM_output_literal "(D : [ format  "%.2f" $mom_tool_diameter]  )"

MOM_output_literal "(R : [ format  "%.2f" $mom_tool_corner1_radius]  )"

或

global mom_tool_name mom_tool_type

global mom_tool_diametermom_tool_corner1_radius mom_tool_flute_length

global mom_tool_length

MOM_output_literal"(ToolName=$mom_tool_name)"

MOM_output_literal "(D=[format"%.2f" $mom_tool_diameter])"

MOM_output_literal "(R=[format"%.2f" $mom_tool_corner1_radius])""

MOM_output_literal "( F=[format"%.2f" $mom_tool_flute_length] )"

MOM_output_literal "(L=[format"%.2f" $mom_tool_length])"

或

global mom_tool_name

global mom_tool_diameter

global mom_tool_corner1_radius

MOM_output_literal"($mom_tool_name--> D=[format "%.2f" $mom_tool_diameter]R=[format "%.2f" $mom_tool_corner1_radius])"

刀前加段号

MOM_set_seq_on

   MOM_output_literal "  "

    MOM_set_seq_off

刀具结尾加时间

global mom_machine_time

MOM_output_literal "(Total OperationMachine Time : [format "%.2f" $mom_machine_time] min )

坐标支持G54.1P1

global mom_fixture_offset_value

set c [expr $mom_fixture_offset_value+53]

set d [expr 0-$mom_fixture_offset_value]

global e

if {$mom_fixture_offset_value >="0"} {

set e $c

} else {

set e 54.1\ P[format "%02.0f" $d]

}

file:///C:/Users/ADMINI~1/AppData/Local/Temp/msohtmlclip1/01/clip_image001.png

}

file:///C:/Users/ADMINI~1/AppData/Local/Temp/msohtmlclip1/01/clip_image003.pngfile:///C:/Users/ADMINI~1/AppData/Local/Temp/msohtmlclip1/01/clip_image001.png

xzs*

太感谢了

ug1029

谢谢分享！谢谢分享！

a123411227

谢谢分享

977750320

谢谢分享

天上飘动的云*

谢谢分享！

qbdp丨qbdp

感谢分享

HANFZ

感谢楼主分享

寒冬001

怎么制定  恒定余量 你的这里有侧面和底面 恒定余量 是什么代码

ddd407113710

{:smile:}好东西啊