read-line问题！

onandon

用read-line读取外部数据文件.dat: (defun c:zhoupan()
;;; (setq name (getstring "\n Name of data file to input:"))
(setq f (open "C:\vba\zhoupan\zhou2.dat" "r"))
(setq ff (read (read-line f)))
(setq sca (read(read-line f)))
(setq ld1 (read(read-line f)))
(setq ld2 (read(read-line f)))
(close f) ) zhou2.dat为：3 0.5 80 194 运行之后出现的错误为：参数类型错误: FILE nil 请教大虾们？

wdb

"C:\vba\zhoupan\zhou2.dat" 改为"C:\\vba\\zhoupan\\zhou2.dat"

ZZXXQQ

将(read (read-line f))


改为


(read (strcat "(" (read-line f) ")"))


不然您只能得到每行的第一个数。