这几天闲了下来，对AutoCAD研究了一 番，发现状态行也可以自定义，用modemacro命令与DIESEL语言相结合便可以做到，DIESEL是 Direct Interpretively Evaluated String Expression Language的缩写，它是一种宏语言，可以 用来修改状态行，也可以在菜单中应用，在某种程度上可以取代AutoLISP。在命令行上输入modemacro,再输入$(getvar, clayer)，当前图层名就显示在状态行左侧上了，同样输入 $(getvar, textstyle) ，便会显示当前的文本样式。如果你只想显示一 些文字，如“你好！”也可。 

这种设置的不足之处在于不能自动保存，你可以在acad.lsp文件中加入如下S::STARTUP函数，AutoCAD就会自动执行这些命令了。 

(defun-q S::STARTUP ( ) 

(command "modemacro" "$(getvar,clayer)") 

) 

因为有可能已在多个文件里定义了S::STARTUP函数，这样就会发生冲突，而在acad.lsp文件中加入如下语句便会避免这种情况： 

(defun-q MYSTARTUP ( ) 

(command "modemacro" "$(getvar,clayer)") 

) 

(setq S::STARTUP (append S::STARTUP MYSTARTUP)) 

是不是有点意思？AutoCAD真是博大精深，只要钻进去便会觉得其乐无穷。