command语句，错在哪里？

zxy9108 · 发表于 2005-5-5 21:50:00

(command "pline" ct1 "a" "ce" cen1 ct3 "l" ct4 "a" "ce" cen2 ct6 "CL")

上面这句中，ct1, cen1,ct3,ct4,cen2, ct6均为点，

这一句命令能够画出所要画出的图形，但运行结束时，就说程序出错了(function cancelled )，请教各位高手，错在哪里。

zxy9108 · 发表于 2005-5-5 21:56:00

但是改成：(command "pline" ct1 "a" "ce" cen1 ct3 "l" ct4 "a" "ce" cen2 ct6 "l" ct1 "")就可以了，为什么上面就不行了，在command 中这样输入是可以的，

请教各位高手。

ZZXXQQ · 发表于 2005-5-5 22:43:00

(command "pline" ct1 "a" "ce" cen1 ct3 "l" ct4 "a" "ce" cen2 ct6 "L" "C")

王咣生 · 发表于 2005-5-6 00:31:00

(defun c:test ( / )
(setq ct1 (getpoint "\nGet a point:")
cen1 (getpoint "\nGet next point:")
ct3 (getpoint "\nGet next point:")
ct4 (getpoint "\nGet next point:")
cen2 (getpoint "\nGet next point:")
ct6 (getpoint "\nGet next point:")
)
(command "pline" ct1 "a" "ce" cen1 ct3 "l" ct4 "a" "ce" cen2 ct6 "CL")
) 我试了,可以呀,没报错

ljpnb · 发表于 2005-5-6 08:04:00

(command "pline" ct1 "a" "ce" cen1 ct3 "l" ct4 "a" "ce" cen2 ct6 "CL")的结尾"CL"在下面这种情况下会出错，当ct1和ct6在一直线上时，程序会报错。

zxy9108 · 发表于 2005-5-6 10:57:00

LJPNB真是高手,我的CT1和CT6是在同一直线上,只是不太理解这种情况下为什么会报错,是不是因为前面有个"a"的原因

ljpnb · 发表于 2005-5-6 12:15:00

如果ct6到ct1是直线段的话，应该用3楼的那种样式。报错的原因是因为最后PLINE线处于画圆弧状态，当CT1和CT6是在同一直线上时，如果要闭合PLINE线，势必圆弧的半径是无穷大，就是相当于直线，所以出错。

zxy9108 · 发表于 2005-5-6 19:29:00

谢谢指教! 祝身体健康，万事如意

账号		自动登录	找回密码
密码			注册

command语句，错在哪里？

reply