[zenon]

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

Выкладываю 4 своих макрокоманды.

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

^C^C^P(defun c:break2 () (vl-cmdf "_break" pause "f" pause "@")(princ));break2;

ps. Макрокоманда не моя. Рисунок со старой кнопки.


Объект Xline строится горизонтально

^C^C_xline;_h;

Объект Xline строится вертикально

^C^C_xline;_v;

Объект Xline строится по объекту (не работает по примитивам блока и arx объектов сторонних навесок на автокад).

*^C^C_xline;_offset;_Through;_nea;\_none;@;;

Макрокоманда зациклена, выход по Esc.
ps. Макрокоманда не моя.


Объект Xline строится по объекту, с поворотом в указанной точке на 90 градусов (не работает по примитивам блока и arx объектов сторонних навесок на автокад)

^C^C_xline;_offset;_Through;_nea;\_none;@;^C^C_rotate;_last;;\90;

ps. Макрокоманда доработана из предыдущей.

Соотвественно и кнопочки
Button.rar

[АлексЮстасу]

Сообщение от hans-zemmer Помогите. Нужна макрокоманда, которая построит фигуру по контурам (по аналогии штриховки), и сделает ее offset влево/вправо/вверх - 15мм, вниз - 12мм. Спасибо.

"фигуру" - это 3Д тело? Скорее всего тогда нужна не макрокоманда, а программа. Т.е., скорее всего, нужно в тему программирования.

[hans-zemmer]

Сообщение от АлексЮстасу "фигуру" - это 3Д тело? Скорее всего тогда нужна не макрокоманда, а программа. Т.е., скорее всего, нужно в тему программирования.

Написал "фигуру", т.к. она может быть произвольной по форме. 2D. Смотрите в приложении, что нужно. Без проставления размеров, естественно.

[АлексЮстасу]

Сообщение от hans-zemmer Написал "фигуру", т.к. она может быть произвольной по форме. 2D. Смотрите в приложении, что нужно. Без проставления размеров, естественно.

В макросе сначала сделайте _boundary - создайте замкнутый контур, а потом _offset на 0.15. А чтобы "низ" офсетился на 0.12 - это к программисту, по-моему.

[perpetule]

Что за что отвечает, не расписываю - инфа открыта, некоторые переменные имеют и подводные камни, - для 2D

Код:

[Выделить все]

 _.RTDISPLAY 1 _.BPARAMETERFONT TXT.SHX _.BPARAMETERCOLOR 20 _.FIELDDISPLAY 1 _.XDWGFADECTL 0 _.OLEFRAME 2 _.IMAGEFRAME 2 _.PDFFRAME 2 _.EXTNAMES 1 _.SAVETIME 60 _.SDI 1 _.TASKBAR 0 _.PROXYNOTICE 0 _.TREEDEPTH -3020 _.REGENMODE 0 _.LAYLOCKFADECTL 50 

[nikepiter]

Уважаемые, подскажите, пожалуйста, есть ли возможность сделать команду, при которой в открывающемся окне печати было бы уже проставлено количество экземпляров 2 (3 и тп)?

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

[perpetule]

Набор параметров листа (поисковый запрос по форуму) - работает и в модели.

[Sta1917]

Здравствуйте, помогите с макросом: вставляется блок с единственным атрибутом (берется из Z блока), выбирает его, ждет ввода положения Z, после делает регенерацию и превращает атрибуты в текст.

^C^C_-insert block;\1 1 0;_select;_L;\\\_regen;_burst;_L

Споткнулся на выборе и ожидании ввода после вставки.

[Vova]

Для начала почини burst, который в оригинале not good. Поищи по этому слову лисп от VVA

[Sta1917]

Спасибо, починил, а как сделать это одной командой? Сейчас работают 2 кнопки: вставка блока/ вручную выделение блока и изменение Z через окно свойств/регенерация и расчленение.

[Jonas]

Для выполнения стыковок и врезок одной детали с другой (например труб) писал макросы но поскольку без лисп-функций не обойтись, написал лиспы.
delt - для стыковки одной трубы к другой без отверстий.
delt2 - для для пристыковки трубы в прорезанное отверстие.
delt3 - для пристыковки трубы к трубе с отверстием равным внутреннему диаметру первой трубы.
В общем реализовал желание делать это двумя кликами - получилось.
Я не программист, наверно написано коряво, не судите а если можно поправьте.

[Astartes]

Подскажите пожалуйста. Не получается макрокоманда.
Есть лисп по выделению мультивыносок по значению.
Нужно: qsel(лисп) -> ввел значение (мультивыноска выделилась) -> _ddedit -> меняю значение на нужное.
Написал вот такой код ^C^C_qsel;\;_ddedit;\ , но он не работает. Хотя теже действия последовательно делаю через командную строку все нормально.

ЗЫ: Еще вопрос. Как записать команды в макрос ctrl+A и ctrl+F (во время редактирования)?

УПД: Нашел правильное сочетание: ^C^C_qsel;\_ddedit. А вот команды для ком. строки в режиме редактирования "выделить все" и "редактировать поле" не нашел

[LENTO]

Уважаемые форумчане! Так как в макрокомандах только начал разбираться и не могу найти ошибку в следующем макросе ^C^CКонтур;Д;К;Н;Список; (русский автокад).Суть в том чтобы после команды контур открывался список с его свойствами. Так как у меня Автокад 2011 LT применять лисп не могу!!!

[Jonas]

Сообщение от LENTO Уважаемые форумчане! Так как в макрокомандах только начал разбираться и не могу найти ошибку в следующем макросе ^C^CКонтур;Д;К;Н;Список; (русский автокад).Суть в том чтобы после команды контур открывался список с его свойствами. Так как у меня Автокад 2011 LT применять лисп не могу!!!

Лучше скажите какую задачу решаете (чего хотите)?

[Кулик Алексей aka kpblc]

Команда _boundary требует предварительного выбора. Можно попробовать так:

Код:

[Выделить все]

^C^C_.-boundary;_a;_b;_n;_p;\;_.properties;_select;_last

P.S. Работу не проверял.

[LENTO]

^C^C_.-boundary;_a;_b;_n;_p;\;_.properties;_select;_last


Спасибо за быстрый ответ НО кнопка не совсем работает, после выбора объекта
все кабы зацикливается и просит ввести параметры с начала!

Суть задачи чтобы не обводить полилинией объекты из отрезков и т.п.(чтоб узнать площадь) а выбрать узнаваемый контур после чего выводятся его свойства. Извините если не совсем ясно объясняю

[Кулик Алексей aka kpblc]

Сначала надо выбрать объекты, потом уже запускать макрос.

[LENTO]

Сообщение от Кулик Алексей aka kpblc Сначала надо выбрать объекты, потом уже запускать макрос.

Все равно даже после первоначального выбора объектов и запуска макроса кнопка просит выбрать объекты и задать параметры( контур, островки, объект).
Может это все резаный автокад LT

[Кулик Алексей aka kpblc]

pickadd = ?

[LENTO]

Сообщение от Кулик Алексей aka kpblc pickadd = ?

Значение системной переменной PICKADD =1 . Пробовал менять на 0 и 2, увы нечего не получаеться,ситуация ка раньше! Но даже после проделанных операций по созданию контура его свойства не выводятся, то есть к команде свойства дело не доходит

[roaa]

Макрос для перевода нескольких линий в полилинии:

(vl-cmdf "._PEdit" "_m" (ssget '((0 . "LINE"))) "" "_y" "")