creating dxf file from selected layers

[mpozauko]

hey

can someone please help me out with my issue?
i have to create dxf file (in R12 version) from selected layers.
at the moment i am using this lsp routine ( bellow ), which is very basic and it only creates block file from which i then create dxf.
now i want a lsp to create dxf directly and it saves file on desktop.
hope i was clear enough.

(defun c:linije ()
(command "LAYER" "SET" "AA_CEV" "")
(command "layer" "freeze" "*" "")
(command "layer" "thaw" "AA_PRIMAR_COAX_ZEM" "")
(command "layer" "thaw" "AA_PRIMAR_COAX_ZRAK" "")
(command "layer" "thaw" "AA_SEK_COAX_ZEM" "")
(command "layer" "thaw" "AA_SEK_COAX_ZRAK" "")
(command "wblock" "linije_tel" "" "0,0" "all" "")
)

[lpseifert]

Once you isolate your layers you could use something similar to this

(setq ss (ssget))
(command "dxfout" "" "o" ss "" "v" "R12" "" )

If you want to select everything on the layers prefixed with AA_ , this might be easier... you don't need to isolate the layers first

(setq ss (ssget "X" '((8 . "AA_*"))))
(command "dxfout" "" "o" ss "" "v" "R12" "" )

[mpozauko]

thanks ipseifert, you just made it easier for me.

[mpozauko]

one quick question. can i assign exactly those objects on layers listed above to ss? im having problems doing that.

[mpozauko]

yes, this is it. i have multiple AA_ layers and i need just those listed above.
thanks again.

[lpseifert]

If I understand your question...
This should make a selection set of all the entities on the 4 layers you have listed above

(setq ss (ssget "X" '((8 . "AA_PRIMAR_COAX_ZEM,AA_PRIMAR_COAX_ZRAK,AA_SEK_COAX_ZEM,AA_SEK_COAX_ZRAK"))))

<note>this is in response to post #4... original was deleted