[prajdziswet]

есть два файла


один более сгруппированный другой более разнесенный..
ssget показывает разное время?

можно ли как то ускорить или решить по другому и почему ssget показывает разное время?

Программа на лисп сливает полилинии вместе,
для этого с помощью ssget запрашиваются полилинии по концам проверяемой

Код:

[Выделить все]

 (setq nabor (ssget "_C" pp1 pp2 '((0 . "LWPOLYLINE"))))

- прямоугольником с гранью 0.00005 (это показано для одной точки)
... и так пока цепочки не сольется в одну полилинию
п.с При большом количестве полилиний и получается таких цепочек (время выше показано без учетом слияния и прохождения по цепочке) разница по времени составляет в 2,5 раза (для данных файлов около 4 и 10 минут соответственно ...
ну а асли брать более загроможденные разница достигается - например с 30 минут до 2,5часа (понятно насколько загроможденный файл брать)

почему ssget показывает разное время может можно получить полилинии по другому?

[Do$]

SSGET и наборы очень медленно работают. Если нужно быстродействие, получайте все нужные полилинии чертежа с помощью (ssget "_X" '((0 . "LWPOLYLINE"))) (<- тут могу наврать, пишу по памяти), сразу конвертируйте набор в список и в этом списке ищите состыкованные полилнии функциями AutoLISP.

[trir]

как я уже говорил, для ускорения поиска лучше строить собственное дерево
https://github.com/rpav/spatial-tree...r/r-trees.lisp

[prajdziswet]

Сообщение от Do$ сразу конвертируйте набор в список и в этом списке ищите состыкованные полилнии функциями AutoLISP

первоначально у меня так и было (брал весь набор полилиний и переводил в список), но так как список очень большой --время выходило вообще космическое (несколько суток, правда я только 1 сутки выдержал ) ,
потом пошел через рекурсию и ssget - время для 180 тыс полилиний уменшилось до полчаса-час

Сообщение от trir как я уже говорил, для ускорения поиска лучше строить собственное дерево

эх может и так, спасибо за код, но для этого надо код понять, чтобы адаптировать для себя (а как то 300 строчек кода , проще самому что написать,чем разобраться бывает)

идея конечно есть использовать сортированный список в рекурсии, но неизвестно как поможет...

может еще идеи есть? и так просто интересно почему при разнесенном чертеже время ssget больше? (количество элементов одинаково в чертежах - во втором я просто разнес)

[trir]

читай

[Do$]

Может быть, с помощью встроенных методов объединения полилиний побыстрее будет? Гляньте Pl-Join из пакета PL-Tools: https://dwg.ru/dnl/607

[skkkk]

Еще есть Chain Selection от Lee Mac.

[prajdziswet]

Сообщение от skkkk Еще есть Chain Selection от Lee Mac.

что то не пошел, но спасибо код очень красивый - для себя постараюсь разобраться почему не сработал , хоть вроде точность выставлял...

Сообщение от trir читай

с деревьями не разбирался,но спасибо....

Сообщение от Do$ Гляньте Pl-Join из пакета PL-Tools: https://dwg.ru/dnl/607

Супер ОГРОМНОЕ СПАСИБО, посмотрел досих пор в шоке...
может конечно не правильно понял, но вродебы все делает сам АВТОКАД, а все остальное обертка типа вывод количества полилиний,задания ошибки и т.д, а сама команда

Код:

[Выделить все]

 (if (and (getvar "PEDITACCEPT") (= (getvar "PEDITACCEPT") 1))
    (vl-cmdf "_pedit" "_Multiple" ssnab "" "_Join" 0 "")
    (vl-cmdf "_pedit" "_Multiple" ssnab "" "_Y" "_Join" 0 ""))

где ssnab - набор полилиий
Спасибо

[Do$]

Сообщение от prajdziswet но вродебы все делает сам АВТОКАД, а все остальное обертка типа вывод количества полилиний,задания ошибки и т.д

Да, все верно
Быстро объединяет?

[prajdziswet]

да, секунд 10 наверное набор из 40 тыс

[skkkk]

Сообщение от prajdziswet что то не пошел, но спасибо код очень красивый - для себя постараюсь разобраться почему не сработал

Не пошел - значит не объединил? Он просто выбирает полилинии, которые касаются указанной на концах и тех, что на концах выбранных по концам, пока не соберется вся цепочка (chain).

Вроде как вопросом топика был выбор, а не объединение:

Сообщение от prajdziswet с помощью ssget запрашиваются полилинии по концам проверяемой

А дальше предполагалось объединение с помощью _pedit. PL-Join, конечно, делает всё и сразу.

[prajdziswet]

Сообщение от skkkk Он просто выбирает полилинии, которые касаются указанной на концах и тех..

да я потом скрипт посмотрел и понял, все равно спасибо - может где и реализую (мне наверное еще понадобиться)...

Сообщение от skkkk Вроде как вопросом топика был выбор

полностью согласен, интересно было...ну а задача хотелось объединять (ну оно у меня и чистит полилинии) ...
все равно спасибо "skkkk"=код chain понравился

п.с насчет _pedit и PL-Join:
проверял на наборе 360тыс полилиний _pedit =>тут оказалось автокад задумался время выдал обработки 26 минут
скорее всего PL-Join выдаст тоже самое (там же аналогичная строка)...
у меня в рекурсии (простейшая, бьет блоки по 2,5тыс) с очисткой точек в полилинии => 2 минуты
так что для ускорее слияния - применяйте рекурсию (это так вдруг кто будет еще читать)

Спасибо всем огромное - подсказали и помогли ....

[Кулик Алексей aka kpblc]

Только в рекурсии autolisp'a есть недокументированное ограничение - кажется, не больше 19000 вызовов (где-то на форуме проскакивало).

[prajdziswet]

Сообщение от Кулик Алексей aka kpblc есть недокументированное ограничение - кажется, не больше 19000 вызовов

Спасибо, Алексей буду иметь введу....
У меня при большом количестве ==
ограничение на наборы проскакивало (не помню точно ограничения - 128, вродебы, это давно известно -не раз писалось...решил сбросом наборов)

.... а насчет рекурсии буду иметь введу, вечером проверю и отпишусь ("знание-сила"). Спасибо

----- добавлено через ~8 мин. -----
Перепроверил 19972 (на автокаде 2014), рекурсий потом завершалось без ошибки....

Спасибо

----- добавлено через ~4 ч. -----
конечно странно число макс 19972 могли бы круглое число поставить