(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 "")
)
运行后说是参数类型错误。
头都大了，不知道是哪错了！
请高人指点。
请速度。