Lisp to unlock all layers?

[Anonymous]

Hi,

I need a lisp routine to unlock all layers, I am running Acad 2Ki on win 2k,
Your help would be much appreciated

Pete

[Anonymous]

no lisp required.
Just add a button to your menu:
[Unlock]^C^C-layer;unlock;*;;

or from the commmand line:
-layer
u
*

but if you really want a lisp:
(defun c:UL ()
(command "-layer" "unlock" "*" "")
(princ)
)


"Pete Dibbs" wrote in message news:9A8E7BE8368DDED191799E11FEDABA42@in.WebX.maYIadrTaRb...
> Hi,
>
> I need a lisp routine to unlock all layers, I am running Acad 2Ki on win 2k,
> Your help would be much appreciated
>
> Pete
>
>

[Anonymous]

Doug,
Many many thanks, you make it seem all to easy,
Pete

"Doug Barr" wrote in message
news:6A6C56987B1A3ABCF2BA452AFB10DA8A@in.WebX.maYIadrTaRb...
> no lisp required.
> Just add a button to your menu:
> [Unlock]^C^C-layer;unlock;*;;
>
> or from the commmand line:
> -layer
> u
> *
>
> but if you really want a lisp:
> (defun c:UL ()
> (command "-layer" "unlock" "*" "")
> (princ)
> )
>
>
> "Pete Dibbs" wrote in message
news:9A8E7BE8368DDED191799E11FEDABA42@in.WebX.maYIadrTaRb...
> > Hi,
> >
> > I need a lisp routine to unlock all layers, I am running Acad 2Ki on win
2k,
> > Your help would be much appreciated
> >
> > Pete
> >
> >
>
>

[noeljar13]

fINALLY ONE THAT SOLVES MY NEEDS!

Also inverted it to lock all layers.

THANKS!!!