为ACAD建立缩写命令和自动执行批命令
(defun c:pl()
(command "pline")
)
(defun c:f()
(command "fillet")
)
(defun s::startup()
(command "script" "set")
)
于是，“pline”命令就可只输入"pl","fillet"命令就可只输入“f”，而且ACAD启动时会自动寻找set.scr文件并执行它。这样，绝大多数ACAD命令均能用一个或两个字符输入，其速度超过菜单输入。"set"可以改为任意文件名，放进一些需要的功能，如zoom e ,插入块等。
(云南 马鸿)