lisp如何读取文件中的数据？

先将文本文件用（100

200）这样表示，每一行一个点，先用read-line读取，然后用read读让它返回一个表即滑埋（x坐标

y坐标），然后将一个败让凳表付值给一个变量，即可调用察旅了

你的问题有些模糊

你是想问lisp文件放在哪里？还是想问怎么加载lisp文件？

lisp文件放在逗稿电脑的哪个文件夹都可以。裂扰

可以通过cad下拉菜单

工具山源孝--加载应用程序--来加载lisp文件

(defun List_FromFile (fn / f l ll)

 (if (setq f 键乎(open (findfile fn) "r"))

   (progn

     (while (setq l (read-line f))

       (setq ll (cons  l ll))

     )

     (close f)

   )

 )

 (reverse ll)

) 

(setq 余罩data_file_patch (strcat "e:\\test\\DataFile\\" "data.txt"))设文件路径

(setq lst (List_FromFile data_file_patch))get list

(car lst)获取文件中的第一个稿毁悉数据

(cadr lst)获取文件中的第二个数据

(caddr lst)获取文件中的第三个数据

(nth 3)获取文件中的第四个数据

---