Desire a single message on command line with my macro
You can build in a setting of either the MENUECHO or NOMUTT System Variable, and resetting when past the parts you don't want to show. But the command line will still show the first setting of MENUECHO/NOMUTT, which won't be suppressed. [Putting ^P at the front is also >supposed to< suppress such things, but in quick testing seems to suppress only parts.]
@mikeshick wrote:
It's in a custom toolbar button.
[I think they were asking to see the contents of the macro.]
If you use (prompt) instead of (princ), it at least doesn't both put it in and return it [showing twice in the command line], but the empty (princ) function doesn't seem to suppress the nil following. But it works for me to define a command that can work as expected in that way:
(defun C:OSZT () ; = OSnapZ Toggle
(setvar 'osnapz (- 1 (getvar 'osnapz)))
(prompt (strcat "SNAP set to " (if (= (getvar 'osnapz) 1) "0" "3D") " ELEVATION."))
(prin1)
)
and with that always loaded such as via acaddoc.lsp, put just this into the macro:
^POSZT
First, select that code defining the OZST command, Ctrl+C copy it to the clipboard, and in a drawing, pick in the command line and Ctrl+V paste the code in. [Hit Enter if it ends up waiting at the last closing right parenthesis.] It should then show:
C:OSZT
to indicate that the command has been defined.
Put only ^POSZT in as the contents of the macro in your Tool Palette button, to fire that command [the ^P makes the entered command name not appear at the command line, but the command itself returns the prompt]. Then pick on that button a few times -- does it go back and forth notifying about the 0 and 3D elevation setting? It should do the same if you type in the command name OSZT.
If that works, I can describe how to have it loaded in all drawings.
