LISP needed to delete OFF layers (with or without content on those layers)

[k005]

Hi All;

How can I delete closed OFF layers?

***POST TITLE AND BODY EDITED FOR CLARITY***

[rkmcswain]

What do you mean by closed layers? Do you mean empty layers?

Use the PURGE command.

If the layer is not empty, then use the LAYMRG command to merge all objects on that layer to some other existing layer.

[k005]

No, it's not empty. It's just off. There is no merging.

I want to delete the closed ones.

[pbejse]

---

@k005 wrote:

Hi All;

How can I delete closed layers?

---

Not sure what that is? Unused layers? Closed polylines on a specific layer? Layers that are currently off/Frozen?

How did the barber win the race?

[rkmcswain]

@k005 wrote:

No, it's not empty. It's just off. There is no merging.

I want to delete the closed ones.

It depends.

Typically, you can't delete layers with object on them, but the LAYDEL command can do it.

Another alternative, lets say you have 200 layers, and you want to get rid of 193 of them. It might be easier in this case to (again, presuming the 193 layers are OFF) - use the WBLOCK command to WBLOCK out the visible objects on the 7 remaining layers to a new DWG file. Then open that new DWG file. Boom. Done.

[rkmcswain]

Oh, few, if anyone here is going to know that "empty" means "off".

"Off" or "Frozen" are the correct terms in the Autodesk world.

[rkmcswain]

Whoa @pendean - when did you get these super powers ?!?

[k005]

@pbejse 

I turned the layers off.

Here is a situation. This dwg file is a block. Therefore, if I delete the closed layers, when I call the blog to another place, unnecessary layers do not appear.

[k005]

Yes . It can be this way. But I want to solve this in one go... if possible.

[pbejse]

---

@k005 wrote:

I turned the layers off.

Here is a situation. This dwg file is a block. Therefore, if I delete the closed layers, when I call the blog to another place, unnecessary layers do not appear.

---

Not sure i understand that @k005. The layers that are off is part of the block, you export the block [ with objects on the off layer ] to another file or drawing but only those are shown on screen? meaning delete the objects on "off"  layers from that block?

[Kent1Cooper · Accepted solution]

---

@k005 wrote:

....

How can I delete closed OFF layers?

....

---

(defun C:LAYOFFDEL (/ lay lname)
  (while (setq lay (tblnext "layer" (not lay)))
    (if
      (and
        (not (wcmatch (setq lname (cdr (assoc 2 lay))) "0,Defpoints"))
        (minusp (cdr (assoc 62 lay))); turned off
      ); and
      (command "_.laydel" "_name" lname "" "_yes")
    ); if
  ); while
  (princ)
); defun

[Kent1Cooper]

---

@Kent1Cooper wrote:

....

....
        (minusp (cdr (assoc 62 lay))); turned off
....

---

That will delete only Layers that are turned off.  If you want to do the same with Layers that are on but frozen, that can also be done.

[k005]

my friend ; The scenario is as follows;

I create a part of the dwg file as a Block,, I get...

I open and edit this created file. Without changing the reference point.

edit ; I turn off unnecessary layers. Therefore, it is necessary to delete the closed ones. Because it's not necessary. If I don't delete it, the dwg I call also creates a problem.

[k005]

@Kent1Cooper 

Yes. That's exactly it.

Thank you very much. OK.