- 积分
- 0
UID1965552
主题
在线时间 小时
注册时间2017-10-17
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
#. t! U1 o- ?0 q$ V
global mom_out_fixture_offset_value mom_prev_out_fixture_offset_value
9 y- s3 t1 t: Z7 T: C6 k6 X# Kglobal unclamp_b_flag
: E: e+ C2 j) b# k6 o" vglobal mom_fixture_offset_value9 J: A4 k7 q, D+ @' {* E' f
set c [expr $mom_fixture_offset_value+53]/ [- j' e9 [# s1 O7 _! j
set d [expr 00-$mom_fixture_offset_value]
, e: j' u- ^, Z! q% q q5 v, t4 Qglobal e0 U7 L2 O8 ^- ~; p! }( d
if {$mom_fixture_offset_value >= "00"} {6 G$ m1 N: G" a
set e $c
2 F, j8 _$ x# Q" `! m( D8 H2 d* S% i} else {; M& i& ~9 a) K1 w3 |$ S( \
set e 54.1\ P0[format "%02.0f" $d]1 M" s7 X3 q* \. ^
}% V' C3 H s* d
; O" l- _# S3 C
if {[info exists mom_out_fixture_offset_value ] && [info exists mom_prev_out_fixture_offset_value ] } {. |8 j/ a6 W8 h+ t* U& v/ J
if { $mom_out_fixture_offset_value(e 54.1\ P0) != $mom_prev_out_fixture_offset_value(e 54.1\ P0)} {4 U& U: m5 R F1 R
MOM_output_literal "M26"
. }5 @, w: O N+ H N" ` set unclamp_b_flag "TRUE"
& D; B% m3 Y5 f- [$ X }
0 {- H" x$ b6 I+ x& M; ?. f$ w} elseif { ![info exists mom_prev_out_fixture_offset_value ] } {
2 O& B8 [ ]* h/ x MOM_output_literal "M26"
" P6 L' ] [0 Z6 @9 X! r set unclamp_b_flag "TRUE"
, `7 X O% y( i6 l$ w}$ s R* o0 y$ W. s1 v
+ T1 S& b$ e4 t/ A& f c" { |
|
发表于 2017-10-17 12:20:57