后处理卡不懂,懂语言的老铁来告知一下啥意思
{:cry:}global ptp_file_nameset tmp_file_name "${ptp_file_name}_"
if {} {
MOM_remove_file $tmp_file_name
}
MOM_close_output_file $ptp_file_name
file rename $ptp_file_name $tmp_file_name
set ifile
set ofile
global mom_machine_time
set cutting_time "(CUTTING TIME: [ format"%.2f" $mom_machine_time])"
puts "%"
puts $cutting_time
set buf ""
while { > 0 } {
puts $ofile $buf
}
close $ifile
close $ofile
MOM_remove_file $tmp_file_name
MOM_open_output_file $ptp_file_name 后处理语言是一种机器语言,
说白了就是,不是人话! 感觉就是程序头的意思
页:
[1]