Маленькие бесплатные Lisp'ы

А чтоб редактировался размер,можете сделать?

 

Если несложно, добавь, пожалуйста, возможность последовательного выбора точек указанием их на чертеже.
Т.е. указываем 2 точки на первой грани, затем на второй.

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

 

Покажи пример таких загруженных схем.

 

Я делаю что-то не правильно? Задача - повернуть текст блока вдоль полилинии (трассы)

 

Всё правильно. вращает вокруг центра объекта. Надо будет добавить опцию, вращать вокруг точки вставки.

 

Большое спасибо! Очень ценно!

 

А блоки с атрибутами нельзя добавить к лиспу?

 

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

 

Думаю что можно, но опция как мне кажется малополезная для общественности, поэтому когда я её реализую не могу сказать.

 

К сожалению, вместе в атрибутами перемещаются и сами блоки и тем самым изменяются координаты. Можно ли что-то придумать, чтобы разворачивались только атрибуты блоков.

 

Команда torient из пакета Express Tools.

 

Я имела ввиду применительно к команде Geo_align_object_to_curve. Тексты и атрибуты поворачиваются вдоль указанной полилинии. Это очень удобно. Но смещаются блоки. А команда torient поворачивает атрибуты на конкретный угол. Это уже совсем не то.

 

Здравствуйте! Подскажите пожалуйста почему не работает отступ в лиспе Geo_align_object_to_curve. Он работает ток если ставить 10, 15 и т.д. а пытаюсь сделать 0.1 нивкакую. Заранее СПАСИБО.

 

Загрузка растров в AutoCAD по файлам привязки


Приложение может как загружать растры по файлам привязки, так и выполнять обратное действие, создавать файлы привязки для вставленных в AutoCAD изображений.

Имена команд:
Geo_load_image (загрузка растров по привязкам tab, jgw, tfw)
Make_tab_file (создает файлы привязки tab)
Make_world_file (создает файлы привязки world)

Приложение было опубликовано тут https://geodesist.ru/threads/podgruzka-rastra-v-avtokad.4633/ но потом тема окончательна перекочевала в RASTER DESIGN и lisp в той ветке стал не актуальным.

 

BearDyugin, здравствуйте. При использовании Geo_Point_Corner.VLX результат не совпадает с ожидаемым. Не подскажете, может я что то делаю не так?
Конвертирую 8 точек в 4 угловые точки. Всё получилось. Однако, размеры от осей отличаются.
оригинальные размеры
размеры после обработки Geo_Point_Corner.VLX

Пример разницы по координатам X и Y в МСК, в активной ПСК.
Я думал, что это связано с тем, что МСК не ортогональна текущей ПСК. Выгрузил точки и загрузил в новый чертёж заново как точки CoGO. Поменял стиль точек на стандартный автокадовский и расчленил точки CoGO несколько раз. В итоге, получил обычные точки автокад, развёрнутые относительно ПСК. Однако, это не помогло и результат не изменился. Пробовал в именных, а не свободных системах координат, вид сверху и не менял.
Выкладываю SDR и DWG.

 

бывает...

 

BearDyugin, я думал, что берётся координата X у одной точки и координата Y у второй точки, таким образом создаётся третья угловая точка. Методом тыка выяснил, что ваша программа создаёт угловую точку по пересечению двух линий, созданных интерполяцией по двум точкам на каждой из сторон.

 

Поиск объектов содержащих текст в указанном диапазоне.

Приложение ищет объекты (текст, Мтекст и блоки с атрибутами) содержащие текст в указанном диапазоне
Имя команды:
Geo_Find_text_from_to

 

Низкий поклон, убил один выходной на поиски подобного, НО сэкономил кучу времени делая быстрое образмеривание одним движением.
Когда в полилинии больше 300 сегментов, кто делал тот поймет (что такое заход солнца в ручную)).

для чего такое нужно:
к примеру у Вас съемка линии ВЛ (один сегмент полилинии - между блоками соседних опор), и нужно определить какие опоры находятся на не нормативном расстоянии, опор 300-400, расстояние 25-30 км...

 

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