（请教）怎么样能够把一个含有许多坐标点的表？依坐标点画出pline来

nono · 发表于 2004-10-20 12:07:00

我有一个表'((1 1) (2 2) (3 3) (4 4)) 我想用pline命令来画出三段pl线
（1 1）（2 2）
      (2 2)                      (3 3)
      (3 3)                (4 4)
      （apply
                                             '(lambda (ip1 ip2)
                                                                                                                                                                     (command "pline" ip1 ip2 ""))
                                                      '((1 1) (2 2) (3 3) (4 4))
               )

meflying · 发表于 2004-10-20 12:14:00

(mapcar '(lambda(e1 e2) (command "_.pline" e1 e2 "")) (reverse (cdr (reverse lst))) (cdr lst));lst就是你的点表

nono · 发表于 2004-10-20 12:17:00

谢谢辉哥！！

（请教）怎么样能够把一个含有许多坐标点的表？依坐标点画出pline来

发表回复

精选推荐