AutoLISP 写文件程序失灵（附源代码）

newer

moleusher 发表于 2013-5-24 23:21
请教Free-Lancer，你所说的这4个习惯问题有具体的例子吗?
我这样理解是不是对：
1、变量管理：如申明局 ...

我说一个吧，过滤管理，就是利用ACAD的FILTER，过滤掉你不需要处理的实体，否则你的程序里面还要判断，处理选择集的实体多，程序效率也要慢。

比如你就想处理文字实体，那么：
[pcode=lisp,true]
(if (setq ss (ssget '((0 . "TEXT"))))
   (progn
       ....
   )
)
[/pcode]

在进一步，你就想处理 ABC 层上 红色的文字
那么：
[pcode=lisp,true]
(if (setq ss (ssget '((0 . "TEXT")(8 . "ABC")(62 . 1)))))
   (progn
      ....
   )
)
[/pcode]

moleusher

newer 发表于 2013-5-24 23:40
我说一个吧，过滤管理，就是利用ACAD的FILTER，过滤掉你不需要处理的实体，否则你的程序里面还要判断，处 ...

感谢newer，讲解很清楚，这么看起来过滤有点类似于ACAD中的快速选择了。它的语法是不是就是利用'()有条件的选择要过滤的实体是吧？

Free-Lancer

moleusher 发表于 2013-5-24 23:21
请教Free-Lancer，你所说的这4个习惯问题有具体的例子吗?
我这样理解是不是对：
1、变量管理：如申明局 ...

1 理解正确
2 错误处理是一个复杂的事情，包括：交互时断ESC、空输入、运行中的ESC，程序中断后Lisp会在中断语句处终止，以后的语句将不会执行，可能带来的问题包括：程序运行前或中间对系统变量的修改无法恢复、产生程序运行时生成的垃圾实体等等，这就需要一个错误处理函数，清理中断程序运行时的各种残留。
针对这个程序，主体就是写出文件，这个过程可能很快（量不大的时候）用户可能都没有机会中断，所以在前面把有可能中断的地方用 and ，这样 and 语句内程序中断了也不会产生程序垃圾。

moleusher

Free-Lancer 发表于 2013-5-25 01:05
1 理解正确
2 错误处理是一个复杂的事情，包括：交互时断ESC、空输入、运行中的ESC，程序中断后Lisp会在 ...

:D十分感谢Free-Lancer的讲解。