need some lisp/script help

[Anonymous]

I am in the process of re-doing my menu. I used to have a script or lisp
that would lock or unlock all viewports when I typed vpu for viewport
unlock, and vpl for viewport lock. Can someone tell me how to re-program
this? Not sure what to do.

MKH

[wundrlik]

(DEFUN C:VPL () (COMMAND ".vports" "lock" "on" "ALL" ""))

(DEFUN C:VPU () (COMMAND ".vports" "lock" "off" "ALL" ""))

There's the code I use in my user.lsp that I load with my autocad session. That should work for you.

Ryan A Wunderlich