- 积分
- 0
UID1965552
主题
在线时间 小时
注册时间2017-10-17
|
马上注册,结识高手,享用更多资源,轻松玩转三维网社区。
您需要 登录 才可以下载或查看,没有帐号?注册
x
#" x3 [. _& @* A# ?, |5 @
global mom_out_fixture_offset_value mom_prev_out_fixture_offset_value + G. `/ Q. B1 x% ?5 i8 [; f
global unclamp_b_flag
& `5 K9 e8 @. D. @( P: b7 uglobal mom_fixture_offset_value$ ^: H: g! g( }& t6 X' R3 _
set c [expr $mom_fixture_offset_value+53]4 i3 K" C& k7 X0 ], e! Y# f
set d [expr 00-$mom_fixture_offset_value]
* l+ z/ v, ]2 L" q* ]/ D2 eglobal e" C# h( d7 [( V: L
if {$mom_fixture_offset_value >= "00"} {# O" Y! l! P2 ~# t6 h
set e $c9 i" K& ?# K! ^* h; _, ~
} else {
6 P& e/ z R2 E6 zset e 54.1\ P0[format "%02.0f" $d]
! @: |; B: S7 \3 @! e$ m}
4 e7 [. ^; S C# N% ~" z6 l8 y4 f2 {! |! S3 e
if {[info exists mom_out_fixture_offset_value ] && [info exists mom_prev_out_fixture_offset_value ] } {
6 y# {3 J7 Y: ` if { $mom_out_fixture_offset_value(e 54.1\ P0) != $mom_prev_out_fixture_offset_value(e 54.1\ P0)} {! O ~& e" ]- I @4 B9 L+ J
MOM_output_literal "M26"
9 u0 b' P' S' g* j/ B set unclamp_b_flag "TRUE"
: p( {; O4 C2 z }( p* I0 _7 M) S. M+ K, K$ K
} elseif { ![info exists mom_prev_out_fixture_offset_value ] } {
; A5 _/ x) c8 }4 X# m+ q4 y2 \4 s MOM_output_literal "M26"
% A' t3 P7 w* O! W8 s set unclamp_b_flag "TRUE"
6 I N, {( s7 |" q: F% k1 f+ C}% u; p+ C/ f. a5 D
! g4 h" N& o7 y; R
|
|