[求助]：加载lisp程序出现怪事——急！！

一生有你 · 发表于 2004-10-27 16:40:22

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

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

×

各位高手，我是lisp 编程的初学者，加载程序后为什么不能用？
以下是我编辑的程序：

;This program generates a chamfer by entering
;the chamfer angle and the chamfer distance
;
(defun c:chamf(/ d a)
(setvar"cmdecho"0)
(graphscr)
(setq d (getdist"\n enter chamfer distance:"))
(setq a (getangle"\n enter chamfer angle:"))
(setvar "chamfera" d)
(setvar "chamferb" (* d (/(sin 1)(cos a))))
(command"chamfer")
(setvar"cmdecho"1)
(princ)
)
加载成功后，再用(command:chamf)回车后，出现错误：
命令: (command:chamf)
; 错误: no function definition: COMMAND:CHAMF
怎么回事呀？

zhang8755 · 发表于 2004-10-27 16:54:06

直接输入chamf使用.

一生有你 · 发表于 2004-10-27 17:09:57

可以了！！！谢谢你的帮助！！！

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

[求助] [求助]：加载lisp程序出现怪事——急！！

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

相关帖子

谢谢斑竹！！！

浏览过的版块