求帮忙写个最最简单的LiSp程序

暖暖阳光

达到要求就是:    在AutoCAD的命令行中输入aa,则若图形中存在h2层,把它冻洁.

在autocad的命令行中输入bb,则若图形中存在h2层,把它解冻.

coolpoom

2. (defun c:aa()
3.   (command "layer" "F" "h2" ""))
4. (defun c:bb()
5.   (command "layer" "T" "h2" ""))

(defun c:aa()   (command "layer" "F" "h2" "")) (defun c:bb()   (command "layer" "T" "h2" ""))

王咣生

判断图层是否存在:
(if (tblsearch "layer" "h2")
  (alert "t")
  (alert "f")
)

暖暖阳光

感谢coolpoom

感谢王咣生

谢谢你们的帮助