二次开发-更改颜色

ming347732211

$$ 更改颜色

ENTITY/obj(1000)
; \' W0 Q/ h' V# G3 q$ Z* N7 XNUMBER/col(17)
  M1 |: L  s0 F) p* i" t: TDATA/col,1,124,106,87,211,103,181,108,6,$
; t7 q, {# @: P& W186,60,29,60,77,125,199,125
' _8 Z! B4 L- m- D" u# M& b: U1 ~
start:
% K: p5 R2 ~2 ?5 I( _
L01:
9 _6 M. n* C/ |$ _" w6 S1 g2 s- w          choose/'选择类型',$
             '改线色','改面色',$
- {9 U+ L( A- Y/ T3 P/ s7 I              '改体色 材质颜色',resp
& w; I' M- q2 [1 E7 x- p         jump/l01:,hal:,,,l10:,l20:,l30:,resp
$ g. D( L( o" }+ i+ o  K         
l10:  
            choose/'选择线型的颜色' ,$
                 '改为   1色 ',$
                 '改为 124色 ',$
& P" W' p( U8 R9 N3 w8 _2 c                 '改为 106色 ',$
$ s8 o& C7 v: O7 o% J- g8 K, J                 '改为  87色 ',$
5 k3 r' y! [+ q                 '软料刀口 211色 ',$
0 [% ^) W: D2 V* _, U* n& O7 q                 '硬料刀口 103色 ',$
                 '初始线 误检 181色 ',$
                 '尺寸线 108色 ',$
                 '冲床台面   6色 ',$
                 '折弯线 186色 ',$
                           DEFLT,1,rsp1
+ U3 ~- [4 F9 k& j            jump/l01:,hal:,,,l101:,l101:,l101:,rsp1
4 ?; E* ^/ d& k9 Q8 I9 f           
% z( X( v" R# ^9 a. zl101:  
           k=col(rsp1-4)
1 {, S: w' Q+ e7 L" G) J3 \
           mask/3

    ident/'选择要改色的线型',obj,cnt,nm,rsp2
/ }3 b5 W+ }+ c$ ?6 n4 S0 |& @( u    jump/start:,hal:,,,rsp2
- {1 F8 A4 w4 z) Q3 ?5 K) v
% {8 `2 O# m( {6 ?           do/l102:,i,1,nm  
% W' {; [; v2 @$ o, U; g: E           &color(obj(i))=k
% l2 P9 K+ s  f
" d. A% a! e1 O3 {k=col(rsp1-4) 是不是指定DATA/COL 处的颜色，如何指定到另外一排的颜色呢

ming347732211

没人解决吗
+ ?' F9 \- |! I& e