请教一个图层问题

4505573

我是刚开始学习LISP的，现在想实现一个关于图层开闭的功能，大概是这样的：

图形中有BM1,BM2,BM3,BM4……，现在想要判断BM1层是on还是off的状态，if是on，就将这些所有BM开头的图层全部关闭，if是off，就将这些所有BM开头的图层全部打开。

 

这个功能的lisp应该怎么弄啊，我不知道怎么样才能获取到图层是否为开闭的状态，请教下大家，谢谢！

Andyhon

现成的

http://forums.augi.com/showthread.php?t=8848

 

lenlenq

 是不是这样
(defun c:ll (/ tbl f)
  (if (setq tbl (tblsearch "layer" "BM1"))
    (progn
      (setq f (cdr (assoc 62 tbl)))
      (if (> f 0)
    (command "layer" "off" "BM*" "y" "")
    (command "layer" "on" "BM*" "")
      )
    )
  )
  (princ)
)

xhq1954425

学习楼上的方法，不错！