Post Last Edit by gteng5876 at 2012-9-8 16:15

What's wrong with this routine applied to ZWCAD 2012 +?


(if (null (tblsearch "LAYER" (getvar "USERS3")))
(entmake
(list
(cons 0 "LAYER")
(cons 2 (getvar "USERS3"))
(cons 70 0)
(cons 62 7)
(cons 6 "Continuous")
)
)
)


Thanks.

Corrected code:

(if (null (tblsearch "LAYER" (getvar "USERS3")))
(entmake
(list
(cons 0 "LAYER")
(cons 100 "AcDbSymbolTableRecord")
(cons 100 "AcDbLayerTableRecord")
(cons 2 (getvar "USERS3"))
(cons 70 0)
(cons 62 7)
(cons 6 "Continuous")
)
)
)

You can discover necessary DXF groups by reading existing layers.
For example:
(entget (tblobjname "LAYER" "0"))

Thank you, it worked well.