VMOV命令的使用

Frank_yangkee

在UG后处理文件中可以看到命令VMOV，这个命令不是TCL语言命令代码
是UG post自己定义的命令

命令用于数组数值传递，用法上很有趣！
在TCL文件里可以找到VMOV的定义如下：
n=数组容量
p1=已知数组
p2=需要赋值的数组


#=============================================================
proc VMOV { n p1 p2 } {
#=============================================================
  upvar $p1 v1 ; upvar $p2 v2

   for { set i 0 } { $i < $n } { incr i } {
      set v2($i) $v1($i)
   }
}


需要注意的是，仔细看函数的定义
通常的习惯是右边往左边赋值，如set语句
但是VMOV语句是左边往右边赋值

VMOV 3 mom_pos mom_prev_pos
是mom_pos---->赋值给mom_prev_pos
使用时一定要注意！

lj564