chenjihe 发表于 2004-1-3 22:32:00

[LISP]如何用多样线绘制下面的点？

((416.364 149.187) (408.518 149.489) (403.464 150.469) (397.656 152.505)
(393.558 154.833) (388.339 159.333) (386.702 162.095) (385.883 164.652)
(386.293 168.333) (388.851 171.913) (391.409 173.856) (395.166 175.727) (401.05 177.688) (407.915 178.894) (415.232 179.346) (426.924 178.366) (433.156 176.515) (438.183 173.854) (440.946 170.684) (441.751 167.311) (441.035 163.424) (438.183 158.718) (431.828 153.56) (428.584 151.901) (422.474 149.941))。这是一个点坐标数列表，请问如何用多样线（spline）绘制出来

meflying 发表于 2004-1-3 23:04:00

(setq lst '((416.364 149.187) (408.518 149.489)...))
(command "_.spline")
(mapcar 'command lst)
(command "" "" '")

BDYCAD 发表于 2004-1-4 09:18:00

樓主是做眼鏡的吧. 呵呵.
页: [1]
查看完整版本: [LISP]如何用多样线绘制下面的点？