[求助]文件读取!

xialiang

LISP中有按指定第N行在文件中读取第N的字符的函数吗?

还是得自定义函数?

请高手指点!

yedajiang

要自定义。我有给你一个。

(defun read_lines (file_name rows / f)
  (setq file (findfile file_name))
  (setq f (open file "r"))
  (setq row_str (repeat rows (read-line f)))
  (close f)
  (princ row_str)
  )

xialiang

谢谢!