Get me started

[psilzle]

I am new to lisp and was trying to write a program to check and see if
a layer "interior_loops" exists and if it does move everything on that
layer to layer 0. I need to do this for a few different layers. What
I have tried so far, tries to move the entities even if the layer does
not exist. Of course, that crashes the progam.

Any help is appriciated...

Thank you,

Paul Silzle

[Ben Gun]

please post what you have got so far.
ben

On 18 Oct 2005 05:04:12 -0700, "psilzle" <psilzle@bbei.com> wrote:

I am new to lisp and was trying to write a program to check and see if
a layer "interior_loops" exists and if it does move everything on that
layer to layer 0. I need to do this for a few different layers. What
I have tried so far, tries to move the entities even if the layer does
not exist. Of course, that crashes the progam.

Any help is appriciated...

Thank you,

Paul Silzle

[psilzle]

I was able to achive what I wanted a different way. I just froze the
layers I didn't want changed and then changed all the remaining
entities to layer 0 and then thawed the layers that were frozen.

Thanks for checking...

Paul

[CarlB]

If you want to save a few steps...

(if (tblsearch "layer" "interior_loops")
(command "change" (ssget "x" '((8 . "interior_loops"))) "" " "la" "newlayername" "")
)