[问题已解决]：我刚学，定义函数，但是调用出错了！

第四类感情 · 发表于 2006-1-13 10:15:28

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

命令: (load "c:\a.lsp")
2CIRCLE
命令: 2circle
; 错误: no function definition: CIRCLE
命令:
上面是执行以后出错，下面是代码：
(DEFUN C: 2CIRCLE () (SETQ CEN (LIST 0 0) RAD 50)
(command CIRCLE CEN RAD)
(command CIRCLE CEN (+ RAD 30)))

不知道哪里有错，还有就是，为什么函数名前面都要有个“c:”，为什么呢？

tjchkys · 发表于 2006-1-13 10:53:20

(DEFUN C:2CIRCLE()
(SETQ CEN (LIST 0 0) RAD 50)
(command CIRCLE CEN RAD)
(command CIRCLE CEN (+ RAD 30))
)
帮你小改了一下,在黄金长老面前"班门弄斧"了！
Ｃ：代表是程序头的意思吧！可能是表示此函数是主函数！

Underway · 发表于 2006-1-13 11:03:29

(DEFUN C:2CIRCLE () .....)
Comand: 2CIRCLE
比较一下
(DEFUN 2CIRCLE () .....)
Comand: (2CIRCLE)

gucci218 · 发表于 2006-1-13 11:05:55

(DEFUN C:2CIRCLE() (SETQ CEN (LIST 0 0) RAD 50)
(command "CIRCLE" CEN RAD)
(command "CIRCLE" CEN (+ RAD 30)))

第四类感情 · 发表于 2006-1-13 11:42:32

原来C:表示主函数啊，呵呵，谢谢各位，解决问题！
用楼上的代码，[circle]要加引号，加载了函数以后，调用函数名得加（）号才行！

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

[已解决] [问题已解决]：我刚学，定义函数，但是调用出错了！

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子