Tool Palette Commands with Custom MText Lisp

[JoeyNine]

The Tool Command must be changing the layer before the Lisp executes. It still does not change the layer back.

[BIG-AL]

You need to post exactly what it is your using Tom is right in that the suggested code resets the layer back to what it was before adding the mtext.

[JoeyNine]

This is what I have in the lisp:

; Mtext at Viewtwist rotation
(defun mtr (curlayer / clayer)
  (setq clayer(getvar'clayer))
  (setvar 'clayer curlayer)
  (setq twang (-(/ (* (GETVAR "viewtwist") 180.0) PI))
  )
  (initdia)
  (command "mtext" PAUSE "R" twang "J" "TC")
  (setvar 'clayer clayer)
)

This is what I have in the Tool Command

^c^c^p(mtr "V-SITE-DECK-TEXT")

Using these commands I always end up on layer V-SITE-DECK-TEXT.