切换层

takeanosan · 发表于 2022-7-5 23:15:46

拖放到AutoCAD中。
在你的问题之后也尝试了appload。

takeanosan · 发表于 2022-7-5 23:19:10

我很确定我加载正确。

登录/注册后可看大图

Tharwat · 发表于 2022-7-5 23:22:39

正确的方法之一如下：
将代码保存为您想要的任何名称，但最好使用与lisp命令相同的名称和扩展名进行保存。lsp
然后从autocad调用命令appload以加载lisp文件，然后从提示的对话框中加载，然后将其关闭。
最后键入on-off调用lisp函数。

注意：你应该有以h开头的层，正如你在第一篇文章中要求的那样。

现在让我来。

Tharwat · 发表于 2022-7-5 23:26:12

你确定你在那张图上有前面提到的图层吗？
如果可以，请上载样例图形。

pBe · 发表于 2022-7-5 23:27:53

也许就这么简单

copy

(defun c:test nil
 (if (zerop
(setvar        "useri1"
        (Boole 6 (getvar "useri1") 1)
)
     )
   (command "_.-layer" "off" "H-*" "")
   (command "_.-layer" "on" "H-*" "")
 )
)