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

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

  1. Добрый день
    Нужен лисп, который будет ставить точки (окружность, диаметр 0,4) в вершинах полилинии, подпишет вершины (однострочный текст, высота 1) 1А, 2А и т.д., поставит длины сторон (тоже однострочный текст) возле середины стороны. Рисунок прилагается.
    Был бы благодарен, если скинете lsp файл, чтобы я мог сам покрутить/изменить его, если понадобится
     

    Вложения:

    • 1.png
      1.png
      Размер файла:
      46,8 КБ
      Просмотров:
      29
  2. 1958

    1958 Форумчанин

    Попробуйте.
     

    Вложения:

    • 88.LSP
      Размер файла:
      3 КБ
      Просмотров:
      14
    SOYZNIK, bibizon и Steinar нравится это.
  3. VitBor

    VitBor Форумчанин

    Поставлена задача конвектировать shp (ArcView GIS 3.3) в dwg. Каждая линия имеет семантику ( ID, тип линии, параметры ( диаметр, глубина и т.д.).
    В итоге получаю полилинию с текстом соответствующего параметра привязанного к этой полилинии. Помогите пож. автоматом выбрать полилинии, если они содержат точку с соответствующим текстом и выровнить по ним сам текст. В наличии nanoCAD Plus 11, разрешено иногда пользоваться AutoCAD Electrical 2008 :) и собственно сам ArcView GIS 3.3.
     

    Вложения:

  4. trir

    trir Форумчанин

    аннотации в Map 3D делают это автоматически
     
    Qvinto нравится это.
  5. VitBor

    VitBor Форумчанин

    Да конечно, но я деньги на нанокад то выпросил с большим трудом (, и как то под сомнением, что mapcad может по условию идентичных аннотаций выделять объекты, хотя...., но трудиться после работы дома вечерами, как то не хочется....)
     
  6. Спасибо за файл
    Допилил под свои нужды
    Программа ставит размеры и нумерует вершины
    Работает корректно с замкнутыми полилиниями, вершины по часовой стрелке
     

    Вложения:

    • LabelBorder.LSP
      Размер файла:
      3,8 КБ
      Просмотров:
      16
    ninnnnnnr нравится это.
  7. 1958

    1958 Форумчанин

    Для "Спасибо" есть кнопка "Мне нравится"
     
    Steinar, bibizon и Qvinto нравится это.
  8. Ильшат

    Ильшат Форумчанин

    Здравствуйте гуру Автокада!
    Помогите разработать лисп, позволяющий автоматизировать следующие действия:
    Есть некий файл автокада с чертежами. в нем есть некий контур в виде прямоугольника, например, размерами 20*20единиц(контур 1), в пределах этого контура имеются несколько маленьких контуров, например размерами 5*5 единиц (контур 2). Причем эти контура находятся на непечатаемом слое.
    Я настраиваю виртуальный принтер с размерами листа, например, 20*20 единиц, в качестве рамки для печати выбираю контур 1 с масштабом, например 1*0.1; 1 полилинию из контура 2 перевожу на печатаемый слой, отправляю на печать, сохраняю файл с чертежом, полилинию 1 перевожу на непечатаемый слой, 2 полилинию из контура 2 перевожу на печатаемый слой и аналогично сохраняю файл. Таким образом перебираются все контура 2, после чего перехожу на следующий контур 1.
    Подробности могу разъяснить в личке/удаленное подключение/ватсапп/скайп.
    Готов рассмотреть вопрос соответствующего вознаграждения.
     
  9. Deleted member 111359

    Deleted member 111359 Только чтение

    Добрый вечер, помогите пожалуйста, есть вот что:
    Точки и рядом текст (наименование)
    Необходимо получить наименование, а строго под ним высоту точки без плюса выноской.
    Точек 1500...
    --- Сообщения объединены, 10 дек 2019, Оригинальное время сообщения: 10 дек 2019 ---
    С этим понятно, разобрался. Как теперь превратить наборы точка+текст в блоки? Т.е. чтобы каждая пара точка-текст была как единичный блок
     

    Вложения:

  10. ivsem

    ivsem Форумчанин

    Пробуй. Запуск программы, набрать число 11 и нажать Enter.
    1_2.jpg
    Вам нужно заменить точку и текст МД1 359 на блок из точки с атрибутом МД1 359 ?
     

    Вложения:

    • LeaderZ_01.lsp
      Размер файла:
      1,5 КБ
      Просмотров:
      4
  11. Ламаград

    Ламаград Форумчанин

    А для nanoCAD 5.1 они подходят?
     
  12. Steinar

    Steinar Форумчанин

    Здравствуйте!
    А возможно ли сделать так:
    • запускаем команду
    • выбираем 3Д-тело
    • в реальном времени в командную строку выводятся координаты ближайшей точки на поверхности тела к курсору мыши.
    Спасибо!
     
  13. barabashkasathalex

    barabashkasathalex Форумчанин

    С 3Д гранями можно
     
  14. Steinar

    Steinar Форумчанин

    Да, это можно провернуть для одной грани, но когда их много - получается сначала я должен найти ближайшую грань,
    а потом уже ближайшую точку принадлежащую этой грани.
    Осталось как-то быстро находить ближайшую 3Д-грань.
     
  15. barabashkasathalex

    barabashkasathalex Форумчанин

    Можно провернуть и для большого количества 3d граней (быстро)...
    Посмотрите видео, вам нужна такая функция?
     

    Вложения:

    • video.zip
      Размер файла:
      6,6 МБ
      Просмотров:
      13
    Sergey B. нравится это.
  16. Sergey B.

    Sergey B. Форумчанин

    Приятное дополнение. Стандартные средства civil показывают с задержкой. Где можно скачать такую надстройку?
     
    Qvinto нравится это.
  17. barabashkasathalex

    barabashkasathalex Форумчанин

    Пока нигде. Это команда из одной комплексной программы которая до сих пор в разработке.
     
  18. Steinar

    Steinar Форумчанин

    Что-то типа этого, но только и при вращении вида,
    без переключения на ПСК.
    *У вас это если на .NET то через PointMonitor реализовано.
     
  19. Sergey B.

    Sergey B. Форумчанин

    barabashkasathalex, когда планируете выпуск программы? Она будет бесплатная или платная? (Если платная, то какая ориентировочная цена?)
     
  20. barabashkasathalex

    barabashkasathalex Форумчанин

    Это на Lisp.
    Для вращения (3d виды) эта функция не годится. Только вид сверху.
     
  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление
  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление