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

努力活着

+ z" G! M' C5 [4 H/ p& p
+ W  b4 l( ~6 d

版主同学，删掉这个贴子吧，谢谢 / E3 _2 A$ m4 J0 r 版主同学，删掉这个贴子吧，谢谢 版主同学，删掉这个贴子吧，谢谢

努力活着

ENTITY/obj,obj1(1500),obj2(1500),obj3(1500),ena(1500),enb(1500),enc(1500)
3 d" q8 E* M& d0 Jnumber/mat(12)
2 {  n1 O7 R/ K+ m4 hINEXTE/ALL $$所有      
: w8 N, {' [! X  N7 e  q# @  u. Gj=0
ixa=0
* g- D; b/ @+ E7 U, Sixb=0
ixc=0

& W) m! e3 _4 sLOOP:
j=j+1
obj=NEXTE/IFEND,END:    $$ 循环得到所有  实体   
ch=&layer(obj)          $$ 获得 对象的所属层

- D, ^) I4 Q# m" x/ _! K! OIF/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:
( d( l. t- u; i4 pIF/CH==15 OR CH==16 OR CH==18 OR CH==21,JUMP/L10:
$ p. z8 ~/ ^* X2 pIF/CH==22 OR CH==23 OR CH==24 OR CH==25,JUMP/L10:
8 q& ?& p- |8 Z8 s& Q7 PIF/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:
jump/LOOP:
' O+ ?& g" f- r2 k% w  Y
' \' v$ {. a5 h( F0 N" LL00:

ixa=ixa+1
- \7 Y( a3 z+ c3 [9 Hena(ixa)=obj
+ C+ m3 g! U3 s% y% U) o" H0 Qjump/LOOP:

L10:
! P1 y+ C' x5 h2 P" v0 ^ixb=ixb+1
2 b) G. i! L$ }, ienb(ixb)=obj
! m9 S5 R/ ^! }3 e1 }# `jump/LOOP:

- n1 [* B# F6 S( ~4 m' O1 v' CL20:
ixc=ixc+1
enc(ixc)=obj
, G- R9 \. ]3 F* m8 Pjump/LOOP:
. x, b8 E) L* u" h  l
END:
8 B) o) w) X% B3 }" @' h/ d    mat=matrix/transl,0,0,50
+ f  y. w+ j. T5 q! X) h* q    obj1=transf/mat,ena(1..ixa),move

HALT

努力活着

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

努力活着

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

XIAObo595219317

谢正华？？   好挂件啊

努力活着

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