|
悬赏1G币未解决
#- [- l1 b' C! H' ~8 L
global mom_out_fixture_offset_value mom_prev_out_fixture_offset_value
) ~0 Y8 l* l! b6 Gglobal unclamp_b_flag
& M9 z% C& @9 Yglobal mom_fixture_offset_value
q8 r( @4 m' L, v" z- l4 ]set c [expr $mom_fixture_offset_value+53]
! Y) v* i% B6 A. D4 X' }, ^set d [expr 00-$mom_fixture_offset_value]! r6 O- t( Z" `' l. Z
global e! x- }* j: _* ?
if {$mom_fixture_offset_value >= "00"} {
# g% [" A6 v! }set e $c
1 \, |7 N3 P4 V& o7 a} else {
) S# u: m5 I' P* w* qset e 54.1\ P0[format "%02.0f" $d]( n/ i1 l9 O7 U: R8 o, t
}) n; y* j& G/ }! ~2 v9 `6 W
& z. v' c& z0 }: U: E
if {[info exists mom_out_fixture_offset_value ] && [info exists mom_prev_out_fixture_offset_value ] } {- N& A+ B; N% ~9 s8 T; W$ p6 E
if { $mom_out_fixture_offset_value(e 54.1\ P0) != $mom_prev_out_fixture_offset_value(e 54.1\ P0)} { u- T0 ?: j3 [5 j; O3 f$ }
MOM_output_literal "M26"
; } t; d9 ?+ q" v set unclamp_b_flag "TRUE"9 V) V. N( h+ x7 p
}
. H# l) q& F4 p, X4 O' E} elseif { ![info exists mom_prev_out_fixture_offset_value ] } {
5 |) Q& o8 b* ~" p# Z6 b MOM_output_literal "M26"- j6 R4 a/ K" \0 g& V
set unclamp_b_flag "TRUE"
, d& y" m2 ?& h5 V+ c; n8 i}
0 E% _9 [+ r- S7 U0 }8 d5 _+ P. C& X; f2 U- t5 @
|
|