CAD left-hand button written in LSP

Thread Content

Great stuff; I hope everyone doesn’t miss it. ; Command compression format ; (defun c:abbreviation () (command “Command” “Options in command line” “Options in command line” “Options in command line” „“)) ; Example: Use the sw key as a substitute for the command to switch to the southwest view. The program is ; (defun c:sw () (command “-view” “swiso”)). ; Use the qc1 shortcut key to change a line to one with color 8, a dash-dotted line style, and a line width of 1000. The program is ; (defun c:qc1 () (command “change” (ssget) „“ “p” “ltype” “center” “c” “10” “lts” “1000” „“)). ; Command combination format ; (defun c:abbreviation () (command “Command 1” “Options in command line” pause pause “Command 2” “Options in command line” „“)). ; Example 4: Use the a4 shortcut key to draw a quadrilateral and fill it in. The program is ; (defun c:a4 () (command “polygon” “4” “e” pause pause “hatch” “s” “l” „“)). ; D. Syntax explanation: ; defun indicates defining a function. ; c: means the command is independent of the hard drive. ; ssget pauses, waiting for the user to make a selection before proceeding with further actions. It’s equivalent to using the right-click button. ; pause pauses, waiting for the user to specify a point before carrying out subsequent actions. ; „“ is used to end the selection process