TheSwamp

CAD Forums => CAD General => Topic started by: Mark on September 18, 2014, 02:05:02 PM

Title: Destroy ViewCube / NAVVCUBE
Post by: Mark on September 18, 2014, 02:05:02 PM
Is there some way to get rid of the NAVVCUBE? I know you can set NAVVCUBEDISPLAY to 0 but it seems to be a per-drawing setting even though they say its a 'system variable' .

thanks
Title: Re: Destroy ViewCube / NAVVCUBE
Post by: mjfarrell on September 18, 2014, 02:15:35 PM
could you not shut it off in your startup doc?
Title: Re: Destroy ViewCube / NAVVCUBE
Post by: mjfarrell on September 18, 2014, 02:51:25 PM
Mark, a quick check reveals SOME of the NAVVCUBE is controlled by registry.
It's ON/OFF status, is a drawing variable.  One should be able to turn it off in the default DWG template.
Title: Re: Destroy ViewCube / NAVVCUBE
Post by: RC on September 18, 2014, 02:54:25 PM
Some 'system' variables are saved in the registry, some are saved in the drawing and some are not saved at all.

NAVVCUBEDISPLAY is not only saved in the drawing but it is also viewport specific and can be on or off in different viewports.

an inelegant toggle (can be assigned to a function button):
Code: [Select]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defun c:nvc ()
(runsilent)
(command ".undo" "begin")
  (if (> (getvar "navvcubedisplay") 0)
(command "navvcubedisplay" "0" "navbardisplay" "0")
(command "navvcubedisplay" "3" "navbardisplay" "1")
   )
(command ".undo" "end")
(unrunsilent)
)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Title: Re: Destroy ViewCube / NAVVCUBE
Post by: Mark on September 18, 2014, 02:55:01 PM
One should be able to turn it off in the default DWG template.
Thank you!! I did not think about turning it off in my template.
Title: Re: Destroy ViewCube / NAVVCUBE
Post by: tombu on October 03, 2014, 11:02:04 AM
Clip from my acaddoc.lsp file pieced together from other posts:
Code: [Select]
(if (not *LayoutUCSIcon*)
  (setq *LayoutUCSIcon*
         (VLR-Miscellaneous-Reactor nil '((:VLR-layoutSwitched . LayoutUCSIcon)))
  )
)
(defun LayoutUCSIcon (a b)
  (setvar 'UCSICON 0)
  (if (and(/= (getvar 'navvcubedisplay) 1)(/=(getvar 'cvport)1))(setvar 'navvcubedisplay 1))
)

(vlr-command-reactor "Turn Off Navvcubedisplay" '((:vlr-commandEnded . endCommand)))

(defun endCommand (calling-reactor endcommandInfo / thecommandend)
        (setq thecommandend (nth 0 endcommandInfo))
        (cond
                ((= thecommandend "MSPACE") (setvar 'navvcubedisplay 1))
                ((= thecommandend "TILEMODE") (if (= 1 (getvar 'tilemode))(setvar 'navvcubedisplay 1)))
        );end cond
);end defun
Things I don't care to see. 

Of course making sure template settings and styles are exactly how you want them is the biggest timesaver in CAD.