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

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

Войти

Помогу бесплатно разработать любую программу на autolisp.

Тема в разделе "Autodesk", создана пользователем Германup, 3 фев 2014.

  1. Philin

    Форумчанин

    Регистрация:
    1 фев 2008
    Сообщения:
    2.533
    Симпатии:
    2.072
    Адрес:
    Москва
    акад - МАССИВПРЯМОУГ хоть бантиками с шагом микрон.
     
    #1241
  2. Omary4

    Регистрация:
    10 ноя 2015
    Сообщения:
    8
    Симпатии:
    0
    можете поподробнее, пожалуйста? я не понимаю, где и как там шаг указать в секундах
     
    #1242
  3. AdrasMan

    Форумчанин

    Регистрация:
    4 дек 2013
    Сообщения:
    965
    Симпатии:
    871
    Адрес:
    город Воинской Славы Белгород
    А если так попробовать:
    1. Задать свою систему координат.
    2. построить точку по широте и долготе.
    3. От нее построить точку на 6" больше по широте. И следом точку на 6" больше по долготе.
    4. Измерить расстояние от исходной точки до второй и третьей.
    Зная эти расстояния и направления создать нужный массив. Полагаю, что на небольшом участке по площади больших ошибок не будет.
    5. Заменить точки на блоки кресты.
     
    #1243
  4. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    636
    Симпатии:
    696
    Адрес:
    СССР, город хлебный
    Не совсем так. Надо от первой точки построить вторую точку со сдвигом на 6" и по широте и по долготе.
    Посмотрите как у меня построена внешняя рамка для м.1:25000 в голом автокаде при помощи лисп (бился над ним пару месяцев).
     

    Вложения:

    • рамка.dwg
      Размер файла:
      45,6 КБ
      Просмотров:
      9
    #1244
  5. Omary4

    Регистрация:
    10 ноя 2015
    Сообщения:
    8
    Симпатии:
    0
    наверное, но нужен большой участок( а там погрешности точно будут.
    --- Сообщения объединены, 15 апр 2022, Оригинальное время сообщения: 15 апр 2022 ---
    да, круто! а тут такой же принцип массива? то есть вычисляется расстояние в метрах между параллелями/меридианами?
     
    #1245
  6. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    636
    Симпатии:
    696
    Адрес:
    СССР, город хлебный
    Нет. Делается пересчет из прямоугольных координат СК-42 в широту/долготу WGS-84 угловых точек рамки. Далее вычисляется разница точек по широте и долготе, интерполируется по длине сторон рамки и делается оформление.
     
    #1246
  7. MrBrown

    Форумчанин

    Регистрация:
    31 июл 2013
    Сообщения:
    35
    Симпатии:
    9
    Здравствуйте, уважаемые форумчане!
    Помогите макросом удлинить горизонтальную полочку выноски ровно вдвое, но в сторону, противоположную от конца полочки. Это обычная полилиния. Цель - чтобы указатель выноски (косая линия) не перекрывала числовые данные. И надо предусмотреть выбор нескольких выносок рамкой.
    Для тех, кто уже в теме: значительно облегчил задачу из поста #1220. Там действительно невозможно обработать прокси.
    Моя благодарность всем откликнувшимся.
     

    Вложения:

    #1247
  8. Барбатос

    Форумчанин

    Регистрация:
    6 ноя 2012
    Сообщения:
    512
    Симпатии:
    202
    Адрес:
    г. Воронеж
    День добрый!
    Вопрос: существует ли лисп, который показывает дату вставки примитивов в автокад? Пример: ткнул в точку и показывает, в свойствах, дату добавления элемента в чертеж. Как geomprops, только для дат. Где-то такое видел, но не могу найти.
     
    #1248
  9. Hunter23071985

    Регистрация:
    30 янв 2014
    Сообщения:
    19
    Симпатии:
    3
    Всем привет!
    Нужно перебрать все блоки в чертеже и применить к ним определённую команду.
    Попробовал сделать так: (раскрыть)
    Код:
    (defun c:z00 (/ blk)
    (while (setq blk (tblnext "BLOCK" (not blk)))
    (if (= (logand (cdr (assoc 70 blk)) (+ 1 4 8 16 32 64)) 0) ;Check for not unnamed / xref
    (progn (command "._BEDIT" (cdr (assoc 2 blk)))
    (command "._totalpurge")
    (command "._BSAVE" "._BCLOSE"))))
    (princ))
    Запинается на блоке 20150901_Projet-DS. Чертёж тут.
    Помогите исправить, пожалуйста.
     
    #1249
  10. Hunter23071985

    Регистрация:
    30 янв 2014
    Сообщения:
    19
    Симпатии:
    3
    Вопрос из предыдущего поста снимаю - адаптировал под свою задачу OverkillInBlocks.lsp.
    Кстати, хороший лисп - рекомендую.
     
    #1250
  11. FOXXX591

    Форумчанин

    Регистрация:
    19 окт 2012
    Сообщения:
    3.272
    Симпатии:
    2.574
    Адрес:
    г.Смоленск
    Коллеги добрый день.
    Может кто нибудь помочь с лиспом который показывает выноской площадь выбранной штриховки?
     
    #1251
  12. Qvinto

    Форумчанин

    Регистрация:
    10 дек 2008
    Сообщения:
    5.681
    Симпатии:
    4.223
    Адрес:
    Украина, г.Калуш
    #1252
    AGF нравится это.
  13. FOXXX591

    Форумчанин

    Регистрация:
    19 окт 2012
    Сообщения:
    3.272
    Симпатии:
    2.574
    Адрес:
    г.Смоленск
    О Игорь вернулся)). Только ты так мог написать. Спасибо за ссылку, нифига не читаю, весь в работе как всегда.
     
    #1253
  14. borik

    Форумчанин

    Регистрация:
    29 июн 2011
    Сообщения:
    894
    Симпатии:
    578
    Адрес:
    Витебск
    ::rolleyes24.gif::
    Наш самый скоростной поиск по форуму!!!
    ::drink1.gif::
     
    #1254
    chehoff нравится это.
  15. AlexanderVLG

    Регистрация:
    12 дек 2020
    Сообщения:
    22
    Симпатии:
    2
    Добрый день! Существует ЛИСП который при синхронизации атрибутов блоков оставляет атрибуты на своем месте? Нужно применить синхронизацию отметкам, которые уже разнесены на плане. Сделать нужно так, как говорится в конце видео:
     
    #1255
  16. zhivchic

    Регистрация:
    13 мар 2013
    Сообщения:
    12
    Симпатии:
    0
    доброго времени суток! подскажите пожалуйста, существует ли лисп (для автокада) подготовки инженерных ведомостей пересечения трассой объектов: коммуникаций, угодий, водных преград, и т.д.. как бы это автоматизировать с составление профиля? помогите пожалуйста!!!
     
    #1256
  17. Fant

    Регистрация:
    28 июн 2016
    Сообщения:
    21
    Симпатии:
    3
    Добрый день, подскажите, есть лисп который записывает Z беря его из близ лежащих текстов и записывает в точку, замысел в обратном, что бы из точки или блока бралась Z и менялся близлежащий текст
     
    #1257
  18. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    636
    Симпатии:
    696
    Адрес:
    СССР, город хлебный
    Где-то тут я уже выкладывал. Повторюсь.
     

    Вложения:

    • 55.LSP
      Размер файла:
      2,7 КБ
      Просмотров:
      7
    #1258
  19. Inessar

    Регистрация:
    8 апр 2021
    Сообщения:
    21
    Симпатии:
    7
    Здравствуйте. Нужен ЛИСП, который привяжет вершины существующей 3д полилинии к существующим ближайшим блокам, желательно в английском варианте.
    Пример чертежа, для которого требуется ЛИСП прилагаю. Нужно, чтобы вершины полилиний точно совпали с блоками. Координаты вершин и блоков совпадают до см, различия в мм. На чертежах используются координаты с точностью 0,00
     

    Вложения:

    • Test.dwg
      Размер файла:
      755,9 КБ
      Просмотров:
      4
    #1259
  20. Fant

    Регистрация:
    28 июн 2016
    Сообщения:
    21
    Симпатии:
    3
    спасибо за ответ, не раскрыл тему до конца, ссори мой косяк. Надо что бы скопом и текст не пересоздавался а менялся существующий, что бы если он был повернут, поворот остался.
    --- Сообщения объединены, 25 июл 2022, Оригинальное время сообщения: 25 июл 2022 ---
     
    #1260

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

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