求助 参数类型错误: numberp: nil 急!急!急!
一段画轴程序输入完参数后就显示:参数类型错误: numberp: nil程序如下:
(defun c:zhou1()
(setvar "cmdecho" 0)
(setq os (getvar "osmode"))
(setvar "osmode" 0);
(setq p0(getpoint"\n 插入点:");
a(getangle"\n 旋转角度:");
d(getdist"\n 轴的直径:");
L(getdist"\n 轴的长度:"));
setq p2(polar p0(+(* 0.5pi) a) (* 0.5d)
p1(polar p2 a L)
p3(polar p2(+(* 1.5pi) a) d)
p4(polar p3 a- L))
(command"line"p1 p2 p3 p4"")
)
求助搞人指点!!
(defun c:zhou1()
(setvar "cmdecho" 0)
(setq os (getvar "osmode"))
(setvar "osmode" 0);
(setq p0(getpoint"\n 插入点:")
a(getangle"\n 旋转角度:")
d(getdist"\n 轴的直径:")
L(getdist"\n 轴的长度:")
)
(setq p2(polar p0(+(* 0.5 pi) a) (* 0.5 d))
p1(polar p2 a L)
p3(polar p2 (+ (* 1.5 pi) a) d)
p4(polar p3 a L))
(command"line"p1 p2 p3 p4 "")
) 变量,常数之间要加空格 回复 236004 的帖子
谢谢啊 先去试试 回复 cad_ 的帖子
晕,2句前都少了空格嘛
setq p2(polar p0(+(* 0.5pi) a) (* 0.5d)
==>
(setq p2(polar p0(+(* 0.5 pi) a) (* 0.5 d))
p3(polar p2(+(* 1.5pi) a) d)
==>
p3(polar p2 (+ (* 1.5 pi) a) d)
回复 236004 的帖子
解决了
页:
[1]