版主同学，删掉这个贴子吧，谢谢

努力活着

+ p# T1 }5 |' ^1 a2 y8 \

版主同学，删掉这个贴子吧，谢谢 版主同学，删掉这个贴子吧，谢谢 版主同学，删掉这个贴子吧，谢谢

努力活着

ENTITY/obj,obj1(1500),obj2(1500),obj3(1500),ena(1500),enb(1500),enc(1500)
number/mat(12)
INEXTE/ALL $$所有      
  o5 w  ~- g* k7 G3 T; \( gj=0
ixa=0
2 l" z8 ~5 V$ I7 f8 f6 ^* Mixb=0
* v7 _2 K2 `3 X. vixc=0

" D/ l, \. l# h, lLOOP:
j=j+1
: A* Q! [0 k$ `# _* Oobj=NEXTE/IFEND,END:    $$ 循环得到所有  实体   
- w0 {9 Q0 C2 Q$ Z4 g( j: fch=&layer(obj)          $$ 获得 对象的所属层
4 J3 ]3 m- ?, K6 h; M4 m: ?' R
* P. s7 b6 }! ?IF/CH==9,JUMP/L00:
IF/CH==1 OR CH==2 OR CH==3 OR CH==4 OR CH==5 OR CH==11 OR CH==12,JUMP/L10:
IF/CH==15 OR CH==16 OR CH==18 OR CH==21,JUMP/L10:
IF/CH==22 OR CH==23 OR CH==24 OR CH==25,JUMP/L10:
IF/CH==6 OR CH==7 OR CH==8 OR CH==10 OR CH==13 OR CH==14 OR CH==17,JUMP/L20:
IF/CH==19 OR CH==20 OR CH==26 OR CH==27 OR CH==28,JUMP/L20:
: E7 k: Q+ g3 [6 D$ Wjump/LOOP:

2 Q  E! o- _+ f% v0 |! ?' HL00:
; f# D$ T8 ?, Z% N
ixa=ixa+1
2 t4 ^, c4 f4 K! q9 h2 Jena(ixa)=obj
jump/LOOP:

- P8 M7 U0 h! Q( vL10:
ixb=ixb+1
enb(ixb)=obj
jump/LOOP:

2 i/ M$ J' |+ BL20:
ixc=ixc+1
; T+ v7 q) d" ~* J  Benc(ixc)=obj
jump/LOOP:
8 \: y$ a4 w( \/ b. S$ m  R# F( W+ F
END:
  e. Y! [4 J% f7 F    mat=matrix/transl,0,0,50
    obj1=transf/mat,ena(1..ixa),move
  H8 a6 R. I; K* s
HALT

努力活着

自己顶，问题还是没有解决呀

努力活着

自己顶，问题还是没有解决!!!!!!!

XIAObo595219317

谢正华？？   好挂件啊

努力活着

版主同学，删掉这个贴子吧，谢谢