|
早上看见有人发帖子问这个后处理程序的开头程序名,文件名的输出方法,刚好我前段时间也是在论坛里看见有大神分享过类似的, 我自己给弄在一起了,现在分享给大家,有需要的复制粘贴,
global mom_machine_name
global mom_part_name
global mom_sys_control_out mom_sys_control_in
global mom_output_file_basename
#MOM_output_literal "(Zhang)"
set c $mom_output_file_basename
MOM_output_literal "(程序名:$c)"
set co $mom_sys_control_out
set ci $mom_sys_control_in
set temp $mom_part_name
set x [string last "\\" $temp]
set x [expr $x + 1]
set part_name_no_path [string range $temp $x end]
append co "模型名称:$part_name_no_path" $ci
MOM_output_literal $co
set a [clock format [clock seconds] -format "%Y/%m/%d"]
set b [clock format [clock seconds] -format "%H:%M"]
set c [clock format [clock seconds] -format "%A"]
if {$c == "Monday"} {set c 一}
if {$c == "Tuesday"} {set c 二}
if {$c == "Wednesday"} {set c 三}
if {$c == "Thursday"} {set c 四}
if {$c == "Friday"} {set c 五}
if {$c == "Saturday"} {set c 六}
if {$c == "Sunday"} {set c 日}
MOM_output_literal "(日期$a 时间:$b 星期$c)"
效果如图
|
|