|
悬赏1G币未解决
#8 X, g: j" c5 s, n' _( M
global mom_out_fixture_offset_value mom_prev_out_fixture_offset_value
( D+ T1 ^6 ]4 b6 Mglobal unclamp_b_flag
+ w& r4 }* `& k/ g# i" M, O6 lglobal mom_fixture_offset_value
9 P7 U* G+ a" U0 v, H( ?8 {' |set c [expr $mom_fixture_offset_value+53]5 o) I `; T) v: v! a( y% ?
set d [expr 00-$mom_fixture_offset_value]* T+ ]) Z3 D" e$ @3 O0 l
global e
: Y- t# O$ P4 hif {$mom_fixture_offset_value >= "00"} {
+ e2 G$ _5 T, E2 o" \0 gset e $c
. U* t/ k/ Y7 Q/ {1 q- G: {. n e} else {$ g# \) y6 J/ K
set e 54.1\ P0[format "%02.0f" $d]# Z- R6 k y% F) [ M% \# \7 y
}) Q+ [' x: A# S0 b U7 m
+ C5 V, [- Z. ~& f zif {[info exists mom_out_fixture_offset_value ] && [info exists mom_prev_out_fixture_offset_value ] } {8 a! a; L- p" F- Z- Q" Z
if { $mom_out_fixture_offset_value(e 54.1\ P0) != $mom_prev_out_fixture_offset_value(e 54.1\ P0)} {
3 {9 M9 W# \8 D1 K MOM_output_literal "M26"0 T$ u; `: G. h5 s, k4 N; b7 h
set unclamp_b_flag "TRUE"5 A1 J) F6 j' C1 E3 z, |
}
& B( p, f; q2 _4 b: w6 _9 L$ [} elseif { ![info exists mom_prev_out_fixture_offset_value ] } {4 i3 c2 ~) o" ~$ E6 O
MOM_output_literal "M26"
( b$ \9 [( h- `% C$ F$ k8 N, } set unclamp_b_flag "TRUE"9 B& [! }& W4 L V3 |/ S$ L
}
! L" k. b3 r, ~, O: ?/ S+ i! ?" p4 c. I" W" { b5 r7 N% w9 ^
|
|