unlock all layers

[Jessica28]

I've asked this question before and have read through posts about Unlocking all layers....ReMark mentioned in one of the posts to create a button for -layer;u;**; which are the steps to unlock all layers...I did this and its great. Thanks. But is there a way to make a keyboard command of it? id much rather hit like "ua" for unlock all and just hit enter....Thanks

[ReMark]

Possibly edit the shortcut keys in your CUI? Just a guess on my part.

[BlackBox]

I would define a simple LISP Command instead (being the geek that I am):

 

(defun c:UA () (c:UnlockAll))
(defun c:UnlockAll (/ *error* oldCmdecho)
 (princ "\rUNLOCKALL ")

 (defun *error* (msg)
    (and oldCmdecho (setvar 'cmdecho oldCmdecho))
    (cond ((not msg))                                                  ; Normal exit
          ((member msg '("Function cancelled" "quit / exit abort")))   ; <esc> or (quit)
          ((princ (strcat "\n** Error: " msg " ** ")))                 ; Fatal error, display it
    )
    (princ)
  )
 
 (setq oldCmdecho (getvar 'cmdecho))
 (setvar 'cmdecho 0)
 (command "._-layer" "unlock" "*" "")
 (*error* nil)
)

... Which can also be mapped to the CUI(x) components; instead of the macro above, simply use something like:

 

^C^C^PUnlockAll ^P

... Where the LISP above can be loaded via .mnl file. If demand loading is an issue of concern, then simply incorporate an IF Statement in the macro.

[Jessica28]

Thats great! thanks!

[BlackBox]

Thats great! thanks!

 

... Happy to help.