- 积分
- 0
UID1965552
主题
在线时间 小时
注册时间2017-10-17
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
#/ Y3 u0 l0 p& u* X
global mom_out_fixture_offset_value mom_prev_out_fixture_offset_value
0 k5 Q( W- a: ~/ Tglobal unclamp_b_flag0 k y8 _3 g9 `) ^4 F5 _/ e
global mom_fixture_offset_value+ o! B# n. @0 I. }! i0 {3 ]6 M
set c [expr $mom_fixture_offset_value+53]: t2 w) t8 W# E( y
set d [expr 00-$mom_fixture_offset_value]
. s1 J' c( }( z- L4 X: ^, kglobal e
! v0 a6 j' k: Q$ }( A5 p3 n2 uif {$mom_fixture_offset_value >= "00"} {' I+ L4 |! X2 Q6 i7 W/ X
set e $c! ^0 [- Z9 O& H+ d! F# ^
} else {9 }% M% h+ R0 i) J0 g. U
set e 54.1\ P0[format "%02.0f" $d]5 \# a2 U+ B2 {" t4 R
}6 H+ z( A0 q4 Y' B3 a
# I6 H+ ]6 C0 S0 s; ~& }if {[info exists mom_out_fixture_offset_value ] && [info exists mom_prev_out_fixture_offset_value ] } {
# e4 ^, i+ T- Z0 X$ M if { $mom_out_fixture_offset_value(e 54.1\ P0) != $mom_prev_out_fixture_offset_value(e 54.1\ P0)} {- }# B. ^/ m9 M+ g9 v! [! t
MOM_output_literal "M26"
% ^8 |! F& a& d; \3 @ set unclamp_b_flag "TRUE") s2 k( \; u+ T' o3 o% q" n9 L4 ]2 t
}
* |/ C$ B3 D# J+ B4 o} elseif { ![info exists mom_prev_out_fixture_offset_value ] } {
2 N1 m+ k' ]- c9 R1 Y, e; {6 W MOM_output_literal "M26"
3 a2 r0 {( v' [" }: t set unclamp_b_flag "TRUE"4 S2 n. m7 N6 W2 c
}/ _+ ~7 C X- D
2 @3 u0 I. T2 X' G |
|
发表于 2017-10-17 12:20:57