lisp程序，求高人指点。我是个菜鸟，刚刚学，是在是看不出来了。

显示全部楼层 · 2010-9-21 09:16:20

(defun c:fuzhi()
(setq a1(getpoint) a2(getpoint))
(command "line" a1 a2 "")
(setq obj1(entlast))
(setq ent1 (entget (car obj1)))
(setq pt1 (cdr (assoc 10 ent1)) pt2 (cdr (assoc 11 ent1)))
(command "copy" obj1 "" pt1 pt2 "")
)
运行的时候说参数类型错误，把entlast改成entsel手动选择就不会有错误信息，这是为什么？
高手啊，你快点吧，我都要崩溃了！

千问 · 2010-9-21 09:16:20

entlast是图元，entsel是双元表，是由你选择的点和图元组成的双元表。

千问 · 2010-9-21 09:16:20

你写的方程是没有问题的，entlast就是这样的用法，建议你在2008里检验一下

千问 · 2010-9-21 09:16:20

entlast已经是或图元，不用car获取。