Create New Item
Item Type
File
Folder
Item Name
Search file in folder and subfolders...
Are you sure want to rename?
File Manager
/
VirtualKeyboardSample
/
SKILL
:
flat_hier.il
Advanced Search
Upload
New Item
Settings
Back
Back Up
Advanced Editor
Save
procedure(hier() cv = geGetEditCellView() newcv = dbOpenCellViewByType(cv~>libName symbolToString(gensym(cv~>cellName)) "layout" "maskLayout" "s" ) foreach(shape setof(shp cv~>shapes shp~>objType!="textDisplay") dbCopyFig(shape newcv) ) level = 2 when(level>0 foreach(inst cv~>instances when(newInst=dbCopyFig(inst newcv) dbFlattenInst(newInst level t t t) ); when ); foreach ); when m1 = setof(x newcv~>shapes x~>lpp=='("METAL2" "drawing")) foreach(mapcar shape m1 dbCopyFig(shape cv)) dbClose(newcv) ) ;; ensuite on efface toures les instances ;;foreach(d_inst d_cv~>instances