2013

This menu item uses the AutoLISP expression:
^C^C^P(if (= (getvar "cvport") 1)(command "mspace")+
(command "pspace"))(princ) ^P
Both menu items provide a way to switch between paper space and model
space (if TILEMODE is set to 0), but the DIESEL expression is shorter and is
evaluated transparently, not requiring the call to the AutoLISP princ function.
If the special character ^P (which switches MENUECHO on and off) is omitted
in both cases, the DIESEL expression displays only the issued command,
whereas the AutoLISP expression displays the entire line of code.
Because the value returned by a DIESEL expression is a text string, it can be
used in response to an AutoLISP getxxx function call. This functionality enables
menu items to evaluate current drawing conditions and to return a value to
an AutoLISP routine.
The next example is based on these assumptions:
 The AutoLISP routine is loaded into memory.
 The CUIx excerpt is included in the current customization file.
 The symbols to insert are one unit high by one unit wide.
 The DIMSCALE variable is set to the drawing's scale factor (that is, a drawing
to be plotted at a scale of 1" = 10' would have a scale factor of 120, or a
1/4" = 1' scale drawing would have a scale factor of 48).
If you load and execute the sample AutoLISP routine, AutoCAD inserts the
symbol at the size and location you have specified. When plotted, the symbols
are the specified size (if the drawing is plotted at the same scale as that specified
by DIMSCALE).
The following is a sample AutoLISP routine.
(defun C:SYMIN ( )
(setq sym
(getstring
"\nEnter symbol name: ") ; Prompts for a symbol name
)
; Display the custom toolbar named Symsize
(command "._-toolbar" "SymSize" "_show")
(setq
siz (getreal
"\nSelect symbol size: ") ; Prompts for a symbol
size
p1 (getpoint
"\nInsertion point: ") ; Prompts for insertion
64 | Chapter 5 DIESEL