|
悬赏1G币未解决
#' y7 D. L- g- |8 h5 s( e
global mom_out_fixture_offset_value mom_prev_out_fixture_offset_value 3 `6 H$ |, B1 X2 H
global unclamp_b_flag
% O" M/ M3 B/ h) C- pglobal mom_fixture_offset_value% w( q0 d! u: F# o1 u0 @
set c [expr $mom_fixture_offset_value+53]
' Z, q; \$ [; v, pset d [expr 00-$mom_fixture_offset_value]
! o( p$ ~% [- |5 q6 q3 Jglobal e' m. l' s( q' x' f1 w
if {$mom_fixture_offset_value >= "00"} {
, g/ k* v# ]/ Z% E$ M7 p& jset e $c
8 q m% P0 R# l, ?} else {0 g3 ^. E3 L, z. c2 y9 _ ~: o' H9 Q
set e 54.1\ P0[format "%02.0f" $d]
2 E c" P* M% v# U: H}
( J, ?5 }7 K# m
1 o/ g2 G: S4 y% P6 rif {[info exists mom_out_fixture_offset_value ] && [info exists mom_prev_out_fixture_offset_value ] } {, @: B6 r; P3 M1 [4 y9 A g& C A
if { $mom_out_fixture_offset_value(e 54.1\ P0) != $mom_prev_out_fixture_offset_value(e 54.1\ P0)} {
[ h# m8 w+ O MOM_output_literal "M26"
+ o* x) q+ P" r( p9 j set unclamp_b_flag "TRUE"
# l8 o; G" j; i& G. { }; `- x& o* q! B ^
} elseif { ![info exists mom_prev_out_fixture_offset_value ] } {) _; a; ^$ i. p, F
MOM_output_literal "M26"& }5 N' E& m5 |3 U7 U
set unclamp_b_flag "TRUE"& ?- p- @7 c6 Y, ?3 j: I
}: D! E- e6 m2 j, c
( u* q/ O* G3 S8 P9 v
|
|