[求助]：求助！我要用通过autolisp读进大量的数据，把这些数据连成一条曲线。为什么这

winggun

(setq f(open"c:\\qq.txt" "r"))
(setq a(read-line f))
(setq b(read-line f))
(setq c(read-line f))
(setq d(read-line f))
(setq e'(a b))
(setq g'(c d))
(command "line" e f "")
应该怎么样啊？

舟自横

(setq f(open"c:\\qq.txt" "r"))
(setq a(ATOF(read-line f)))
(setq b(ATOF(read-line f)))
(setq c(ATOF(read-line f)))
(setq d(ATOF(read-line f)))
(close f)
(setq e (list a b))
(setq g (list c d))
(command "line" e g "");;;注意你的是F错!!
读取文件是读到的会是字符串而不是数字一定要转化
;;;想建议你不要把点的坐标拆开读取,
你写入坐标的时候养成将整个坐标一起写入文件的习惯
"(1.2 2.0 3.3)"读取时(setq d (READ(read-line f)))就可以直接得到坐标了