求助!关于删除层分类问题

zhong14120

ug删除层分类太麻烦了,要点一个删一个.
( k( u& m8 x$ U1 W我想做一个开发,一次全部删除.但没找到合适的命令
方法一:
- s; B; H) f) i, P" M+ {想查询层的组名,再用catd删除.?如何通过层查询到组名?(这个也没找到)
或全部组名删除,但CATD又不接受ALL...
方法二:
& O2 x# n8 y! j给出组名匹配,如果有就删除,没有就结束.
我找到相应的命令CATV
CATV/'name'[,LAYER,layers,CNT,count][,DESCR,'description'][,IFERR,label:]
可惜无功而返,望知道用法的朋友给个指示.

CATV我试过的二种
/ O) }  X: z' y& W+ S: jCATV/'分类名'   (分类名是填的是分类的名称,但不知道返回值是什么东东??)
CATV/'分类名,层范围.一维数组,CNT,数量     (这个也是语法没通过,错在那呢?)

[ 本帖最后由 zhong14120 于 2008-1-21 19:18 编辑 ]

-KASA-

循环层名，分别删除。
INEXTN / 12
L10:
OBJ=NEXTN,IFEND,L20:
( n7 u% x! i! U2 S  IDELET / OBJ
JUMP/L10:
# k  p2 `; g* A) Q6 t1 @0 |) XL20:

zhong14120

谢谢指点!虽然你写的格式不对但我已解决了十分感谢!

zhong14120

STRING/OBJ(20)
  W4 ?5 n: t9 p

5 w8 ~( Q- T" s, h7 r# P1 k7 \5 HINEXTN / 12
+ o" A$ s" B- u9 p) cL10:
OBJ=NEXTN/IFEND,L20:
catd / OBJ,IFERR,L10:
JUMP/L10:
) o/ u9 x; T) X% I+ z" R
3 t! n' A6 \  V9 S( gL20:

trm:
halt

: Y6 b/ w+ z- Q; M" c0 A& @9 b4 H
源码以示感谢