Autolisp与宗地属性调用-Autolisp学习举例

1、简要画一个宗地，并为它赋值一些属性。如下图。

2、一般在命令行中输入(setq a (entsel))，回车选择宗地线后如图。

4、名行中输入（setq d (entget b))回车后得到如图，并没有宗地的一些属性代码。

6、如下图可知选中部分是一体的，选出来可以这样(setq e (assoc -3 c))

7、现在调用内部的某一项如TUFU。先（setq f (cdr e)),这样去除了前边的-3

9、输入(cdr (assoc 1000 (cdr g)))如图

11、现在举例更新变量g,输入(subst (cons 1000 "1.00-5.00" ) (assoc 1000 (cdr g)) g)，如下图。注意这里并没有趑虎钾缫更新宗地的属性只是g的值变化了。