Creating a category containing several layers and a description.
$$
$$ Declaration
$$
ENTITY/L(10),DIM(5),TX(2)
$$
$$ Geometry Definition
$$
LAYER/WORK,10
L(1)=LINE/0,0,1,0
L(2)=LINE/1,0,1,1
L(3)=LINE/1,1,0,1
L(4)=LINE/0,1,0,0
LAYER/WORK,11
DIM(1)=LDIM/HORIZ,.5,1.5,YLARGE,L(4),YLARGE,L(2)
DIM(2)=LDIM/VERT,2,.5,XLARGE,L(1),XLARGE,L(3)
LAYER/WORK,12
TX(1)=NOTE/4,3,'MATERIAL: STEEL'
TX(2)=NOTE/4,2.6,'FINISH: PLATED'
$$
$$ Create Category
$$
CAT/'BLOCK',10..12,DESCR,'CAT=PART, DIMS, AND NOTES.'
HALT
The layers containing the part geometry, dimensions, and notes are now grouped into the category called BLOCK. A description of the category's contents accompanies BLOCK. At this point, if the complete assembly was active (layers 1-256), you could look at just the block by making all layers (except the work layer) inactive, then activate the category BLOCK.
LAYER/WORK,10,ACTIVE,CAT,'BLOCK',INACT,REST