[wetr]

Доброго времени суток!
Задача появилась интересная. Необходимо расставить блоки на пересечении осей. Файл прилагается (2004). Такое ощущение, что уже где-то встречал подобный лисп, но поиском не нашел. Если было - ткните пожалуста. Если не было - буду благодарен за любую помощь.

[Alan]

Сообщение от Кулик Алексей aka kpblc Можно найти benchmark (где-то на форуме валялся) и погонять на имеющемся тесте. Хотя бы примерно оценить скорость уже будет можно

У тебя и нашел http://autolisp.ru/2009/09/20/execution-speed-check/

Benchmarking ....Elapsed milliseconds / relative speed for 2 iteration(s): (C:T2F)......2122 / 1.66 <fastest> - вариант entmakex Нутром чувствовал, что лучше! (C:T2F1).....3526 / 1 <slowest> - вариант vla-

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

А теперь для ActiveX-варианта присвой какой-либо переменной значение указателя на пространство модели, и повтори тест
А если совсем хочется веселья - скомпилируй в fas / vlx и погоняй их ))
Offtop: Да, я сволочь, я знаю

[posetitel]

а можно ли доработать лисп, чтобы находил пересечение полилинии и блока, и вставлял блок с именем атрибута пересекаемого блока в слой полилинии?
т.е. у меня есть блок в виде одной только линии, у этого блока есть атрибут "имя" со значением "1", есть несколько полилиний в разных слоях, мне нужно в точке пересечения полилиний с блоком поставить какие-нибудь маркеры (блоки), которые будут помещены в слой с каждой пересекающей полилинией с именем атрибута пересекаемого блока.
как вариант, отрезки делать не блоком, а тоже размещенными в своем слое, тогда блок должен попадать в слой полилинии с именем слоя отрезка.

----- добавлено через ~37 мин. -----
ну или находить пересечение выделенного отрезка и полилиний и помещать блок в месте пересечения в слой с полилинией