后处理XYZ输出最大最小代码输出不正确 谁能指点一下

小虎*

XYZ输出最大最小代码输出不正确  谁能指点一下
我搞了不知多少次 改完处理时就报警 不知道是问题出在哪里   下面是代码
#=============================================================
proc PB_CMD_limits { } {
#=============================================================
global mom_pos machine_limits
if { ![info exists machine_limits] } {
     for {set q 0} {$q<3} {incr q} {
     set machine_limits($q,0) $mom_pos($q)
     set machine_limits($q,1) $mom_pos($q)
     }
   }
  for {set q 0} {$q<3} {incr q} {
     if { $mom_pos($q) < $machine_limits($q,0)} {
     set machine_limits($q,0) $mom_pos($q)
     }
     if { $mom_pos($q) > $machine_limits($q,1)} {
     set machine_limits($q,1) $mom_pos($q)
      }
  }
}



下面代码是位置
===========================================

#=============================================================
global mom_pos machine_limits
MOM_output_literal "(Xmax: [format "%.3f" $machine_limits(0,1)])  (Xmin: [format "%.3f" $machine_limits(0,0)])"
MOM_output_literal "(Ymax: [format "%.3f" $machine_limits(1,1)])  (Ymin: [format "%.3f" $machine_limits(1,0)])"
MOM_output_literal "(Zmax: [format "%.3f" $machine_limits(2,1)])  (Zmin: [format "%.3f" $machine_limits(2,0)])"

请高手指点 如果代码不对 请纠正发一下啊 不胜感激