|
悬赏1G币未解决
#
: |& B- P2 |$ R( i; D0 oglobal mom_out_fixture_offset_value mom_prev_out_fixture_offset_value " _6 w" r$ ~( n" a- f i& D* z
global unclamp_b_flag
- J! ~" e6 H% @. x' u7 n3 ]global mom_fixture_offset_value
$ Q8 U; q' U- k3 i, Q* Tset c [expr $mom_fixture_offset_value+53]
3 j4 Z2 }3 A, M/ |7 C& Oset d [expr 00-$mom_fixture_offset_value]
$ v( u4 `! @ M- o% t9 g+ dglobal e
8 K2 t& F5 M7 k; Uif {$mom_fixture_offset_value >= "00"} {
; A% A' ^" i" q! V; Oset e $c
& w$ L! A: H- w} else {8 u7 U( ]# e, O; ~( t
set e 54.1\ P0[format "%02.0f" $d]
# Z6 Z" I( f/ [}
4 J* n0 Q$ K. F4 r' B( G- ]2 G8 V5 G6 h9 ^9 r
if {[info exists mom_out_fixture_offset_value ] && [info exists mom_prev_out_fixture_offset_value ] } {# X) g& w3 ?$ T+ Q a2 |
if { $mom_out_fixture_offset_value(e 54.1\ P0) != $mom_prev_out_fixture_offset_value(e 54.1\ P0)} {+ m- _: T: @. T, n8 Q2 f5 W
MOM_output_literal "M26"
l. y' x) D% ~0 W2 D% ~* V- l set unclamp_b_flag "TRUE"/ [+ X: M& N5 K2 B1 j
}
$ ?9 D, }2 n6 t# l7 A2 z( q" t- F} elseif { ![info exists mom_prev_out_fixture_offset_value ] } {* x. V( M4 h/ h# t F
MOM_output_literal "M26"4 Z6 h, o8 X- r: b. e2 ~
set unclamp_b_flag "TRUE"2 x/ f; r/ {* U" |' f& f
}
( X: [3 \2 P, Z0 O. F6 k8 { B& l/ V: r) ~9 N8 p _
|
|