暖暖阳光 发表于 2009-2-8 18:49:00

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

<p>达到要求就是:&nbsp;&nbsp;&nbsp; 在autocad的命令行中输入aa,则若图形中存在h2层,把它冻洁.</p><p>在autocad的命令行中输入bb,则若图形中存在h2层,把它解冻.</p><p></p><p></p>

coolpoom 发表于 2009-2-8 19:26:00

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

王咣生 发表于 2009-2-8 19:31:00

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

暖暖阳光 发表于 2009-2-8 21:06:00

<p>感谢<strong><font face="Verdana" color="#61b713">coolpoom</font></strong></p><p><strong><font face="Verdana" color="#61b713">感谢<font color="#da2549">王咣生</font></font></strong></p><p><strong><font face="Verdana" color="#da2549">谢谢你们的帮助</font></strong></p>
页: [1]
查看完整版本: 求帮忙写个最最简单的LiSp程序