au-s 发表于 2022-7-6 17:08:14

简单lisp

你好
 
我是lisp新手,正在尝试制作一个可以在某些外部参照层上使用Frezz nd更改颜色的lisp。
 
这是代码,当然不起作用。。。我错过什么了吗?
(defun c:kflager ()
(setq xref_klager (*|K*))
(setq xref_fklager (4K*|K005,4K*|K301-0))
(command ".layer" "C" 151 "xref_klager" "" "")
(command ".layer" "F" "xref_fklager" "" "")
(princ)
)
(princ)
 
Thanx提前!
顺致敬意,
/艺术:)

lpseifert 发表于 2022-7-6 17:33:40

你不能像你尝试的那样对图层进行变量化
试试这个

(defun c:kflager ()
(command ".layer" "c" "151" "*|K*" "")
(command ".layer" "f" "4k*|K005,4K*|K301-0" "")
(princ)
)

au-s 发表于 2022-7-6 17:58:16

好的thanx。。。
如果我没记错的话,我想我几个月前用setq做到了。。。如果我找到了,我会把它贴在这里。。
Thanx公司

CAB 发表于 2022-7-6 18:09:16

你很接近。
(defun c:kflager (/ xref_klager xref_fklager)
(setq xref_klager "*|K*")
(setq xref_fklager "4K*|K005,4K*|K301-0")
(command ".layer" "C" 151 xref_klager "" "")
(command ".layer" "F" xref_fklager "" "")
(princ)
)
(princ)
页: [1]
查看完整版本: 简单lisp