如何按坐标对多段线排序

superlong · 发表于 2022-7-5 17:51:33

例如，我在一个列表中选择10条多段线，然后我想根据每个多段线的第一个点的坐标y对该列表排序（每个多段线有多个点）

cwake · 发表于 2022-7-5 18:15:46

假设LW多段线，并且它们的定义方向合适。。。看见

http://forums.augi.com/showthread.php?137837-Sort-Selectionset-by-X-coord&p=1164026&viewfull=1#post1164026

该帖子（即第2点中的代码行）描述了如何按x值对列表进行排序。
要按y排序，取该代码，只需将“cadr”的两个场合都替换为“caddr”。
要按z排序，您可以执行相同的操作，但将“cadr”替换为“last”或“CADDR”。

superlong · 发表于 2022-7-5 18:35:36

这是我为许多折线选择获取面积的代码，但我想在获取面积之前对它们的折线进行排序
[code]（defun c:yeah（/dt dt1 dt2 rec1 rec2 pt ss）（if（not sc3）（setq sc3 2））（setq sc1（getreal（strcat）“\nChi\U+1EC1u cao Text

cwake · 发表于 2022-7-5 19:04:01

这将获取原始的LW多段线选择集，按每条多段线第一个顶点的y值降序排序，然后按该顺序重新创建选择集。

您可能希望定位比当前更多的变量。将SC1和SC3同时作为全局变量似乎没有任何意义。SC9呢？SDT？等等

[code]（defun c:yeah（/dt dt1 dt2 rec1 rec2 pt ss）（setq sc3（setq sc1（cond）（（getreal“\nChi\U+1EC1u cao Text

[编程交流] 如何按坐标对多段线排序

发表回复

精选推荐