Добро пожаловать!

Войдите или зарегистрируйтесь сейчас!

Войти

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

Тема в разделе "BearDyugin app's", создана пользователем BearDyugin, 28 ноя 2017.

  1. TanyaMJ

    Регистрация:
    9 авг 2011
    Сообщения:
    6
    Симпатии:
    0
    А чтоб редактировался размер,можете сделать?
     
    #21
  2. borik

    Форумчанин

    Регистрация:
    29 июн 2011
    Сообщения:
    894
    Симпатии:
    578
    Адрес:
    Витебск
    Если несложно, добавь, пожалуйста, возможность последовательного выбора точек указанием их на чертеже.
    Т.е. указываем 2 точки на первой грани, затем на второй.
    :ScratchOneSHead:
    На исполнительных съёмках с большой плотностью точек выбор сразу четырёх - практически нереален...
     
    #22
    Иоан4 нравится это.
  3. BearDyugin

    BearDyugin Модератор
    Форумчанин

    Регистрация:
    30 ноя 2007
    Сообщения:
    2.747
    Симпатии:
    2.503
    Адрес:
    Сибирь
    Покажи пример таких загруженных схем.
     
    #23
  4. i77artur

    Форумчанин

    Регистрация:
    9 окт 2010
    Сообщения:
    1.550
    Симпатии:
    939
    Я делаю что-то не правильно? Задача - повернуть текст блока вдоль полилинии (трассы)
    Безымянный_2.jpg Безымянный_1.jpg
     

    Вложения:

    #24
  5. BearDyugin

    BearDyugin Модератор
    Форумчанин

    Регистрация:
    30 ноя 2007
    Сообщения:
    2.747
    Симпатии:
    2.503
    Адрес:
    Сибирь
    Всё правильно. вращает вокруг центра объекта. Надо будет добавить опцию, вращать вокруг точки вставки.
     
    #25
    Qvinto нравится это.
  6. TulGeo

    Форумчанин

    Регистрация:
    11 окт 2018
    Сообщения:
    144
    Симпатии:
    84
    Адрес:
    Тула
    Большое спасибо! Очень ценно!
     
    #26
  7. i77artur

    Форумчанин

    Регистрация:
    9 окт 2010
    Сообщения:
    1.550
    Симпатии:
    939
    А блоки с атрибутами нельзя добавить к лиспу?
     
    #27
  8. Dimbass13081987

    Регистрация:
    15 апр 2016
    Сообщения:
    1
    Симпатии:
    0
    Здравствуйте, а можно убрать построения от ближайшего края полилинии, то есть построения только от одного края полилинии с возможностью пересечения ее.
     
    #28
  9. BearDyugin

    BearDyugin Модератор
    Форумчанин

    Регистрация:
    30 ноя 2007
    Сообщения:
    2.747
    Симпатии:
    2.503
    Адрес:
    Сибирь
    Думаю что можно, но опция как мне кажется малополезная для общественности, поэтому когда я её реализую не могу сказать.
     
    #29
  10. Гребенева Елена

    Регистрация:
    14 авг 2017
    Сообщения:
    3
    Симпатии:
    0
    К сожалению, вместе в атрибутами перемещаются и сами блоки и тем самым изменяются координаты. Можно ли что-то придумать, чтобы разворачивались только атрибуты блоков.
     
    #30
  11. sergtor

    Форумчанин

    Регистрация:
    23 сен 2012
    Сообщения:
    1.715
    Симпатии:
    600
    Адрес:
    Ухта
    Команда torient из пакета Express Tools.
     
    #31
  12. Гребенева Елена

    Регистрация:
    14 авг 2017
    Сообщения:
    3
    Симпатии:
    0
    Я имела ввиду применительно к команде Geo_align_object_to_curve. Тексты и атрибуты поворачиваются вдоль указанной полилинии. Это очень удобно. Но смещаются блоки. А команда torient поворачивает атрибуты на конкретный угол. Это уже совсем не то.
     
    #32
  13. gorelikoff13

    Форумчанин

    Регистрация:
    16 янв 2017
    Сообщения:
    36
    Симпатии:
    0
    Здравствуйте! Подскажите пожалуйста почему не работает отступ в лиспе Geo_align_object_to_curve. Он работает ток если ставить 10, 15 и т.д. а пытаюсь сделать 0.1 нивкакую. Заранее СПАСИБО.
     
    #33
  14. BearDyugin

    BearDyugin Модератор
    Форумчанин

    Регистрация:
    30 ноя 2007
    Сообщения:
    2.747
    Симпатии:
    2.503
    Адрес:
    Сибирь
    Загрузка растров в 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 в той ветке стал не актуальным.
     

    Вложения:

    #34
    Последнее редактирование: 11 мар 2020
    Реечник_95, AGF, Иоан4 и 4 другим нравится это.
  15. Sergey B.

    Форумчанин

    Регистрация:
    16 мар 2017
    Сообщения:
    388
    Симпатии:
    95
    Адрес:
    Тула
    BearDyugin, здравствуйте. При использовании Geo_Point_Corner.VLX результат не совпадает с ожидаемым. Не подскажете, может я что то делаю не так?
    Конвертирую 8 точек в 4 угловые точки. Всё получилось. Однако, размеры от осей отличаются.
    Geo point пример1-Модель.jpg оригинальные размеры
    Geo point пример2-Модель.jpg размеры после обработки Geo_Point_Corner.VLX

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

    Вложения:

    #35
    Al-uss нравится это.
  16. BearDyugin

    BearDyugin Модератор
    Форумчанин

    Регистрация:
    30 ноя 2007
    Сообщения:
    2.747
    Симпатии:
    2.503
    Адрес:
    Сибирь
    бывает...
    2020-04-08_212304.png
     

    Вложения:

    #36
    AGF, flareon, FOXXX591 и ещё 1-му нравится это.
  17. Sergey B.

    Форумчанин

    Регистрация:
    16 мар 2017
    Сообщения:
    388
    Симпатии:
    95
    Адрес:
    Тула
    BearDyugin, я думал, что берётся координата X у одной точки и координата Y у второй точки, таким образом создаётся третья угловая точка. Методом тыка выяснил, что ваша программа создаёт угловую точку по пересечению двух линий, созданных интерполяцией по двум точкам на каждой из сторон.
     
    #37
  18. BearDyugin

    BearDyugin Модератор
    Форумчанин

    Регистрация:
    30 ноя 2007
    Сообщения:
    2.747
    Симпатии:
    2.503
    Адрес:
    Сибирь
    Поиск объектов содержащих текст в указанном диапазоне.

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

    Вложения:

    #38
    Реечник_95, AGF, Grandpa и 3 другим нравится это.
  19. vitta77

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

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

    Форумчанин

    Регистрация:
    4 окт 2015
    Сообщения:
    55
    Симпатии:
    3
    Здравствуйте. Можно ли сделать так, чтобы текст (мтекст) менял свой цвет после поворота, чтобы было видно, что развернулось
     
    #40

Поделиться этой страницей

  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление