Меню Рубрики

Полезные лиспы для автокада

LISP’ы – это микропрограммы, с помощью которых можно дополнить Autocad нужными функциями и избавится от рутинных операций.

Для того, чтобы начать пользоваться представленными LISP’ами, необходимо их загрузить.

Для этого необходимо проделать следующий порядок действий:

  1. Набрать в командной строке функцию appload
  2. Выбрать нужную программу
  3. Нажать кнопку «Загрузить»

Довольно часто исходные данные для проекта весят неоправданно много, что, конечно, влияет на производительность Autocad и, в итоге, на нашу скорость работы.

Перерыв массу различных вариантов был найден LISP с прозрачным названием cleandwg.lsp (Скачать CleanDWG (VLX, 0.01Mb)) Практика показывает, что он помогает в 99% случаев уменьшить вес вашего чертежа. Часто бывало что подложка от архитекторов весившая под 20 мб уменьшалась до размера менее 1 мб.

Порядок действий следующий:

  1. Загружаем LISP
  2. Вводим cleandwg в командной строке
  3. Выбираем параметры (обычно по умолчанию)

Правилом хорошего тона в проектировании является некое затенение подложки, относительно проектируемой системы. Синие санузлы в проекте пожарной сигнализации смотрятся совсем не эстетично, правда?

Классический способ перевода не очень нужного в один цвет является выделение всего (ctrl+A) и назначение нужного цвета. Но увы, в большинстве случаев это не работает т.к. цвет содержимого блоков может быть назначен «по слою», «по блоку» или же просто напрямую. В последнем случае придется открывать каждый блок и изменять цвет вручную. Это рутинная операция от которой есть лекарство и называется оно bgltools.lsp (Скачать bgtools (LSP, 0.24Mb))

Порядок действий следующий

  1. Загружаем LISP
  2. Набираем в командной строке bgcolor
  3. Выбираем нужный цвет и немного ждем
  4. Получаем готовые к работе планы

При прокладке кабеля в проекте используются функции «Отрезок» или «Полилиния», но что бы вы не применили, в любом случае, вам нужно будет знать сумму длин этих объектов для кабельного журнала и спецификации.

Вашему вниманию предлагается очень простой LISP, показывающий сумму длин выбранных отрезков. Алгоритм действий следующий:

  1. Загружаем программу
  2. Выбираем интересующие отрезки (например, функцией «выбрать подобные»)
  3. Набираем «elen» в командной строке и получаете сумму длин.

Адресация устройств в проекте является одним из самых трудозатратных и рутинных процессов при выполнении проекта. Рады представить вам универсальный инструмент нумерации любых элементов на чертеже – NumInc. Помимо стандартных функций нумерации он умеет строить массивы значений (актуально для таблиц), заменять существующий текст новым значением (используется, например, при нумерации листов проекта или замене скопированных адресов) и много чего ещё! Познакомиться с полным функционалом этого комбайна можно на сайте разработчика.

Минимальный алгоритм действий следующий

  1. Загружаем программу
  2. Вводим numinc
  3. Задаем Prefix, Middle и Suffix
  4. Выбираем инкремент
  5. Выбираем какая конкретно ячейка (Prefix, Middle или Suffix) будет увеличиваться на заданное значение при каждом клике мышью.
  6. Настраиваем параметры текста
  7. Кликаем ОК и нумеруем оборудование.

ИНН: 6432013311
ОГРН: 1026401185303

1988-2019 © ООО «ТД РУБЕЖ»
Все права защищены

источник

Более сорока лет назад разработан и внедрен в использование для выполнения целей искусственного интеллекта язык программирования LISP (ЛИСП), позднее ставший популярным среди пользователей ПО AutoCAD. Он создан для символьных вычислений. С течением времени был преобразован, чтобы соответствовать новым потребностям ИИ.

Начинающим пользователям, изучающим его архитектуру, рекомендуется рассматривать его в качестве формальной знаковой системы.

Это imperative language (императивный), действия которого описывают выполнение алгоритма, отличается от других, декларативных, предполагающих определение ограничений и соотношений в предметной сфере поставленной цели. По сравнению с другими подобными разработками С++ и FORTRAN, ЛИСП наделен большей функциональностью. Его популярность обусловлена большими возможностями для программирования в сочетании с мощным набором:

Это средства построения данных структур обозначения высокого уровня.

LISP синтаксис и семантика, разработанные программистами, обусловлены теорией рекурсивных функций. Символьные, s-выражения, являются элементами предложений, сочетаний. В них представлены софты и файлы. Они могут отображаться в виде списка (list) или атомов (atom).

Во втором варианте включены числовые комбинации, цифры, буквы латинского алфавита и знаки: *, -, +, /,@, %, , &, _, ,

Несколько поочередно идущих абзацев составляют каталог. Они обязательно разделяются пробелами и замыкаются в скобки.

Составляющими одних перечислений могут служить другие, более мелкие, подпункты. Символьные структуры разной формы и уровня сложности можно создавать благодаря произвольной углубленности и вложенности. Существует пустая строка, она обозначается – () и называется «nill». При возведении информационной структуры, а также при способе управления ею, она играет особенную роль, представляясь одновременно и атомом, и списком.

Язык LISP относится к языкам программирования, которые используются для создания дополнительных загрузок к ПО по проектированию и моделированию. Для их использования необязательно хорошо разбираться в компьютере на уровне профессионала.

После изучения основных принципов работы в таких пакетах, как AutoCAD или ZWCAD 2018 Professional, который является аналогом ACAD, появляется необходимость упростить выполнение длительных рутинных операций или полностью избавиться от них. Для этого дополнения и нужны. Если они написаны на ЛИСПе, скрипты называются LISP-приложения. Каждое из них представляет собой текстовый файл с определенным встроенным кодом для выполнения команды и подсказками от производителя. Определитесь с нужными для работы свойствами, выбирайте надстройку, скачивайте ее и загружайте в «ЗВКАД» или другую платформу. Рассмотрим возможности одного такого модуля на образце скрипта «Выравнивание текстов».

Приложение форматирует страницу горизонтально и вертикально по заданной точке. Это полезная возможность, непредусмотренная в основном ПО. Файл с расширением *.lsp открывается двумя кликами левой кнопки мыши. В окне появится «блокнот».

Чтобы сгладить и уподобить несколько напечатанных строк в готовом чертеже, обычно приходится выполнять однообразные действия много раз. Со скачанным скриптом это выполняется одной командой (в примере указана Z-TEXT-ALIGN).

Подобные дополнения полезны на любом этапе проектирования. Их существует очень много, но совсем необязательно устанавливать все. Перед скачиванием, посмотрите, подходит ли скрипт для выполнения нужных конкретных задач. Для каждой области написаны подходящие:

  • для инженерного проектирования в строительстве;
  • коммунальных структур, занимающихся планированием и укладкой сетей;
  • ЛИСПы Автокада для геодезистов.

После выбора нужного вложения возникает надобность его внедрения. Если речь идет об ACAD, для него доступны файлы с такими расширениями:

Помимо файлов lisp также поддерживается загрузка форматов:

