2013-06-18 QQ群：ALISP＆VLISP(143438137) 聊天记录：签到

CCarch · 发表于 2013-6-18 21:48:47

风君子(123523058)于2013-06-18 21-48-47：
最近的应该好球

含泪的射手 · 发表于 2013-6-18 21:49:13

含泪的射手(54374454)于2013-06-18 21-49-13：
有没有什么简单的方法，我写出来的一长串代码

CCarch · 发表于 2013-6-18 21:49:37

风君子(123523058)于2013-06-18 21-49-37：
斜率呗

含泪的射手 · 发表于 2013-6-18 21:50:26

含泪的射手(54374454)于2013-06-18 21-50-26：
不行吧，多段线形状不固定的哇

CCarch · 发表于 2013-6-18 21:53:32

書生—SLQ(421944906)于2013-06-18 21-53-32：
首先得到多线段每个点的坐标，然后一一和点去比对

含泪的射手 · 发表于 2013-6-18 21:53:57

含泪的射手(54374454)于2013-06-18 21-53-57：
我写出来就是这样的，感觉多段线顶点太多的时候太麻烦了。

CCarch · 发表于 2013-6-18 21:57:45

ZZXXQQ(1468225785)于2013-06-18 21-57-45：
(defun near_far_point (plst pt)
(setq dlst (mapcar '(lambda (a) (distance pt a)) plst))
(list (apply 'max dlst) (apply 'min dlst))
)

CCarch · 发表于 2013-6-18 21:58:30

流氓兔(871425525)于2013-06-18 21-58-30：
这个？

含泪的射手 · 发表于 2013-6-18 22:03:12

含泪的射手(54374454)于2013-06-18 22-03-12：
plst 要求输入的是图元名还是选择集呢？我的结果都是（0 0）

CCarch · 发表于 2013-6-18 22:03:41

ZZXXQQ(1468225785)于2013-06-18 22-03-41：
点表

含泪的射手 · 发表于 2013-6-18 22:03:47

含泪的射手(54374454)于2013-06-18 22-03-47：
明了，需要输入多段线的点表

含泪的射手 · 发表于 2013-6-18 22:03:52

含泪的射手(54374454)于2013-06-18 22-03-52：
[face78.gif]

含泪的射手 · 发表于 2013-6-18 22:05:13

含泪的射手(54374454)于2013-06-18 22-05-13：
晕，我问错了，我是要得到最大距离和最小距离的那个点，不是距离。[face6.gif]

CCarch · 发表于 2013-6-18 22:05:57

ZZXXQQ(1468225785)于2013-06-18 22-05-57：
那就要有一个点坐标的表才行

含泪的射手 · 发表于 2013-6-18 22:07:54

含泪的射手(54374454)于2013-06-18 22-07-54：
能不能用foreach函数逐个对比后直接得到最大的或者最小的？

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