- 积分
- 0
UID1965552
主题
在线时间 小时
注册时间2017-10-17
|
马上注册,结识高手,享用更多资源,轻松玩转三维网社区。
您需要 登录 才可以下载或查看,没有帐号?注册
x
#- K" K) a8 G2 P- s O
global mom_out_fixture_offset_value mom_prev_out_fixture_offset_value 5 X4 d5 q7 M/ j
global unclamp_b_flag" O( g. A* i a* o
global mom_fixture_offset_value& l9 ^0 |8 k0 y* {; m
set c [expr $mom_fixture_offset_value+53]
3 P% t6 b/ x, j8 r, V+ uset d [expr 00-$mom_fixture_offset_value]- C, C' z, r/ d! [: |/ A2 u/ P
global e3 s) o4 S0 [6 |1 n9 ?
if {$mom_fixture_offset_value >= "00"} {8 M9 z( m& d0 V
set e $c
; h$ t$ i2 q" g9 T} else {
# [. @6 I7 J8 Vset e 54.1\ P0[format "%02.0f" $d]
) X# o0 p* j8 [/ T: b$ T) s; w}
: L8 E6 N$ D6 U! L) a- K9 @2 \/ u& L& U9 m T, [
if {[info exists mom_out_fixture_offset_value ] && [info exists mom_prev_out_fixture_offset_value ] } {# i4 S1 @8 B3 Y7 d; {3 q4 u, ?4 z
if { $mom_out_fixture_offset_value(e 54.1\ P0) != $mom_prev_out_fixture_offset_value(e 54.1\ P0)} {3 C* h9 j" [+ [; ]
MOM_output_literal "M26"
( Z- b: m6 e4 a. V% H set unclamp_b_flag "TRUE"5 k1 K, l- l8 u7 z$ N+ X
}
+ U3 f& E/ v& B! s1 _} elseif { ![info exists mom_prev_out_fixture_offset_value ] } {
3 ~7 Z9 V% Q' ] q* T: ~! M* H- [ MOM_output_literal "M26"
& i3 m8 G! Y9 y' Q! T3 L set unclamp_b_flag "TRUE") ^6 Y. }7 a$ [
}9 t- s r! X4 T1 n% E
' Y$ q) |/ D9 k) ~ E
|
|