曾经想写的绘制箭头程序，现在很简单了

趣意人生

学习了！谢谢大家！

罗尼

你们想要的LEADER来了：
(defun c:jt(/ os cmd pt1 pt2 )
        (vl-load-com)
        (setq pt1 (getpoint"\n指定起点"))
        (setq pt2 (getpoint pt1 "\n指定终点"))
        (command "layer" "m" "2细线层" "c" 4 "" "")
        (command "LEADER" pt2 pt1 "" "" "n")
        (princ)
)

nu'xing'x'p

参数类型错误: point: nil
运行时报错