|
我编写了一个水平十字线小程序 已经加载到CAD2004中,但是在运行的时候,当输入十字线长度后提示 错误: 参数类型错误: numberp: nil 我的源程序是: ;;;*水平十字线程序 (defun c:spszx(/ p0 ld p1 p2 p3 p4) (setq p0 (getpoint "十字线交点:")) (setq ld (getdist "\n 十字线长度:")) (setq ld (* 0.5 ld)) (setq p1 (polar p0 pi ld)) (setq p2 (polar p0 0 ld)) (setq p3 (polar p0 (* 0.5pi)ld)) (setq p4 (polar p0 (* -0.5pi)ld)) (command"line"p1 p2"""line"p3 p4"") ) 请大家帮忙看看是怎么回事? |