Andy_668 发表于 2022-6-18 09:55:47

Error: no function definition: REG-READ

C:PARTLIST
(vl-ACAD-defun
(DEFUN C:COPYLIST (/ FILE DIR DWGLIST DWGPATH)
    (if        (= nil (setq FILE (REG-READ "Copylist")))
      (PROGN (setq FILE "D:\\Partlist\\"))
为什么我输入命令: copylist
Error: no function definition: REG-READ提示这个

vbnewer 发表于 2022-6-18 10:03:27

REG-READ这个函数没有定义，这不是lisp自带的函数

烟盒迷唇 发表于 2022-6-19 06:50:49

又是反编译的码

baitang36 发表于 2022-6-19 11:41:20

本帖最后由 baitang36 于 2022-6-19 11:44 编辑

盗版没偷全造成的。
代码中带有vl-ACAD-defun的一律判为偷盗别人的代码{:1_1:}
正常人写代码一般不会用这函数，defun c：在编译时会自动加上这个
页: [1]
查看完整版本: Error: no function definition: REG-READ