LISP问题请教

wlq66 · 发表于 2005-11-20 23:22:00

请问下面的程序在运行时系统总是提示“函数被取消”，好象问题出在最后一句，我是新手，拜托一定指教指教。谢谢！

(command "circle" "5,5" "2")
(command "line" "1,5" "10,5")
(setq el (entlast))
(setq pt '(5 7))
(command "trim" el "" pt "")

yxp · 发表于 2005-11-20 23:25:00

给你回复了你咋不看，问题出在第二句，没有回车就结束了。再加个“”就行了。

wlq66 · 发表于 2005-11-20 23:30:00

我在第二句加过“”，但不行，程序运行中前几句都有返回值，最后一句没反应。谢谢你！

wlq66 · 发表于 2005-11-20 23:34:00

我在第二句加过“”，但不行，程序运行中前几句都有返回值，最后一句没反应。谢谢你！

yxp · 发表于 2005-11-20 23:37:00

放在一起加载吧

(defun c:aa()
(setvar "cmdecho" 0)
(command "circle" "5,5" "2")
(command "line" "1,5" "10,5" "")
(setq el (entlast))
(setq pt '(5 7))
(command "trim" el "" pt "")
)

加载后运行aa

wlq66 · 发表于 2005-11-20 23:39:00

yxp：请帮我再看看，麻烦你了。

yxp · 发表于 2005-11-20 23:42:00

我运行过了没有一点问题

wlq66 · 发表于 2005-11-20 23:43:00

我试试，再一次谢谢！

wlq66 · 发表于 2005-11-20 23:52:00

yxp：我试了，通过了。但为什么一定要在前面加几句

yxp · 发表于 2005-11-21 00:02:00

加哪几句？（setvar "cmdecho" 0）吗？那句不加也行，只是为了不显示CAD命令的运行返回提示。

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

LISP问题请教

本帖子中包含更多资源

浏览过的版块