topic Possible to write a lisp for layer on whole viewports. in Visual LISP, AutoLISP and General Customization Forum

Possible to write a lisp for layer on whole viewports.

smallƑish — Fri, 10 Mar 2023 05:03:06 GMT

In my drawing have 20+ layouts each has multiple viewports. All viewports layer properties are different...Instead of selecting each model space of each viewports, selecting all layers, making all layer on, non freeze, enable print etc...... Can we do it with any lisp.?

Re: Possible to write a lisp for layer on whole viewports.

paullimapa — Fri, 10 Mar 2023 06:56:23 GMT

What you are referring to has nothing to do with Pspace Vports.

Layers turned off/frozen/noplot can be turned on/thawed/plot once by using this sequence of commands regardless of Model or Layout:

(command"_.Layer""_T""*""_On""*""_P""_P""*""")

Re: Possible to write a lisp for layer on whole viewports.

komondormrex — Fri, 10 Mar 2023 09:28:14 GMT

you are wrong. paperspace viewports have independent layers settings, which may differ from those of modelspace.

Re: Possible to write a lisp for layer on whole viewports.

paullimapa — Fri, 10 Mar 2023 11:34:15 GMT

Papace Vports do have layer settings. But the only setting that comes close to what your OP described is called freeze/thaw but not on/off or plot enabled or disabled.
https://knowledge.autodesk.com/support/autocad/learn-explore/caas/CloudHelp/cloudhelp/2020/ENU/AutoCAD-Core/files/GUID-EB4DA3DA-5466-4D48-9AEC-6828B82BDEF9-htm.html

Re: Possible to write a lisp for layer on whole viewports.

paullimapa — Fri, 10 Mar 2023 11:42:59 GMT

FYI: Here’s a code to vplayer thaw all layers in all layouts written over a decade ago:

https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/lisp-file-to-thaw-all-layers-frozen-in-the-viewport/td-p/3797286

Re: Possible to write a lisp for layer on whole viewports.

komondormrex — Fri, 10 Mar 2023 11:43:06 GMT

Re: Possible to write a lisp for layer on whole viewports.

paullimapa — Fri, 10 Mar 2023 12:11:35 GMT

\Now those are the correct terminology.

These can all be done by slightly modifying the code I posted earlier like this:

(setq clayout (getvar 'ctab)) (foreach layout (layoutlist) (setvar 'ctab layout) ; (command "_.vplayer" "_thaw" "*" "_all" "") (command "_.vplayer" "_M" "_A" "*" "_all" "") ) (setvar 'ctab clayout)

Also, read up on VPLAYEROVERRIDESMODE setting:

Without A Net: Reset Layer Viewport Overrides from VPLAYER (typepad.com)

Re: Possible to write a lisp for layer on whole viewports.

smallƑish — Tue, 14 Mar 2023 09:59:50 GMT

frozen layers are still as it is in layout 1 . I don't know what's wrong

Re: Possible to write a lisp for layer on whole viewports.

paullimapa — Tue, 14 Mar 2023 10:21:58 GMT

Post your dwg here so I can take a look

Re: Possible to write a lisp for layer on whole viewports.

smallƑish — Tue, 14 Mar 2023 10:54:01 GMT

In the dwg file, there are 9 layouts. each even number layouts Layer VP-SET will be disabled for plotting,

either layer is freeze, off, print disable, etc.

I have made this for your easy understanding.

please try your code.

Re: Possible to write a lisp for layer on whole viewports.

paullimapa — Tue, 14 Mar 2023 11:43:40 GMT

apparently the override setting applies to all the VP Columns except for VP Freeze column

so I've modified the code and called it VPO...give this a try:

(defun c:vpo (/ clayout) (setq clayout (getvar 'ctab)) (foreach layout (layoutlist) (setvar 'ctab layout) ; (command "_.vplayer" "_M" "_A" "*" "_all" "") (command "_.vplayer" "_T" "*" "_all" "_M" "_A" "*" "_all" "") ) (setvar 'ctab clayout)(princ) ) ; defun