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

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

Войти

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

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

  1. Alex_Shaton

    Форумчанин

    Регистрация:
    30 июл 2013
    Сообщения:
    258
    Симпатии:
    260
    Адрес:
    Беларусь Гомель
    Доброго времени суток!
    Может, у кого есть лисп по отрисовке сигмента полилинии по заданным углам (целые градусы) и расстояниям (с одним знаком после запятой), как на примере (цифры произвольные). Примерный алгоритм:
    1. Указываем начальный сегмент (красным цветом);
    2. Указываем начальную точку;
    3. Вводим значение угла (в целых градусах);
    4. Вводим значение расстояние (до первого знака после запятой);
    5. ENTER.
    Понятно, что можно поиграться с произвольными координатами и МСК-ПСК, но муторно, лисп более желателен.
     

    Вложения:

    #1281
  2. BearDyugin

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

    Регистрация:
    30 ноя 2007
    Сообщения:
    2.762
    Симпатии:
    2.519
    Адрес:
    Сибирь
    Писал такой LISP, но так и не выкладывал, показался немного сложным, и не понятно зачем нужным...
    4 команды:
    BD_PDFL - Polar drawing from the forward direction left angles
    BD_PDFR - Polar drawing from the forward direction right angles
    BD_PDBL - Polar drawing from the back direction angle left angles
    BD_PDBR - Polar drawing from the back direction angle right angles

    Тебе подойдёт команда BD_PDBR
     

    Вложения:

    #1282
  3. Alex_Shaton

    Форумчанин

    Регистрация:
    30 июл 2013
    Сообщения:
    258
    Симпатии:
    260
    Адрес:
    Беларусь Гомель
    BearDyugin, огромное спасибо, именно то, что нужно!!!! А то, что есть еще левые(правые) углы, да еще с прямым и обратным наведением - вообще класс!!! Пригодятся все 4 команды, сделаю себе отдельную панельку. Еще раз огромнейшее спасибо!!!!!!!!
     
    #1283
    X-Y-H нравится это.
  4. volkoff1957

    Форумчанин

    Регистрация:
    18 май 2015
    Сообщения:
    41
    Симпатии:
    6
    Помогите, пожалуйста, добавить в лисп команду, чтобы восстановить состояние cmdecho после окончания выполнения программы.
     

    Вложения:

    • DUP.lsp
      Размер файла:
      454 байт
      Просмотров:
      4
    #1284
  5. ivsem

    Форумчанин

    Регистрация:
    26 мар 2009
    Сообщения:
    2.475
    Симпатии:
    1.051
    Адрес:
    Киев
    Системной переменной CMDECHO нужно присвоить значение равное 1.
    В конце программы добавить строку (setvar "CMDECHO" 1)
     

    Вложения:

    • DUP01.lsp
      Размер файла:
      480 байт
      Просмотров:
      5
    #1285
  6. volkoff1957

    Форумчанин

    Регистрация:
    18 май 2015
    Сообщения:
    41
    Симпатии:
    6
    ivsem, большое спасибо, Вам! Работает.
     
    #1286
  7. vladislav.blud

    Регистрация:
    23 сен 2021
    Сообщения:
    24
    Симпатии:
    0
    Здравствуйте, не знаю возможно ли реализовать мою задумку... Необходим плагин, который позволит проставлять размер между двумя параллельными полилиниями автоматически, с задаванием шага или в ручную протыкивать в нужном месте. Необходимо чтобы размер был перпендикулярным для обеих линий, тобеж был под прямым углом и имел вид параллельного размера , проще говоря, автоматически проставлять ширины дороги. А так же имел возможность использовать текущий стиль размеров. Реально ли это?
     
    #1287
  8. zvezdochiot

    Форумчанин

    Регистрация:
    27 июн 2014
    Сообщения:
    6.016
    Симпатии:
    2.129
    Адрес:
    г. Москва
    Вопрос не в реальности, а в том, сколько ты за "это" заплатить готов. А сколько ты готов заплатить? Назови цену вопроса.
     
    #1288
  9. vladislav.blud

    Регистрация:
    23 сен 2021
    Сообщения:
    24
    Симпатии:
    0
    Сколько нужно? Заплатить готов, конечно же.
     
    #1289
  10. zvezdochiot

    Форумчанин

    Регистрация:
    27 июн 2014
    Сообщения:
    6.016
    Симпатии:
    2.129
    Адрес:
    г. Москва
    Cast @BearDyugin .
     
    #1290
    chehoff нравится это.
  11. BearDyugin

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

    Регистрация:
    30 ноя 2007
    Сообщения:
    2.762
    Симпатии:
    2.519
    Адрес:
    Сибирь
    Так то тема называется "Помогу бесплатно..."
    Задача с размерами не сложная, была бы она массового применения и полезной для общества, написал бы бесплатно.
    Я пишу приложения на заказ, минимальная стоимость 5 000 ₽ Если ни кто не отзовётся бесплатно или дешевле, то обращайтесь, помогу.
     
    #1291
    MaxKal, zvezdochiot и 1958 нравится это.
  12. zvezdochiot

    Форумчанин

    Регистрация:
    27 июн 2014
    Сообщения:
    6.016
    Симпатии:
    2.129
    Адрес:
    г. Москва
    Так "хотелка" то абсолютно бесполезная и ненужная. Такую только с компенсацией потраченного времени, никаких бесплатно и рядом не стояло.
     
    #1292
  13. X-Y-H

    X-Y-H Администратор
    Команда форума Форумчанин

    Регистрация:
    18 май 2007
    Сообщения:
    21.990
    Симпатии:
    7.207
    Адрес:
    Россия
    Ну так то решается задача средствами автокад и использованием можно еще pltools добавить.
    --- Сообщения объединены, 23 ноя 2022, Оригинальное время сообщения: 23 ноя 2022 ---
    Надеюсь у вас паралельны полилинии (хотя это без разницы) главное чтоб они были полилиниями.
    1. Находим осевую средствами pltools.
    2. Ставим на начале осевой перпендикулярно еще одну полилинию которая границами будет выходить за пределы края дороги да же в самом широком месте.
    3. Строим массив вдоль пути (полученной осевой) с нужным шагом
    4. Взрываем его
    5. Кропим полученные полилинии
    6. Применяем лисп с видеоролика
    Работы на 5 минут - вы уже второй день лисп просите
     
    #1293
    zvezdochiot нравится это.
  14. zvezdochiot

    Форумчанин

    Регистрация:
    27 июн 2014
    Сообщения:
    6.016
    Симпатии:
    2.129
    Адрес:
    г. Москва
    #1294
  15. vladislav.blud

    Регистрация:
    23 сен 2021
    Сообщения:
    24
    Симпатии:
    0
    Спасибо, попробую этот вариант
     
    #1295
  16. vladislav.blud

    Регистрация:
    23 сен 2021
    Сообщения:
    24
    Симпатии:
    0
    А не могли бы вы отредактировать лисп, чтобы можно было не по одной полилинии клацать, а выбрать сразу все необходимые для проставления размеров? Или может такая версия уже есть?
     
    #1296
  17. X-Y-H

    X-Y-H Администратор
    Команда форума Форумчанин

    Регистрация:
    18 май 2007
    Сообщения:
    21.990
    Симпатии:
    7.207
    Адрес:
    Россия
    Вам же ответили 5000
     
    #1297
    zvezdochiot нравится это.
  18. vladislav.blud

    Регистрация:
    23 сен 2021
    Сообщения:
    24
    Симпатии:
    0
    За бесполезные хотелки, но эта полезная не только для меня, мне кажется. Клацать по одной линии, или выбрать сразу все и клацнуть раз... По моему это не хотелка, а очень даже нужная функция, которая есть у похожих лиспов. Но как обычно бывает, там нет того, что есть здесь и наоборот.
     
    #1298
  19. zvezdochiot

    Форумчанин

    Регистрация:
    27 июн 2014
    Сообщения:
    6.016
    Симпатии:
    2.129
    Адрес:
    г. Москва
    )))
    Я бы за "кажимось" сверх 5000 ещё столько же бы накинул.
     
    #1299
  20. BearDyugin

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

    Регистрация:
    30 ноя 2007
    Сообщения:
    2.762
    Симпатии:
    2.519
    Адрес:
    Сибирь
    Добавил команду: BD_put_dim_by_polylines
     

    Вложения:

    #1300
    Sergey B. нравится это.

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

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