Майки от BearDyugin shop ;)

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

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

Войти
  1. Доброго времени суток всем. Отключена личная переписка для только что зарегистрированных, в связи с массовой регистрацией СПАМ-ботов и рассылками. Форумчане, настоятельно просим, не переходите по ссылкам в личных переписках от женщин с «низкой социальной ответственностью», в т.ч. «перечисляющих» Вам деньги.
    Скрыть объявление

GR. My Lisp Apps

Тема в разделе "Autodesk", создана пользователем Alexandr-GR, 19 апр 2018.

  1. Alexandr-GR

    Форумчанин Форумчанин

    Регистрация:
    9 июн 2011
    Сообщения:
    1.084
    Симпатии:
    692
    Адрес:
    Новосибирск
    Попробую выкладывать свои наработки здесь.
    Не в ресурсах, во-первых, потому что лень все там разукрашивать,
    во-вторых приложения, в большинстве своем, небольшие,
    в-третьих все эти приложения делал под себя или конкретно под кого-то, поэтому, как правило, все они с малым набором настроек, а некоторые вообще без настроек. В общем подойдет не всем.
    Выкладывать буду для начала может быть раз в неделю, ну а там как пойдет.

    ---------------------------------

    grid_on_viewport - создать координатную сетку на видовом экране
    аналог маповской команды _MapLayoutReferenceSystem, за тем исключением, что не надо настраивать СК, но в тоже время можно настроить желаемое отображение самой сетки.
    Принцип простой масштаб делится на 10 и через полученное расстояние создаются линии сетки, оси подписываются.

    Смотреть gif (раскрыть)
    1.gif

    Запуск: GRDONVP
     

    Вложения:

    #1
    Последнее редактирование: 3 май 2018
  2. Alexandr-GR

    Форумчанин Форумчанин

    Регистрация:
    9 июн 2011
    Сообщения:
    1.084
    Симпатии:
    692
    Адрес:
    Новосибирск
    Набор для работы с текстом Text_on_Line.fas
    Функции для создания и ориентирования текста (подписей) по линии.

    ИЗМЕНИТЬ подпись ВДОЛЬ ЛИНИИ (раскрыть)

    1.gif

    СОЗДАТЬ подпись ВДОЛЬ ЛИНИИ (раскрыть)

    2.gif

    ПОСТАВИТЬ подпись ПО ЦЕНТРУ линии (раскрыть)

    3.gif
    Опция: Несолько (раскрыть)

    4.gif

     

    Вложения:

    #2
    Землянин1, i77artur, Alex_Shaton и 8 другим нравится это.
  3. Alexandr-GR

    Форумчанин Форумчанин

    Регистрация:
    9 июн 2011
    Сообщения:
    1.084
    Симпатии:
    692
    Адрес:
    Новосибирск
    Подписать площадь полилинии areapoly.fas
    Смотреть gif (раскрыть)
    areapoly_pre.gif
     

    Вложения:

    • areapoly.fas
      Размер файла:
      4,5 КБ
      Просмотров:
      12
    #3
  4. Alexandr-GR

    Форумчанин Форумчанин

    Регистрация:
    9 июн 2011
    Сообщения:
    1.084
    Симпатии:
    692
    Адрес:
    Новосибирск
    Копирование примитивов с переносом базовой точки CopyNext.fas
    Писал в свое время по просьбе Qvinto, сам практически не пользуюсь функцией. Видел есть аналоги, но может кому пригодится
    3HEmdeJVTT.gif
    ЗАПУСК: CNEXT
     

    Вложения:

    • CopyNext.fas
      Размер файла:
      2,7 КБ
      Просмотров:
      5
    #4
    Землянин1, i77artur, Qvinto и 3 другим нравится это.
  5. Alexandr-GR

    Форумчанин Форумчанин

    Регистрация:
    9 июн 2011
    Сообщения:
    1.084
    Симпатии:
    692
    Адрес:
    Новосибирск
    Экспорт выбранных примитивов в папку с исходным чертежом exp-select.lsp
    Смотреть gif (раскрыть)

    1.gif
     

    Вложения:

    • exp-select.lsp
      Размер файла:
      606 байт
      Просмотров:
      7
    #5
    Землянин1, Sergey B., Qvinto и 3 другим нравится это.
  6. Alexandr-GR

    Форумчанин Форумчанин

    Регистрация:
    9 июн 2011
    Сообщения:
    1.084
    Симпатии:
    692
    Адрес:
    Новосибирск
    Поворот меток и маркеров точек COGO по двум точкам. Rotate_COGO_1_1.fas
    --

    делал по просьбе одного форумчанина, сам не пользуюсь
    Смотреть gif (раскрыть)
    1.gif

    ---
    Запуск:
    CGLBLROT - поворот меток
    CGPNTROT - поворот маркеров
    CGROT - поворот и меток и маркеров
    --
    ! Некорректно работает в ПСК
     

    Вложения:

    #6
    Землянин1, i77artur, flareon и 2 другим нравится это.
  7. Alexandr-GR

    Форумчанин Форумчанин

    Регистрация:
    9 июн 2011
    Сообщения:
    1.084
    Симпатии:
    692
    Адрес:
    Новосибирск
    КОПИРОВАНИЕ СТИЛЕЙ ТОЧЕК COGO
    1.gif
     

    Вложения:

    • putCogoStl.fas
      Размер файла:
      1,8 КБ
      Просмотров:
      4
    #7
  8. Alexandr-GR

    Форумчанин Форумчанин

    Регистрация:
    9 июн 2011
    Сообщения:
    1.084
    Симпатии:
    692
    Адрес:
    Новосибирск
    1.gif
     

    Вложения:

    #8
    Землянин1, Alex_Shaton, chehoff и ещё 1-му нравится это.
  9. FOXXX591

    Форумчанин

    Регистрация:
    19 окт 2012
    Сообщения:
    2.093
    Симпатии:
    1.552
    Адрес:
    г.Смоленск
    Alexandr-GR, а можно полилинию по сегментам раскрасить? Например 2-ух цветной сделать?
     
    #9
  10. Alexandr-GR

    Форумчанин Форумчанин

    Регистрация:
    9 июн 2011
    Сообщения:
    1.084
    Симпатии:
    692
    Адрес:
    Новосибирск
    Можно, но это будут отдельные линии
     
    #10
    FOXXX591 нравится это.
  11. FOXXX591

    Форумчанин

    Регистрация:
    19 окт 2012
    Сообщения:
    2.093
    Симпатии:
    1.552
    Адрес:
    г.Смоленск
    Хорошо, если по другому нельзя.
     
    #11
  12. Alexandr-GR

    Форумчанин Форумчанин

    Регистрация:
    9 июн 2011
    Сообщения:
    1.084
    Симпатии:
    692
    Адрес:
    Новосибирск
    Запуск: COLSEGLINE
    Установить цвета: (GETCOL '(1 3 5))
    где 1 - красный, 3-зеленый, 5-синий (см. по палитре)
    цветов может быть сколько угодно
    1.gif
     

    Вложения:

    #12
    Землянин1, flareon, sergtor и 3 другим нравится это.
  13. Alexandr-GR

    Форумчанин Форумчанин

    Регистрация:
    9 июн 2011
    Сообщения:
    1.084
    Симпатии:
    692
    Адрес:
    Новосибирск
    ПОЛУЧИТЬ ОРДИНАТЫ ПОЛИЛИНИИ
    1.gif
    ЗАПУСК: GETORDPOLY
     

    Вложения:

    #13
    igor05rus, Alex_Shaton, Землянин1 и 3 другим нравится это.
  14. Тотошка47

    Форумчанин

    Регистрация:
    18 дек 2017
    Сообщения:
    30
    Симпатии:
    1
    Адрес:
    спб
    а куда и как подгрузить (положить) данный лисп, что бы он работал ? подскажи пожалуйста =)
     
    #14
  15. chehoff

    Форумчанин

    Регистрация:
    14 май 2012
    Сообщения:
    548
    Симпатии:
    82
    Адрес:
    Первый в мире, второй по Сибири
    --- Сообщения объединены, 30 июн 2018, Оригинальное время сообщения: 30 июн 2018 ---
    хоть куда кладешь. Потом -управление-загрузить приложение, потом вызов команды с ком.строки
     
    #15
    Мимокрокодил нравится это.
  16. Тотошка47

    Форумчанин

    Регистрация:
    18 дек 2017
    Сообщения:
    30
    Симпатии:
    1
    Адрес:
    спб
    chehoff, спасибо, уже разобрался =))
     
    #16
  17. Мимокрокодил

    Форумчанин

    Регистрация:
    29 янв 2013
    Сообщения:
    579
    Симпатии:
    283
    а сначала пытаться разобраться, а потом спрашивать, сложно? хоть лайкни человека...
     
    #17
    Qvinto нравится это.
  18. Alexandr-GR

    Форумчанин Форумчанин

    Регистрация:
    9 июн 2011
    Сообщения:
    1.084
    Симпатии:
    692
    Адрес:
    Новосибирск
    1.gif
     

    Вложения:

    #18
    igor05rus, Землянин1, chehoff и ещё 1-му нравится это.

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

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