动态画粗糙度源码

18112600842 · 发表于 2024-7-8 11:37:54

本帖最后由 18112600842 于 2024-7-8 16:20 编辑

ayFile2List 没找到这个函数

lch8526 · 发表于 2024-11-26 17:41:52

18112600842 发表于 2024-7-8 11:37
ayFile2List 没找到这个函数

;读取文件并写入表
(defun ayFile2List (xFileName / fp xRec sList)
  (setq fp (open xFileName "r"))
  (while (setq xRec (read-line fp))
(setq sList (cons (read xRec) sList))
  );end_while
  (close fp)
  sList
);end_defun

账号		自动登录	找回密码
密码			注册

[源码] 动态画粗糙度源码