2013-05-03 明经 AutoLISP 编程②群(177027547) 群聊记录：检讨书:我是一名刚到纪...

明经快报

[woshilxh]爱摄影 23:31:29

（open）

[woshilxh]爱摄影 23:38:24

(defun c:readandwrite()
(open afile   "r")
(while (/= achar nil)
(setq achar (read-line))
(open bfile    "w")
(write-line achar bfile)
)
(close ahar)
(close bfile)
)

大概是这样，你把语法完整一下就行了。

另外有个问题，大家帮忙核实一下：
(if (and 多个判断条件)
)

多个判断条件是不是有数量限制？我执行4个还是5个条件就可以，再多就参数类型错误了，是这样么？