Pierre Marcotte
Usenet Archive
- Joined
- Jul 21, 2003
- Messages
- 7
- Reaction score
- 0
Hi y'alls...
I wrote this simple thing (see below) in order to automate the locking of all viewports in a drawing. I now need to be able to toggle them on and off with the same button. Is there a lisp way to check if a viewport is locked or not ? I looked in the DXF reference but found nothing suitable.
Thanx a bunch
Pierre
(DEFUN c:mvlock (/ mvss)
(setvar "cmdecho" 0)
;; Gets all VIEWPORT entities
(SETQ mvss (SSGET "X" '((0 . "VIEWPORT"))))
;; Locks them
(COMMAND "_.vports" "L" "ON" mvss "")
(PRINC)
) ;_ end DEFUN
I wrote this simple thing (see below) in order to automate the locking of all viewports in a drawing. I now need to be able to toggle them on and off with the same button. Is there a lisp way to check if a viewport is locked or not ? I looked in the DXF reference but found nothing suitable.
Thanx a bunch
Pierre
(DEFUN c:mvlock (/ mvss)
(setvar "cmdecho" 0)
;; Gets all VIEWPORT entities
(SETQ mvss (SSGET "X" '((0 . "VIEWPORT"))))
;; Locks them
(COMMAND "_.vports" "L" "ON" mvss "")
(PRINC)
) ;_ end DEFUN