На примере того же модуля для выравнивания текста рассмотрим, как подгрузить в основную программу его файл.

Обратите внимание: при скачивании архивированного лисп-приложения, распакуйте его, чтобы на ПК фрагмент сохранился перед загрузкой.

Этапы установки LISP (их можно отследить по истории):

  1. Перейдите по пути «Управление» – «Приложения» – «Загрузить».
  2. В командной строке основного ПО введите «_appload».
  3. В окне «Загрузка/Выгрузка» найдите файл с одним из вышеперечисленных расширений и кликните «Загрузить».
  4. Процедура завершена. Переходите к тестированию и написанию кода.

Важно: при каждом запуске базовой утилиты нажмите кнопку «Добавить» в разделе «Добавить в автозагрузку». Если этого не сделать, то будет выполнен единоразовый вход в модуль, который не сохраняется с закрытием софта.

В главном ПО их посмотреть невозможно, поэтому нужно обратиться к исходному файлу дополнения. Он открывается в «Блокноте», вверху которого находится название команды для запуска лиспа и вся необходимая информация для работы от его создателей. В примере указано z-text-align, что и нужно ввести в командную строку, чтобы вызвать нужный инструмент.

После этого, следите за указаниями вложения. Обычно такие скрипты интуитивно понятны и не требуют дополнительных разъяснений относительно дальнейших действий пользователя.

Обратите внимание: в случае отсутствия подобной подсказки, ищите ее в коде – в строке «defun c: z-text-align».

Вложения, написанные на диалекте, разработаны только для внедрения в полную версию ACAD и в схожие программы, например, ZWCAD 2018 Professional, NanoCAD, они не подгружаются. Для них существуют другие приложения.

С оператора defun начинается определение задач. С его помощью создают опции с переменными. Зависимо от назначения, каждая из них будет действовать по-разному.

Варианты, производимые этим оператором:

  • с префиксом «С:» (circle) – команда на выполнение s-выражения в сфере деятельности;
  • без приставки – их вычисления используются в теле программы-дополнения.

В каждом модуле, написанном этим диалектом, есть встроенный интерпретатор. Он выполняет вычисление введенных данных и возвращает их в программную среду для дальнейшей обработки. Готовые наработки передаются на высший уровень системы или сохраняются в переменной. Это значит, что скрипт получает информацию, когда ее вводит пользователь, или при самостоятельном выборе из существующей. Он сохраняет ее в переменную, и производит вычисления, включающие неизвестное значение и функцию.

