home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
games
/
misc_lsp.zip
/
ONEKEY.LSP
< prev
next >
Wrap
Text File
|
1987-11-03
|
2KB
|
151 lines
;These functions allow commonly
;used commands to be executed with a
;single key stroke.
;
;Function file "KEY.LSP" - Execution command as shown
;
;Written by Christopher Conrad and Steve Brown
;
;
(defun C:L ()
(command "line"))
(defun C:T ()
(command "text"))
(defun C:CI ()
(command "circle"))
(defun C:E ()
(command "erase"))
(defun C:EE ()
(command "extend"))
(defun C:TT ()
(command "trim"))
(defun C:B ()
(command "break"))
(defun C:RO ()
(command "rotate"))
(defun C:S ()
(command "stretch"))
(defun C:SC ()
(command "scale"))
(defun C:C ()
(command "copy"))
(defun C:M ()
(command "move"))
(defun C:O ()
(command "offset"))
(defun C:CC ()
(command "change"))
(defun C:PT ()
(command "point"))
(defun C:F ()
(command "fillet"))
(defun C:A ()
(command "array"))
(defun C:W ()
(command "zoom" "w"))
(defun C:PP ()
(command "pan"))
(defun C:P ()
(command "zoom" "p"))
(defun C:U ()
(command "undo" "1"))
(defun C:R ()
(command "redraw"))
(defun C:RR ()
(command "regen"))
(defun C:MM ()
(command "mirror"))
(defun C:D ()
(command "dist"))
(defun C:I ()
(command "insert"))
(defun C:LL ()
(command "list"))
(defun C:DL ()
(command "dim" "leader"))
(defun C:DV ()
(command "dim" "ver"))
(defun C:DH ()
(command "dim" "hor"))
(defun C:LS ()
(command "layer" "s"))
(defun C:LF ()
(command "layer" "f"))
(defun C:LT ()
(command "layer" "t"))
(defun C:3F ()
(COMMAND "3DFACE"))
(defun C:3L ()
(command "3DLINE"))
(defun C:OI ()
(command "OSNAP" "INT"))
(defun C:OO ()
(command "OSNAP" "OFF"))
(defun C:AX ()
(command "VPOINT" ))
(defun C:PL ()
(command "PLINE" ))
(defun C:PED ()
(command "PEDIT" ))
(defun C:V1 ()
(COMMAND "VIEW" "R" "1"))
(defun C:V2 ()
(COMMAND "VIEW" "R" "2"))
(defun C:V3 ()
(COMMAND "VIEW" "R" "3"))
(defun C:V4 ()
(COMMAND "VIEW" "R" "4"))
(defun C:ZE ()
(COMMAND "ZOOM" "E"))
(defun C:EX ()
(COMMAND "EXPLODE"))
(defun C:PO ()
(COMMAND "POINT"))