[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

[Shoorup]

Помогите доработать макрос по заданию цвета.

Пока используется такой макрос:

Код:

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

*^C^C_change;\;_p;_c;5;;

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

Вообще нужно сделать так:
Если на чертеже есть выбранные объекты, то при нажатии на кнопку сменить цвет.
(Что-то типа

Код:

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

^C^C_change;_p;_c;5;;

)
Если не выбрано, то выбирать объекты и после нажатия Enter сменить цвет.

[ытя]

Сообщение от Shoorup Если на чертеже есть выбранные объекты, то при нажатии на кнопку сменить цвет.

^C^C_chprop;_c;5;;

[roaa]

Сообщение от Shoorup Помогите доработать макрос по заданию цвета.

^C^C_select;\^C^C_change;_p;;_p;_c;5;;
невыделены объекты - выход по ПКМ
выделены - левая кнопка мыши (ЛКМ)

[Shoorup]

roaa, Спасибо! То что нужно!

[roaa]

Сообщение от Shoorup Помогите доработать макрос по заданию цвета.

то же, но с выбором цвета
^C^C_select;\^C^C_change;_p;;_p;_c;(acad_colordlg 1);;

[Profan]

roaa, а зачем еще ^C^C? Макросы работают и без них:

Код:

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

^C^C_select;\_change;_p;;_p;_c;5;;
^C^C_select;\_change;_p;;_p;_c;(acad_colordlg 1);;

[roaa]

Сообщение от Profan roaa, а зачем еще ^C^C? Макросы работают и без них:

странно, но без этого команда не работает с выбранными объектами

[Никита Ремизов]

Здравствуйте! пытался создать макрокоманду на основе команды _plot для перевода черетежей в pdf, но столкнулся с проблемой при задании названия файла - каждый раз приходится вбивать вручную. Возможно ли чтобы файл получаемый на выходе получал название листа из которого была произведена печать? саму макрокоманду смогу выложить чуть позже, но в ней ничего важного/сложного.

И еще один вопрос пытался сделать макрокоманду для выбора предыдущих выбранных объектов, но _select;_previous;; - не работает, хотя когда просто вводишь команды через командную строку - всё ок. В чем загвоздка?

[roaa]

Сообщение от Никита Ремизов макрокоманду для выбора предыдущих выбранных объектов

^C^C(command "_.Select" "_p" "")(sssetfirst nil (ssget "_p"))

[Никита Ремизов]

Сообщение от roaa ^C^C(command "_.Select" "_p" "")(sssetfirst nil (ssget "_p"))

не работает
"лишняя закрывающая скобка на входе"

[skkkk]

Сообщение от Никита Ремизов Возможно ли чтобы файл получаемый на выходе получал название листа из которого была произведена печать?

Возможно, но содержимое макроса будет зависеть от того *.pc3 файла, который используется для распечатки в *.pdf, а точнее, от тех опций, которые он запросит. В первом приближении макрос будет выглядеть где-то так

Код:

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

^C^C(command "_-plot" "_N" "" "" "DWG To PDF" (strcat (getvar "ctab") ".pdf") "_Y" "_Y")

.

Код:

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

(command "_-plot"
    "_N"; Выполнить детальное задание конфигурации?
    ""; Имя листа или [?] <Лист 1>
    ""; Имя набора параметров листа
    "DWG To PDF"; Имя устройства вывода
    (strcat (getvar "ctab") ".pdf"); Имя файла pdf
    "_Y"; Сохранить изменения параметров листа [Да/Нет]?
    "_Y"; Перейти к печати [Да/Нет]?
)

Это я использовал файл DWG To PDF.pc3 (прилагается). В каждом конкретном случае нужно поработать с командной строкой и посмотреть, что нужно скормить на каждый запрос и затем подставить в макрос. (getvar "ctab") - возвращает имя активного листа.
Ограничения:
1. Будет печататься только текущий лист (активный). Но это похоже то, что нужно.
2. Файл *.pdf сохранится в текущей папке. Если надо другую, добавить в strcat строку с адресом (strcat "C:\\Папка\\" (getvar "ctab") ".pdf")
3. Если файл *.pdf с таким именем уже существует в этой папке (например, захочется нажать эту кнопку на данном листе еще раз), - макрос не сработает, вернее сработает неверно - имя файлу будет присвоено "_Y". В общем, надо допиливать, но информации к действию, думаю пока должно хватить

Сообщение от Никита Ремизов макрокоманду для выбора предыдущих выбранных объектов

LISP. Повтор предыдущего выбора элементов. Там несколько вариантов: макросы, лисп - можно выбрать по душе.

[perpetule]

макрокоманду для выбора предыдущих выбранных объектов

http://forum.dwg.ru/showthread.php?t=58728
#11 пост 100% рабочий код, включил себе в частичный cui.

Возможно ли чтобы файл получаемый на выходе получал название листа из которого была произведена печать

Скорее так: Возможно ли чтобы файлЫ получаемыЕ на выходе получалИ названиЯ листОВ из которЫХ была произведена печать
Макросов, и вообще ничего внешнего дополнительного не треба...
Подшивка - диалог публикации - одно/многолистовой-pdf.
Либо вкладки лайоутов одного dwg (подшивка не треба...), выделение с shift, опубликовать по ПКМ, на встроенный PDF(внешний не катит, задание доп форматов, ищи *.PMP)

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

Можно сделать такое макросом или нужно искать программиста?
Вставить блок в нужную точку, расчленить (внутри солид), и сделать его align (выровнять), при котором точка вставки остается на месте, а указать нужно только вторую точку солида и точку, в которую его нужно довернуть?
Уточнение: имеется в виду поворот в пространстве. Потому и align.

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

ИМХО это можно сделать через палитру инструментов.

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

Сообщение от Кулик Алексей aka kpblc ИМХО это можно сделать через палитру инструментов.

Ну, да, так и думалось - вставить такой макрос в палитру инструментов. Если такой макрос возможен.
Вставить блок, так понимаю: ^C^C_insert "block_name";\;;;
А как расчленить при вставке - уже не знаю.
Потом можно добавить _align, но как вместо первой точки - которую и первой точки - куда задать точку вставки блока? Да и откуда _align узнает, что выравнивать нужно именно этот вставленный элемент?

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

Блок закинь на палитру, потом на инструменте правый клик - и устанавливай свойства. Там все понятно (просто сейчас нет никакой возможности сделать скриншоты).

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

Сообщение от Кулик Алексей aka kpblc Блок закинь на палитру, потом на инструменте правый клик - и устанавливай свойства. Там все понятно (просто сейчас нет никакой возможности сделать скриншоты).

Если в палитру вставить именно блок, то для расчленения там есть специальная строка. Но там некуда добавить другие действия. Например, _align. Там ведь нет командной строки для макроса.
Может быть кто подскажет, как сделать расчленение блока при вставке в макросе?

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

А запрос угла поворота - не то?

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

Сообщение от Кулик Алексей aka kpblc А запрос угла поворота - не то?

Запрос угла поворота - это же в плоскости? А мне нужен _align - чтобы в пространстве.

[skkkk]

Сообщение от АлексЮстасу Вставить блок в нужную точку, расчленить (внутри солид), и сделать его align (выровнять), при котором точка вставки остается на месте, а указать нужно только вторую точку солида и точку, в которую его нужно довернуть?

Если я все верно понял, то

Код:

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

^C^C_-insert;"block_name";_s;1;_r;0;\_rotate;_l;;(getvar "lastpoint");_R;(getvar "lastpoint");\\_explode;_l;

Если

Сообщение от АлексЮстасу его нужно довернуть

но не масштабировать, то можно обойтись без _align.

Добавлено:
Последние посты прочитал после написания своего.
АлексЮстасу, раз надо _align, лучше приложить файл и показать там какую точку вслед за какой этому "элайну" скармливать, не то можно долго гадать. Или хотя бы объяснить порядок действий при _aline: какие точки уже известны (как базовая точка вставки блока), а какие надо спросить у юзера.
Добавлено 2:
И еще может захотеться повтор всех процедур по enter, пробелу или правой кнопке мыши... Ведь может, правда? Не всегда охота тянуться снова к кнопке. Надо сразу определиться.