grip求助。。。。各位朋友请帮忙

Liin

下面是一个改实体颜色程序，问题在于程序会把实体的表面颜色也变了，怎样才能实现仅编辑实体本身颜色，而不是连带实体表面的颜色也变了。。

另外，还有就是MASK/70这句里的70限定选择是实体，我看书上还说70实体还有子类型0 2 3三个类型，这三个子类型怎么引用呢。是什么格式，还是怎么弄。晕死了，新手，现在这个程序等着用，就因为这个问题通不过。。。各位达人帮忙啊。。。

$$ 更改体颜色
ENTITY/obj(1000)
NUMBER/col(8)
DATA/col,11,8,143,171,6,37,12,101

start:
        
l10:  
            choose/'请选择着色面','上下模本体 压边圈','压料芯 托料板',$
                   ' 上模镶块', '下模镶块','非标件','起重棒螺孔套',$
                   '运输连接板',$
                   '起吊螺纹孔','销钉孔','螺钉孔',$
                                DEFLT,1,rsp1
            jump/l10:,hal:,,,l20:,l20:,l20:,l20:,l20:,l20:,l20:,rsp1
$$体颜色           
l20:  
           k=col(rsp1-4)
          mask/all
        
    ident/'选择要改色的体',obj,cnt,nm,rsp2
    jump/start:,hal:,,,rsp2
           do/l30:,i,1,nm  
           &color(obj(i))=k
           
l30:
           jump/start:

hal:
    HALT

Liin

mould288

mould288

Liin

mould288

mould288

Liin

Liin

bao8102110