394189642 发表于 2010-1-13 08:29

求高手帮我看看

请教高手，这个程序就是画条线，看看哪有问题，运行时CAD提示参数太少，
(defun c:cv(/pa pb)
            (setvar"cmdecho"0)
            (setq pa(getpoint"enter left/low point:"))
            (set ww(getdist pa"width:"))
            (setq pb(polar pa 0 ww))
             ("line"pa pb"")
             (prin1)
)
(prin1)

394189642 发表于 2010-1-13 08:31

setq中少个q,自己先找个，继续啊
页: [1]
查看完整版本: 求高手帮我看看