Есть участок кода: (setq gh (+ 4 5)), где setq – одна из прописанных единиц. Она объявляет вариацию gh. В скобках знак + тоже опция, числа 4 и 5 – данные, которые были введены в систему. Значение выражения в gh сохранится, то есть 4+5 =9, gh=9. При заданном условии (setqhj (* gh 2), в результат hj сохраняется 18 – gh = 9, 9 умножить на 2 равно 18.

Синтаксис отличен от привычной большинству математики. Его порядок представлен сначала задачей, а потом переменными. В школьном счете это выглядит, как (3+2), а здесь (+ 3 2), однако, смысл одинаковый.

Список функций lisp, работа которых является основой дополнительных приложений:

  • для преобразования данных (float);
  • вычислений (fix);
  • организации циклов (if);
  • логические (and, nul,=, , or и другие);
  • арифметические (+, -,

При помощи этого программного диалекта создают новые уравнения 3-х классов:

Язык, который не позволяет этого – бесполезен. Часто используется LISP в геодезии, инженерии и строительстве, применяя надстройку «Автокада».

С помощью ЛИСП изучают рекурсивную функцию, используя такую возможность, как «трассировка». Это основной и весьма эффективный способ организации вычислений, повторяющихся несколько раз.

На входе в эту ячейку печатают значения входящих параметров, а на выходе появляются результаты, полученные в ходе операции. Для этого есть специальная опция класса FSURB, называемая TRACE. При ее успешном завершении, возвращается наименование задачи. При неудачном – возврат «NIil».

Пример включения рассматриваемой возможности SUMLIST и произведения математических манипуляций, суммирования элементов списка (1 2 3 4 5):

Обратите внимание на то, что ответ на поставленную задачку ведется в ином порядке – от последнего к первому.

Используемые только для AutoCAD (Автокад) LISP программы, устанавливаются исключительно на полноценную версию и не подходят по списку функций и команд для работы в пакетах типа Autodesk LT, Electrical, Mechanical. Исключений немного, ими выступают специальные разработки типа LT Extender, с типом расширения *.arx, *.lsp.

источник

После освоения основных принципов работы в AutoCAD возникает необходимость избавиться от рутинных операций, которые, в зависимости от специфики выполняемых задач, могут занимать много времени. Для этого существует дополнительные приложения, написанные на языке программирования LISP. Отсюда и происходит название скриптов: лисп-приложения.

Если тема программирования далека от вас не стоит расставаться. Все основные LISP-приложения уже давно разработаны для Автокада. Все что вам остается сделать – это определиться, какие команды или функции будет вам полезны, после чего скачать само приложение и загрузить его в AutoCAD.

LISP-приложение – это ничто иное как текстовый файл, который содержит подсказки от разработчиков, а также определенный код для выполнения команды. Файл имеет расширение *.lsp, а открыть его можно стандартным способом, кликнув дважды ЛКП по нему. Откроется «Блокнот».

Давай рассмотрим конкретный пример. Возьмем LISP, который позволяет выравнивать текст в Автокаде по вертикали или горизонтали относительно указанной точки . Скачать скрипт: Выравнивание текстов.lsp

Согласитесь, команда весьма полезная, однако по умолчанию такой инструмент не предусмотрен. Если перед вами стоит задача выровнять 5-10 текстовых строк в чертеже, то на это уйдет определенное время, а главное, вы будете повторять одни и те же действия несколько раз. А вот, как эти действия можно выполнить одной командой (в данном случае Z-TEXT-ALIGN ).

Как видно, ЛИСП-программы для Автокада могут быть полезны на различных этапах выполнения проекта. Также следует учитывать специфику выполняемых работ. Так существуют лиспы для Автокада для геодезистов или проектировщиков, использование которых характерно для конкретной области.

Нет никакого смысла устанавливать все скрипты, которые вы найдете в интернете. Сначала ознакомьтесь, какую функцию они выполняют, а затем задайте себе вопрос «Можно ли это Lisp-приложение адаптировать к вашей работе?».

Выше мы уже рассмотрели, что из себя представляет LISP-приложения для AutoCAD. Теперь давайте рассмотрим, как его внедрить в работу.

Для Автокада доступны приложения со следующим расширением файла: *.arx, *.crx, *.lsp, *.dvb, *.dbx, *.vlx, *.fas. Рассмотрим на примере ЛИСПа, который позволяет выравнивать текст относительно указанной точки по оси X или Y (скачать файл «Выравнивание текста .lsp»).

Если вы скачиваете LISP-приложение, которое было запаковано в архив, обязательно разархивируйте его, чтобы сам файл перед загрузкой хранился на вашем компьютере.

  1. Перейдите во вкладку «Управление» и на панели «Приложения» выберите команду «Загрузить приложение». Можно воспользоваться командной строй в Автокаде и ввести «_appload».
  2. Откроется диалоговое окно «Загрузка/выгрузка приложений», через которое вам нужно найти подходящий файл с расширением *.lsp или др, которое было перечислено выше.
Читайте также:  Кедровые орехи чем полезные

Чтобы файл загружался каждый раз при запуске Автокада в разделе «Автозагрузка» также необходимо указать путь к этому скрипту (кнопка «Добавить»). В противном случае вы выполните одноразовую загрузку, которая не сохранится при закрытии программы.

3. После проделанных действий нажмите кнопку «Загрузить».

4. После того как внизу этого диалогового окна появиться сообщение об успешной загрузке, можно тестировать установленное приложение. Нажмите кнопку «Закрыть».

В AutoCAD lisp команды посмотреть нельзя. Следует отталкиваться от исходного файла, который был загружен в программу.

Ранее мы говорили, что файл скрипта можно открыть через обычный «Блокнот». Как правило, в самом верху этого текстового документа разработчики оставляют всю необходимую информацию для работы, в том числе и название команды, которая будет запускать ЛИСП. В данном примере это «z-text-align», поэтому в командную строку нужно вводить именно такой запрос для вызова инструмента.

Если автор не оставил подсказку с названием команды, то вы ее можете найти в коде. Она будет находиться в строчке «defun c: z-text-align», как показано на рис. 4.

Далее следуйте указаниям командной строки и пошагово выполняйте запросы установленного скрипта. Как правило, все достаточно интуитивно понятно.

С вопросом: «Как установить лисп в Автокад» все понятно. Но, как его загрузить в схожие программы, например, Автокад Electrical/Mechanical?

К сожалению, приложения, написанные на AutoLISP, работают только на полной версии программы AutoCAD. Поэтому такие скрипты нельзя внедрить в AutoCAD LT или др. версии.

Исключением могут являться специализированные приложения типа LT Extender и подобные ему, которые были разработаны чтобы запускать файлы *.lsp или *.arx непосредственно в среде Автокад LT.

Создание кнопки в Автокаде необходимо, когда вы используете сторонние приложения lisp и скрипты. Это связано с тем, что не всегда удобно обращаться к инструменту через командную строку, особенно если вы часто пользуетесь какой-то опцией.

Ранее мы рассмотрели, что из себя представляют LISP-приложения для Автокада и как загружать дополнительные скрипты. Осталось узнать, как создать кнопку в Автокаде с новой командой и разместить ее на ленте для быстрого доступа.

Однако создание кнопки доп. скрипта имеет некоторые нюансы, которые мы сейчас разберем.

Чтобы добавить кнопку в Автокад для новой команды, которая была загружена в программу, нужно:

  1. Прописать путь к файлу, который содержит загружаемое приложение. Напомню, такие файлы могут иметь расширение *.arx, *.crx, *.lsp, *.dvb, *.dbx, *.vlx, *.fas.

Для этого вызовите диалоговое окно «Настройки» (можно через командную строку «_options»). Перейдите во вкладку «Файлы», выберете папку «Доверенные местоположения». Затем нажмите кнопку «Добавить». Появится дополнительное поле, в котором необходимо прописать путь. Далее нажмите «Обзор». Найдите на компьютере папку, в которой хранятся ваши файлы-lisp. После того как путь пропишется в этом диалоговом окне, нажмите ОK.

До 2013 версии Автокада папка «Доверенные местоположения» отсутствовала. Если у вас более ранняя версия программы — используйте папку «Путь доступа к вспомогательным файлам». При этом обязательно не забывайте нажать кнопку «Добавить», чтобы не сбить настройки AutoCAD по умолчанию. В противном случае вы можете случайно заменить доступ к системной папке, что повлечет последствия!

  1. Вызвать окно адаптации пользовательского интерфейса Автокад (можно через командную строку «_СUI»). Создать новую команду.

Задать ее название, а также макрос. Если с именем все понятно, то код макроса следует искать в самом файле приложения. Напомним, открыть его можно через обычный блокнот.

Далее выберите иконку для кнопки. Можно создать свою или отредактировать уже имеющуюся картинку.

  1. Заключительныйэтап создания новой кнопки для AutoCAD – это размещение ее в ленте программы. Для этого нужно воспользоваться поиском: найти вновь созданную кнопку после чего захватить ее левой кнопкой мыши и переместить в подходящую панель. В этом примере: ACAD → Лента → Панели → Главная 2D Рисование → Строка 3.

источник

На этой странице будут выкладываться примеры LISP программ. По многим из них есть уроки с подробным описанием кода.

Если Вы знаете как запускать LISP программы в AutoCAD, то можете сразу перейти к списку программ .

Все программы написаны для использования их в полной версии программы AutoCAD. Они не будут работать в AutoCAD LT.

Если Вам понравилась какая-либо программа на этом сайте и Вы хотите ее установить на свой компьютер. Для этого Вам нужно сделать следующее:

1. Скачать программу на свой компьютер;

2. Все программы заархивированы. Поэтому после того, как вы скачали архив, его нужно разархивировать. Разархивировав архив, Вы получите файлы программы, которые можете хранить в любом месте на вашем компьютере (Я для этого использую папку D:\MyLisp);

3. Файлы программы нужно загрузить в AutoCAD;

4. Запускаем новые команды, которые хранятся в загруженных файлах.

Я думаю, что с первыми двумя пунктами справятся все. Поэтому сразу поговорим о загрузке LISP файлов в Автокад.

Загрузить в Автокад LISP программу можно несколькими способами. Опишу некоторые из них.

Откройте Автокад. На ленте перейдите на вкладку « Управление » и щелкните по кнопке « Приложение ». См. Рис. 1.

Если вы работаете в режиме Классический AutoCAD:

В главном меню выберите « Сервис », далее щелкните по строчке « Приложения… ». См. Рис. 2.

Откроется окно «Загрузка / Выгрузка приложений».

Найти папку , в которой лежит файл, выделите его и нажмите на кнопку « Загрузить ». См. Рис. 3.

Рис. 3. «Загрузка / Выгрузка приложений»

Внизу окна появится сообщение о том, что выбранный файл загружен. Обратите внимания, что данным способом можно загружать не только LISP файлы (*.lsp), но и другие приложения поддерживаемые программой AutoCAD ( *.arx; *.crx; *.dvd; *.dbx; *.vlx; *.fas ).

Таким способ загружают программы для их временного использования. После того, как Вы закроете Автокад, а потом откроете его снова, их не будет в Автокаде, и для их использования их нужно загрузить снова.

Для того, чтобы нужны Вам LISP файлы загружались в Автокад автоматически, их нужно добавить в список автоматической загрузки. Для этого щелкаем на портфельчик « Автозагрузка » (или на кнопку « Приложения » под ним). Откроется окно «Автозагрузка», в котором нажимаем на кнопку « Добавить ». См. Рис. 4.

Откроется окно «Добавление файла в список автоматической автозагрузки». Находим нужную папку , выделяем файл и нажимаем на кнопку « Открыть ». См. Рис. 5.

Рис. 5. Добавление файла в список автоматической автозагрузки

В окне «Автозагрузка» появится строка с файлом , который будет автоматически загружаться при каждом запуске Автокад.

После того, как Вы добавите все необходимые файлы, нажмите на кнопку « Закрыть ». Затем на кнопку « Закрыть » в окне «Загрузка / Выгрузка приложений». См. Рис. 6.

Имейте в виду, что файлы загрузятся автоматически, только при следующем запуске Автокад. Если Вы хотите использовать их в текущей сессии, их нужно загрузить способом, описанным выше (либо каким другим способом).

Откройте Редактор Visual LISP:

Наберите в командной строке VLIDE (или VLISP) и нажмите .

Или на ленте перейдите на вкладку « Управление » и нажмите на кнопку « Редактор Visual LISP ». См. Рис. 7.

Рис. 7. Редактор Visual LISP

Откроется Редактор Visual LISP. Нажмите на кнопку « Открыть файл ». Появится окно «Открытие файла для редактирования / просмотра».

Выделите файл и нажмите на кнопку « Открыть ». См. Рис. 8.

Рис. 9. Открытие файла в Редакторе Visual LISP

Файл загрузится в активное окно редактора. Чтобы загрузить его в Автокад, нужно нажать на кнопку « Загрузить активное окно редактора ».

Такой способ имеет свои плюсы, связанные с тем, что Вы видите программный код файла:

1. Вы можете посмотреть, сколько команд в этом LISP файле (их может быть несколько).

2. Найти имена этих команд: находим строку с функцией defun; Имя команды стоит сразу после с: (в нашем случаи это: 3d_tro и roY );

3. Кроме всего прочего Вы имеете возможность отредактировать код программы.

Чтобы определить границы команды в программном коде, поставьте курсор мыши перед открывающейся скобкой функции defun и дважды щелкните левой кнопкой мыши. Функция defun, которая описывает одну команду – выделиться. См. Рис. 10.

Рис. 10. Программный код одной команды

После того, как файлы загружены, мы может запускать в Автокад новые команды, которые хранятся в этих файлах. Для этого достаточно набрать ИМЯ КОМАНДЫ в командной строке и нажать Enter >.

Кроме этого для любой команды можно создать кнопку.

Поместить ее на панель инструментов, а панель вынести на ленту.

После этого запускать команду, нажимая на эту кнопку.

Также для этих команд можно создать горячие клавиши и запускать их нажатием определенных клавиш на клавиатуре.

Как это сделать читайте в уроке: « Горячие клавиши Автокад ».

Конечно, мы разобрали далеко не все способы загрузки файлов и запуска команд, но этого в полнее достаточно для того, чтобы комфортно использовать LISP программы размещенные ниже.

Программа, которая рисует в Автокад куб со сторонами 200.

Для запуска в Автокад используется имя MP_KUB

После запуска выдает запрос: “ Укажите базовую точку ».

Указываем любую точку в рабочем окне Автокад. Команда построит куб со сторонами 200 .

Подробное описание программного кода смотрите в уроке: « Пример простой программы на LISP ».

Скачать программу Mp_kub.lsp (Размер файла: 449 bytes)

LISP программа «mp_paral.lsp»

Программа рисует параллелограмм, со сторонами указанными в диалоговом окне. Программа работает только вместе с файлом диалогового окна « mp_paral.dcl ». Поэтому скачать надо два файла.

Чтобы Автокад определил местонахождение файла диалогового окна, его нужно поместить в папку вспомогательных файлов Автокад.

Либо в коде программы, в строке

( setq dcl_id ( load_dialog «mp_paral.dcl» )) нужно указать полный путь к файлу диалогового окна.

Например, если файл находиться в папке « D:\MyLisp » строка должна выглядеть так:

( setq dcl_id ( load_dialog «D:\\MyLisp\\mp_paral.dcl» ))

Для запуска в Автокад используется имя MP_PARAL

После запуска на экране появится диалоговое окно.

Нужно указать размеры сторон параллелограмма и нажать на кнопку ОК .

Далее появится запрос: “ Укажите базовую точку ».

Указываем любую точку в рабочем окне Автокад. Команда построит параллелограмм со сторонами указанными в диалоговом окне.

Подробное описание программного кода смотрите в уроке: « Пример программы LISP с диалоговым окном ».

Подробное описание программного кода создания диалогового окна смотрите в уроке: « Диалоговое окно ».

Скачать диалоговое окно Mp_paral.dcl (Размер файла: 392 bytes)

Скачать программу Mp_paral.lsp (Размер файла: 781 bytes)

Программа считает сумму длин выбираемых отрезков. В процессе выбора отрезков Автокад выдает количество выбранных отрезков и сумму их длины.

Для запуска в Автокад используется имя SumDl

После запуска выдает запрос: « Выберите отрезок »:

Он выделится. В командной строке появиться сообщение, что выбран один отрезок и его длина.

Ниже снова появиться запрос: « Выберите отрезок »:

Укажите следующий отрезок.

Он выделится. В командной строке появиться сообщение о количестве выбранных отрезков и их общей длины.

Ниже снова появиться запрос: « Выберите отрезок »:

Количество выбранных отрезков и их общая длина.

И так до бесконечности. Чтобы завершить выполнения программы нажмите клавишу Esc >.

Подробное описание программного кода смотрите в уроке: « Пример AutoLISP программы: Сумма длин отрезков ».

Скачать программу Sum_dl.lsp (Размер файла: 464 bytes)

LISP программа «Sum_dls.lsp»

Программа суммы длин со свободным выбором отрезков.

Программа считает сумму длин выбираемых отрезков.

Выбор отрезков можно делать и по одному и группой при помощи рамки (или при помощи секущей рамки). В общем, любым стандартным способом AutoCAD.

Для запуска в Автокад используется имя: SumDls

После запуска программа выдает запрос: « Выберите объекты »:

Выбирать отрезки можно любым стандартным способом Автокад. Если случайно выбран не тот отрезок, его выбор можно отменить. Для этого удерживая клавишу Shift >, щелкните по нему. Этот отрезок будет исключен из выбора.

Процесс выбора и отмены выбора отрезков отражается в командной строке.

После того как вы выбрали все необходимые объекты, нажмите Enter >, чтобы завершить выбор.

В командной строке появиться сообщение о количестве выбранных отрезков и их общей длины.

Результат выполнения программы.

Подробное описание программного кода смотрите в уроке: « Примеры LISP программ: Сумма длин отрезков ».

Читайте также:  Чем полезен чеснок и чем вреден

Скачать программу Sum_dls.lsp (Размер файла: 487 bytes)

LISP программа «Sum_dlv.lsp»

Программа считает сумму длин отрезков на всем чертеже.

Для запуска в Автокад используется имя: SumDlv

После запуска программа выделить на чертеже все отрезки

В командной строке появиться сообщение о количестве отрезков на все чертеже и их общей длины.

Результат выполнения программы.

Подробное описание программного кода смотрите в уроке: «Примеры LISP программ: Сумма длин отрезков».

Скачать программу Sum_dlv.lsp (Размер файла: 440 bytes)

Программа считает сумму длин отрезков на выбранном слое.

Для запуска в Автокад используется имя: SumSl

После запуска программа выдает запрос: « Выберите объект для определения слоя: “

Укажите любой объект. Программа выделит и сосчитает длину все отрезков на слое, на котором расположен указанный объект.

В командной строке появиться сообщение о количестве отрезков на данном слое и их общей длины.

Результат при выборе синего слоя.

Подробное описание программного кода смотрите в уроке: «Примеры LISP программ: Сумма длин отрезков».

Скачать программу Sum_sl.lsp (Размер файла: 563 bytes)

Программа показывает, как в программном коде AutoLISP можно использовать стандартные команды Автокад.

  • Построения отрезка.
  • Построения дуги.
  • Использования команды редактирования: Зеркало
  • Перевода чертежа ЮЗ изометрию.
  • Построения Полуконуса.

Для запуска в Автокад используется имя: SCOM

После запуска программа выдает запрос: “ Укажите базовую точку ».

Указываем любую точку в рабочем окне Автокад. Команда построит два отрезка и дугу. Затем отзеркалит их. Потом переведет чертеж ЮЗ изометрию и построит Полуконус.

Подробное описание программного кода смотрите в уроке: « AutoLISP. Стандартные команды Автокад ».

Скачать программу Scom.lsp (Размер файла: 535 bytes)

LISP программа «mp_kub2.lsp»

Программа создает блок куба, стороны которого предварительно задаются.

Для запуска в Автокад используется имя MP_KUB2

После запуска выдает запрос: « Задайте длину стороны куба : »

Введите числовое значение стороны куба и нажмите Enter >

Появиться запрос: “ Укажите базовую точку ».

Указываем любую точку в рабочем окне Автокад. Команда построит блок в виде куба со сторонами, значение которых мы задали при первом запросе.

Подробное описание программного кода смотрите в уроке: « AutoLISP. Создание блока ».

Скачать программу Mp_kub2.lsp (Размер файла: 802 bytes)

LISP программа «mp_kub3.lsp»

Программа создает блок куба при помощи функций расширения языка AutoLISP, стороны которого предварительно задаются. В программе вычисляется объем куба, и координаты центра верхней грани. Объем и координаты сохраняются, как дополнительные данные, которые в любой момент можно извлечь.

Для запуска в Автокад используется имя: MP_KUB3

После запуска программа выдает запрос: « Задайте длину стороны куба : »

Введите числовое значение стороны куба и нажмите Enter >

Появиться запрос: “ Укажите базовую точку ».

Указываем любую точку в рабочем окне Автокад. Команда построит блок в виде куба со сторонами, значение которых мы задали при первом запросе. Так же программа сосчитает объем, и координаты центра верхней грани и сохранить их в блоке в качестве дополнительных данных.

Подробное описание программного кода смотрите в уроке: « LISP. Создание блока ».

Скачать программу Mp_kub3.lsp (Размер файла: 993 bytes)

Программа считывает дополнительные данные из блока, созданного в уроке: «LISP. Создание блока». Вставляет динамический блок, созданный в уроке: « Создание динамического блока ».

Для того, чтобы посмотреть как работает программа предварительно нужно:

  • Скачать программу « mp_kub3.lsp », и создать при помощи ее блок (или несколько блоков).
  • Скачать динамический блок « Vyn.dwg ».
  • Поместить « Vyn.dwg » в папку вспомогательных файлов Автокад.

Как это сделать смотрите в уроке: «Пример программы LISP с диалоговым окном» (или в программе lsp вместо имени файла «Vyn» нужно будет указать полный путь к нему. Например: если файл лежит в папке «D:\MyLisp» нужно поставить «D:\\MyLisp\\ Vyn.dwg « )

Для запуска в Автокад используется имя: UDIM

После запуска программа выдает запрос: « Выберите блок :»

Укажите предварительно построенный блок (созданный программой mp_kub3.lsp ).

Команда вставит выноску. Выноска будет начинаться из центра верхней грани. Сверху полки будет стоять имя указанного блока, снизу – его объем.

Далее программа снова выдает запрос: « Выберите блок: »

Что завершит программу нажмите Esc >.

Подробное описание программного кода смотрите в уроке: «Вставка динамического блока из LISP-программы».

Скачать программу Mp_kub3.lsp (Размер файла: 993 bytes)

Скачать динамический блок (Размер файла: 30 kB)

Скачать программу Udim.lsp (Размер файла: 538 bytes)

Программа считывает дополнительные данные из блока, созданного в уроке: « LISP. Создание блока ». Вставляет динамический блок, созданный в уроке: «Создание динамического блока». Меняет длину и положение выносной линии и длину и положение полки.

Для того, чтобы посмотреть как работает программа предварительно нужно:

  • Скачать программу « mp_kub3.lsp », и создать при помощи ее блок (или несколько блоков).
  • Скачать динамический блок « Vyn.dwg ».
  • Поместить « Vyn.dwg » в папку вспомогательных файлов Автокад.

Как это сделать смотрите в уроке: « Пример программы LISP с диалоговым окном » (или в программе lsp вместо имени файла «Vyn» нужно будет указать полный путь к нему. Например: если файл лежит в папке « D:\MyLisp » нужно поставить «D:\\MyLisp\\ Vyn.dwg « )

Для запуска в Автокад используется имя: UDIM2

После запуска программа выдает запрос: « Выберите блок: »

Укажите предварительно построенный блок (созданный программой mp_kub3.lsp ).

Появится начало выносной линии

Далее программа выдает запрос: « Укажите выносную линию: »

Нужно указать вторую точку выносной линии. Команда вставит выноску. Сверху полки будет стоять имя указанного блока, снизу – его объем.

Затем программа снова выдает запрос: « Выберите блок: »

На запрос « Укажите выносную линию: »

Укажите вторую точку линии в другом месте.

На следующий запрос « Выберите блок : » – нажмите Esc >.

Программа нарисует две выноски к одному блоку.

Подробное описание программного кода смотрите в уроке: «Изменение динамического блока из LISP-программы».

Скачать программу Mp_kub3.lsp (Размер файла: 993 bytes)

Скачать динамический блок (Размер файла: 30 kB)

Скачать программу Udim2.lsp (Размер файла: 856 bytes)

Программа содержит в себе две команды

Первая команда рисует в Автокад 3D тройник.

Для запуска в Автокад используется имя: 3D_TRO

После запуска выдает запрос: “ Укажите базовую точку ».

Указываем любую точку в рабочем окне Автокад. Команда построит 3D тройник.

Вторая команда поворачивает 3D тройник на 90 градусов вокруг оси параллельной оси Y.

Для запуска в Автокад используется имя: ROY

Предварительно выделите 3D тройник

Введите в командной строке ROY и нажмите Enter >.

Подробное описание программного кода смотрите в уроке: «3D моделирование в AutoCAD».

Скачать программу 3d_tro.lsp (Размер файла: 927 bytes)

LISP программа « 3d_bolt.lsp»

Программа рисует в Автокад 3D болт.

Для запуска в Автокад используется имя: 3D_BOLT

После запуска выдает запрос: “ Укажите базовую точку ».

Указываем любую точку в рабочем окне Автокад. Команда построит 3D болт.

Подробное описание программного кода смотрите в уроке: «3D моделирование. Болт с резьбой.».

Скачать программу 3d_bolt.lsp (Размер файла: 1.02 kB)

Здравствуйте. как можно к вам обратиться для написания программы для автокада?

Здравствуйте! Как можно посчитать суммарно объемы всех выделенных тел? Выборка сделана через быстрый выбор по цвету.
И где можно взять информацию по аргументам функций автокада, например как забрать через Лисп аргумент объем из «Измеритьгеом». Хотя бы методологию поиска, можно?
Спасибо!

Неважно каким образом Вы выделите 3Д-тела. После того как они выделены, запускаем функцию (ssget). Получаем набор выделенных 3Д-тел. Сохраняем его в переменную set_obj

Загружаем функции расширения LISP

Организуем цикл, в котором перебираем по порядку все выбранные 3Д-тела.
Внутри цикла:
Переводим 3Д-тела в vla-объекты:

источник

Адаптация Автокада. Лисп программы.

Здесь, по мере готовности, будут выложены для скачивания результаты моих трудов в области адаптации Автокада. Работаю в машиностроительной отрасли, поэтому адаптация будет с «машиностроительным уклоном». Я не навязываю Вам свой стиль работы, а просто предлагаю «что есть» и «как есть».

Раздел I : Отрисовка катаных и гнутых профилей.

В отличие от существующих аналогичных программ здесь нет привязки к ГОСТу. За основу берутся только геометрия и размеры профиля. ГОСТЫ могут изменяться со временем, а уголок всегда останется уголком а швеллер-швеллером. Поэтому программа вряд ли устареет и ее не придется модифицировать. А самое главное — имеется возможность интерактивного ввода геометрии профиля (т.е. при появлении нового типоразмера или модификации профиля пользователь может не прибегая к услугам программиста занести в список новый типоразмер профиля или удалить из списка ненужный профиль).Это ускоряет работу, так как конструктору не приходится ползать по длинным спискам стандартных профилей, он может сохранить в списке только те профили, с которыми работает Ваша фирма.

1. Двутавр катаный : СКАЧАТЬ. (обновленная версия от 25.12.10)

2. Двутавр катаный с возможностью изменения уклона полок: СКАЧАТЬ. (обновленная версия от 25.12.10)

3. Двутавр катаный с прямыми полками: СКАЧАТЬ. (обновленная версия от 25.12.10)

4. Замкнутый профиль (прямоугольная труба): СКАЧАТЬ. (обновленная версия от 25.12.10)

5. Уголк катаный равнополочный: СКАЧАТЬ. (обновленная версия от 25.12.10)

6. Уголк катаный неравнополочный: СКАЧАТЬ. (обновленная версия от 25.12.10)

7. Уголк гнутый: СКАЧАТЬ. (обновленная версия от 25.12.10)

8. Швеллер гнутый: СКАЧАТЬ. (обновленная версия от 25.12.10)

9. Швеллер катаный с уклоном полок: СКАЧАТЬ. (обновленная версия от 25.12.10)

10. Швеллер катаный с параллельными гранями полок: СКАЧАТЬ (обновленная версия от 25.12.10)

11. Круглая труба: СКАЧАТЬ. (обновленная версия от 25.12.10)

Раздел II: Прочие отрисовки.

1. Шпоночное соединение: СКАЧАТЬ. ( версия от 10.03.11)

2. Изображение резьбы: СКАЧАТЬ. ( версия от 10.05.11)

3. Развертка цилиндра, усеченного плоскостью: СКАЧАТЬ. (версия от 10.07.11)

4. Развертка усеченного кругового конуса: СКАЧАТЬ. (версия от 27.07.11)

5. Врезка патрубка в плоскую стенку: СКАЧАТЬ. (версия от 04.08.11)

6. Отрисовка пружин: СКАЧАТЬ. (версия от 03.10.11)

7. Отрисовка ограждений (металлоконструкции): СКАЧАТЬ. (версия от 11.10.11)

8. Отрисовка лестниц (металлоконструкции): СКАЧАТЬ. (версия от 11.10.11)

9. Отрисовка площадок (металлоконструкции): СКАЧАТЬ. (версия от 11.10.11)

10. Отрисовка перил лестниц (металлоконструкции): СКАЧАТЬ. (версия от 24.01.12)

11. Отрисовка овального паза: СКАЧАТЬ. (версия от 19.02.12)

12. Развертка патрубка, примыкающего к трубе большего диаметра под углом со смещением (смещение может быть нулевым): СКАЧАТЬ. (версия от 23.03.12)

13. Развертка патрубка, примыкающего к конусу (оси параллельны): СКАЧАТЬ. (версия от 03.10.12)

14. Развертка конуса, пересеченного патрубком (оси параллельны): СКАЧАТЬ. (версия от 03.10.12)

15. Развертка конуса со смещенным основанием: СКАЧАТЬ. (версия от 16.10.12)

16. Развертка перехода с прямоугольника на круг (со смещением): СКАЧАТЬ. (версия от 26.10.12)

Раздел III: Оформление чертежа.

Для нормальной работы программ с «текстовым сопровождением», а это будут: программа вставки форматок, работа со спецификацией и другие программы по оформлению чертежей Вам необходимо скачать шрифт » fnt .shx» и поместить его в папку «Fonts» Вашего Автокада.

Все программки, которые будут помещены в этот раздел работают с текстовым стилем «STANDARD», шрифт — вышеупомянутый FNT.SHX , высота текста обязательно НУЛЕВАЯ. (это пользователю нужно сделать в настройках текстового стиля — да простят меня боги за такой варварский подход). Конечно можно подцепить и другой шрифт, но при этом нормальная работа программ не гарантирована. Высота текста связана с системными переменными LTSCALE. или DIMSCALE ( для удобства оформления чертежа в пространстве модели). И еще: » клавишники» будут разочарованы, так как все сделано с «мышиным» уклонам.

1. Вставка форматок (в пространство модели и листа): СКАЧАТЬ. (обновленная версия от 11.01.11)

2. Создание спецификации: СКАЧАТЬ. (обновленная версия от 10.02.11)

3. Создание спецификации на 3 исполнения: СКАЧАТЬ. ( версия от 30.03.11)

4. Обозначение сварных швов: СКАЧАТЬ. (обновленная версия от 01.02.11)

5. Нанесение тех. требований и других надписей: СКАЧАТЬ. (обновленная версия от 21.01.11)

6. Нанесение обозначений разрезов и местных видов: СКАЧАТЬ. (обновленная версия от 25.12.10)

7. Нанесение обозначений шероховатости поверхности: СКАЧАТЬ. (обновленная версия от 2 8 .12.10)

8. Нанесение позиций на сборочном чертеже: СКАЧАТЬ. (обновленная версия от 28.12.10 )

Раздел IV: Полезные программы других авторов.

ПРОДОЛЖЕНИЕ СЛЕДУЕТ. ПРОДОЛЖЕНИЕ СЛЕДУЕТ. ПРОДОЛЖЕНИЕ СЛЕДУЕТ.

источник

Вы нашли полезный для себя код на Лиспе который делает различные штуки и хотите его использовать. Как заставить его работать? Можно выделить 3 шага.

1. Сохранение программного кода на своем компьютере.

2. Загрузка файла в AutoCAD.

3. Запуск приложения (Лиспа).

Примечание: AutoLISP программы могут быть запущены только на полной версии Автокада, они не работают под AutoCAD LT. (исключая случаи загрузки дополнительных приложений типа LT Extender и ему подобных, которые специально разработаны для запуска lisp и (или) arx приложений в среде AutoCAD LT.)

Читайте также:  Полезные советы при выборе кухни в картинках

Если код выложен на сайте, а не отдельным файлом, делаем так, с помощью курсора выделяем этот код и копируем его, нажав правую кнопку мыши и выбрав пункт Копировать (или Ctrl+C).
Запускаем «Блокнот» и вставляем наш код с помощью меню Правка → Вставить (или Ctrl+V). Получим примерно такое:

И сохраняем файл. Файл можно назвать, как вам нравится, но расширение у него должно быть .LSP. Правильнее (но не обязательно) будет назвать файл так же, как названа команда в найденном Вами коде. Команде всегда предшествует префикс C: после слова defun. В примере выше видно, что команду назвали OFF2, соответственно файл называем off2.lsp. Таким образом, мы можем избежать беспорядка, т.к. будем знать, что в файле off2.lsp находится команда OFF2.
Иногда в коде представлено несколько функций. Необходимо найти «главную». Такая функция либо имеет префикс С: либо сам автор кода уточняет как использовать. В случае нескольких «главных» имя файла не имеет никакой разницы.

Файл сохранили или скачали уже готовый и запускаем Автокад. Выбираем Сервис → AutoLISP → Приложения. ( Tools → AutoLISP → Load ) или набираем в командной строке _appload.
Мы должны увидеть диалоговое окно как представлено ниже:

1. Перейдите к папке, куда Вы сохранили lisp файл.

2. Выберите файл, который Вы хотите загрузить из списка.

3. Нажмите кнопку Загрузить. (Если все прошло удачно, Вы должны увидеть надпись «off2.lsp успешно загружено»)

4. Нажмите кнопку Закрыть для завершения команды.

Или еще проще загрузить lisp файл путем перетаскивания (drag-and-drop) иконки файла в графическое окно открытого документа Автокада.

В описании практически любого кода есть такая строка где написано (defun … и потом после нее чего-то там еще. Так вот то, что там написано и есть имя функции.
Если первыми символами являются C: то функция готова к вызову из командной строки. Если такого нет, то вызывать функцию надо, заключая ее имя в круглые скобки.
Т.е. если написано (defun c:test то в командной строке набираем test , а если (defun test то пишем все тоже самое в скобочках (test) все просто!

Как только lisp файл загружен, вызываем команду из командной строки. Команда вызывается по ее имени. В нашем примере необходимо набрать в командной строке OFF2.

Каждый раз набирать _appload для загрузки того или иного приложения не дело, да и файлов этих со временем накопится, проще будет организация свою библиотеку. Для начала условимся, что все наши файлы будем складывать в одну папку. Например, D:\MyLisp. Пропишем эту папку в путях доступа Автокада. Для этого выбираем Сервис → Настройка ( Tools → Options ) или набираем в командной строке _options. Переходим на закладку Файлы (Files) и раскрываем список Путь доступа к вспомогательным файлам (Support File Search Path).
Мы должны увидеть диалоговое окно, как представлено ниже:

Используйте следующую последовательность, чтобы прописать папку в путях доступа:

1. Нажмите кнопку Добавить.

2. Нажмите кнопку Обзор и выберите целевую папку (в нашем случае, D:\MyLisp).

3. Путь к папке должен появиться в диалоговом окне.

4. Нажмите кнопку OK для завершения команды.

Теперь наша папка прописана в путях доступа Автокада. Что это нам дает? Мы можем загружать наши файлы не указывая конкретного пути, а только имя файла.
Мы можем набрать в командной строке (load » «) для загрузки необходимого кода, например (load «off2»). Заметьте, что добавлять расширение .lsp не обязательно, хотя и не запрещается.
А самое главное — это позволит нам создать панели с кнопками для загрузки той или иной программы. Кнопка будет иметь следующее содержание:

В нашем случае: ^C^C(if (null C:OFF2)(load «off2»));OFF2;

Вместо текста мы должны будем подставлять имя нужной нам команды, а вместо текста имя того файла, в котором эта команда сохранена. Помните, что файл должен иметь расширение .lsp.

Полезно. Как создать свою кнопку и вывести на свою панель команд читаем здесь.

источник

Вы нашли полезный для себя код на Лиспе и хотите его использовать. Можно выделить 3 шага:

  • сохранение программного кода на своем компьютере
  • загрузка файла
  • запуск приложения

Примечание: AutoLISP программы могут быть запущены только на полной версии Автокада, они не работают под AutoCAD LT. (исключая случаи загрузки дополнительных приложений типа LT Extender и ему подобных, которые специально разработаны для запуска lisp и (или) arx приложений в среде AutoCAD LT.)

Запускаем Автокад и выбираем Сервис >> Автолисп >> Загрузить (Tools >> AutoLISP >> Load) или набираем в командной строке _appload.
Мы должны увидеть диалоговое окно как представлено ниже:

Используйте следующую последовательность, чтобы загрузить off2.lsp:

  1. Перейдите к папке, куда Вы сохранили lisp файл.
  2. Выберите файл, который Вы хотите загрузить из списка.
  3. Нажмите кнопку Загрузить.
    (Если все прошло удачно, Вы должны увидеть надпись «off2.lsp успешно загружено»)
  4. Нажмите кнопку Закрыть для завершения команды.

Для начала необходимо определиться, что у нас: команда или функция?
Немного теории.
В описании практически любого кода есть такая строка, как

(defun …

и потом после нее чего-то там написано. Так вот то, что там написано и есть имя функции.
Если первыми символами являются C:, то функция готова к вызову из командной строки. Если такого нет, то вызывать функцию надо, заключая ее имя в круглые скобки.
Например, есть функция

(defun c:test () )

Ее вызывать (при условии, что она подгружена) с командной строки можно напрямую:

И будут выполнены действия
А вот такую:

(defun test () )

Можно будет вызывать только так:

И будут выполнены действия .
С точки зрения AutoCAD’a это 2 разных модуля.

Как только lisp файл загружен, Вы можете вызвать команду из командной строки. Команда вызывается по ее имени. В нашем примере необходимо набрать в командной строке OFF2.
Запомните, имя команды содержит префикс C: после слова defun. Если Вы видите в коде:

(defun c:

то в командной строке необходимо набрать без префикса C:.

Tips: Вы можете также загрузить lisp файл путем перетаскивания (drag-and-drop) иконки файла в графическое окно открытого документа Автокада.

Если Ваша функция или команда не работает или завершает работу с сообщением как в примере ниже, то Вам может помочь простой способ.

Команда: (vlax-get-acad-object)
; error: no function definition: VLAX-GET-ACAD-OBJECT

Наберите в командной строке (vl-load-com) или (предпочтительнее) добавьте ее в начало lisp файла.

Команда: (vl-load-com)

Теперь ваш lisp должен работать без ошибок.

Данная функция загружает большое количество функций, входящих в расширение AutoLisp, позволяющее работать с объектами, свойствами, методами и событиями ActiveX. Признаком необходимости загрузки расширения AutoLisp является наличие в тексте Вашей программы функций, начинающихся с префиксов vla- (например vla-get-activedocument), vlax- (например vlax-get-acad-object), vl- (например vl-catch-all-apply) и vlr- (например vlr-pers).
В любом случае никогда не помешает добавить (vl-load-com) в начало файла, чтобы избежать подобных ошибок.
Организация библиотеки лисп файлов.Что делать, если набралось достаточное количество файлов? Каждый раз набирать _appload для загрузки того или иного приложения? Наиболее эффективным будет организация своей библиотеки. Для начала условимся, что все наши файлы будем складывать в одну папку. Например, D:\MyLisp. Пропишем эту папку в путях доступа Автокада. Для этого выбираем Сервис >> Настройка (Tools >> Options) или набираем в командной строке _options. Переходим на закладку Файлы (Files) и раскрываем список Путь доступа к вспомогательным файлам (Support File Search Path).
Мы должны увидеть диалоговое окно, как представлено ниже:

Используйте следующую последовательность, чтобы прописать папку в путях доступа:

  1. Нажмите кнопку Добавить.
  2. Нажмите кнопку Обзор и выберите целевую папку (в нашем случае , D:\MyLisp)
  3. Путь к папке должен появиться в диалоговом окне.
  4. Нажмите кнопку OK для завершения команды.

Теперь наша папка прописана в путях доступа Автокада. Что это нам дает? Мы можем загружать наши файлы не указывая конкретного пути, а только имя файла.
Мы можем набрать в командной строке (load » «) для загрузки необходимого кода, например (load «off2»). Заметьте, что добавлять расширение .lsp не обязятельно, хотя и не запрещается.
И, наконец, самое главное — это позволит нам создать панели с кнопками для загрузки той или иной программы. Кнопка будет иметь следующее содержание: В нашем случае: Вместо текста мы должны будем подставлять имя нужной нам команды, а вместо текста имя того файла, в котором эта команда сохранена. Напоминаю, что файл должен иметь расширение .lsp.

источник

Полностью переписана программа автонумерации под кодовым названием (AN).

Приятно изменился интерфейс. Исправлены старые и наверно наделаны новые ошибки. В версии 1.20 стало возможным, выбрать Слой на который будут размещаться Ваши сокращения, применённые в проектах. Выбрать один из семи основных цветов, для текста сокращения и высоту текста.

Смотреть видео работы программы.

Запуск программы остался таким же как и в старых версиях, в командной строке по средствам ввода (AN), обязательно в скобках, либо с оптимизированной панели для AutoCAD, скачанной на нашем сайте, кнопкой (AN). Так как файл программы один, подключается он так же как и файл с расширением .LSP.

Сделаны такие приятности, как выполнение диалога до конца. Основным значением в диалоговом окне является поле Название:. Программа будет ругаться пока не вводится в это поле значение. Введя в это поле сокращение для оборудования и нажав ОК программа с помощью комментариев в активных окнах, расскажет Вам какие значения она ставит в пустые поля и попросит указать формуляр текста.

Прикручена защита от непопадания по тексту формуляру. Даже если Вы намеренно не выбрали текст формуляр или его нет на плане, программа сама создает пробник, по координатам 0.0 высотой 1 и типом шрифта Arial Narrow. После создания пробника сразу продолжает работу по запросу вставки текста.

Исправлена ошибка выборки значений из текста формуляра. Теперь по клику на текст формуляр с текста в точности копируется размер, тип шрифта, наклон и жирность. И в завершение ко всему программа по взрослому откомпилирована в приложение с расширением .VLX. Исполнена оптимизация загрузки и облегчения исходника, все в одном флаконе.

Написана программа была еще в 2010 году, для того чтобы не копировать обозначение каждого извещателя или оповещателя. А сразу прикреплять обозначение к нужному примитиву на плане.

Программа уже доступна для скачивания зарегистрировавшимся. Внутри архива файл с расширением .DOC с полным объяснением по адаптации и интеграции программы.

У кого получилось скачать и интегрировать программу и кто скачал панель для проектирования АУПС, имеют в составе панели кнопку для вызова диалогового окна программы. У кого панели АУПС нет вызов программы может сделать из командной строки введя (an) – скобки в данном случае обязательны.

Для работы программы необходимо, чтобы на плане присутствовал текст созданный по средствам AutoCAD «МТЕКСТ». Если план новый создаем текст, который будет формуляром для нашей программы. На картинке выше это текст «Проба». В следующей версии данного приложения постараемся сделать выбор шрифта и цвета в диалоге. Хотя нам удобно так, потому что берем с плана формуляр текста общих изысканий. Нумерация создает свой слой «Нумерация оборудования».

При вызове программы выплывает диалог. В диалоге вы заполняете желаемые значения. «Название:» — в пункте указывается значение конкретного оборудования и номер шлейфа, допустим: BIAS 1.

В пункте «Тип разделителя:» — может быть любой символ у нас это точка.

В пункте «Начальный номер оборудования:» — число, с которого необходима автоматическая генерация последнего значения, у нас 1.

Когда запрос сформирован, нажимаем «ОК», курсор перейдет в состояние выбора формуляра текста, кликаем по тексту формуляру, у нас этот текст «Проба». Напомним, что его нужно создать самостоятельно если чертеж новый или на нем нет «МТЕКСТА».

Если формуляр текста выбран правильно, и не произошло ни каких ошибок, командная строка выдаст указание о вставке текста на план. Текст закреплен за курсор в верхней – левой вершине. Курсором указываем место и нажимаем правую кнопку мыши. Каждая вставка прибавляет к последней цифре один.

Скачивайте программу, Ваше мнение друзья!

Стало возможным изругать нас, похвалить или задать вопрос по теме всем зарегистрированным на нашем ФОРУМЕ

источник

Источники:
  • http://www.zwsoft.ru/stati/yazyk-programmirovaniya-lisp-funkcii-sintaksis-sreda-razrabotki
  • http://stroymetproekt.ru/samouchitel/obuchenie-autocad/lisp-dlya-autocad/
  • http://acad-prog.ru/lisp-programmy/
  • http://d-rilovo.narod.ru/
  • http://dorroggi.ru/stati/12
  • http://vk.com/page-60173163_46443880
  • http://xn--80apidchc.xn--p1ai/index.php/razrabotki/avtonumeratsiya-oborudovaniya-lisp-vlx