|
||
| Правила | Регистрация | Пользователи | Сообщения за день | | Поиск | | Справка по форуму | Файлообменник | |
|
Поиск в этой теме |
04.02.2021, 15:11 | #1 | |
Макрос для назначения выбранным объектам свойств цвета и веса линий "по слою"
проектирование автомобильных дорог
Москва
Регистрация: 15.11.2019
Сообщений: 55
|
||
Просмотров: 6424
|
|
||||
Регистрация: 25.03.2008
Зелик
Сообщений: 1,577
|
я себе такую кнопку сделал "Сделать по-Ленински" - на кнопке Ильич 16-битный, а под кнопкой вот такой макросик:
^C^C_change;p;c;byl;lt;byl;lw;byl;; Сначала выделяем объекты, хоть 1, хоть рамкой, - потом говорим "ЛЕНИН ЖИВ" и в тот же миг цвет(c), тип линии(lt) и вес линии(lw) становятся "по дефолту слоя" (byl). Можно и добавить чего-нить, да мне не надо.
__________________
* Буква "ё" не используется в тексте исключительно в связи с требованиями ЕСКД. |
|||
|
||||
проектирование автомобильных дорог Регистрация: 15.11.2019
Москва
Сообщений: 55
|
Цитата:
только цвет назначает не "по слою", а задает именно цвет слоя. Это важно) И почему-то на текст и отрезки не действует... |
|||
|
||||
Регистрация: 25.03.2008
Зелик
Сообщений: 1,577
|
Моя вина. Наверное, неправильно понял задачу
Каждый объект принимает свойства своего слоя, не меняя его. Если объектов много, то каждый станет "Ленинским" по-понятиям своего слоя. Слой объекты не меняют. Свойства слоя тоже. Действует и на отрезки и на тексты, хоть на солиды PS 1 - сначала выбор 2 - потом Ленин
__________________
* Буква "ё" не используется в тексте исключительно в связи с требованиями ЕСКД. |
|||
|
||||
проектирование автомобильных дорог Регистрация: 15.11.2019
Москва
Сообщений: 55
|
Цитата:
С задачей частично справился обычным рекордером операций... Не кнопочка, конечно, но тоже сойдет) |
|||
|
||||
Регистрация: 25.03.2008
Зелик
Сообщений: 1,577
|
Цитата:
Сделать наоборот у меня не получилось уже не помню почему, кажется, из-за каких-то нелогичных особенностей CHANGE или SELECT PS aCAD2016 x64 WIN10 - все работает
__________________
* Буква "ё" не используется в тексте исключительно в связи с требованиями ЕСКД. |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,848
|
Цитата:
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
проектирование автомобильных дорог Регистрация: 15.11.2019
Москва
Сообщений: 55
|
Ну шо уж вы... Я с первого раза понял, что сначала объекты выбираем, потом Ленина будоражим. Автокад 2021, винда 10
Вот командная строка: Команда: Задайте противоположный угол или [Линия/РМн-угол/СМн-угол]: Команда: Команда: Команда: _change найдено: 106 Точка изменения или [Свойства]: p Требуется точка или ключевое слово. |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,848
|
Цитата:
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
проектирование автомобильных дорог Регистрация: 15.11.2019
Москва
Сообщений: 55
|
Цитата:
Сделал вот так, но ничего не изменилось. В каком месте не туда воюю?) |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,848
|
Без понятия. Я уже очень давно использую команды только там, где это реально необходимо. Для таких задач я бы лисп писал, но никак не DIESEL-выражение
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
лиспом это как то так.
Код:
__________________
Не труд сделал из обезьяны человека, а лень и жажда халявы... |
||||
|
||||
проектирование автомобильных дорог Регистрация: 15.11.2019
Москва
Сообщений: 55
|
|
|||
|
||||
Регистрация: 18.01.2021
Сообщений: 404
|
коллеги, прошу дублировать лиспы сюда
https://forum.dwg.ru/forumdisplay.php?f=30 а то потом фиг найдешь ----- добавлено через ~2 мин. ----- "а как его запустить? " - а это к администрации... ответ есть и сто лет как опубликован. тема: найти его |
|||
|
||||
Moderator
LISP, C# (ACAD 200[9,12,13,14]) Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,848
|
Какой смысл дублировать лисп в библиотеку, если он не является "библиотечным"? В крайнем случае - в "Готовые программы", но именно представленный код я бы туда не закидывал.
__________________
Моя библиотека lisp-функций --- Обращение ко мне - на "ты". Все, что сказано - личное мнение. |
|||
|
||||
Регистрация: 18.01.2021
Сообщений: 404
|
Ну это - да. может и в "Готовые программы".
Смысл вот в чем: на сайте довольно много интересного, но раскидано по форумам. И если тупо "смотреть, что есть на сайте", то смотришь "Готовые программы" и "функции", а подобные посты лежат незамеченные. Что до качества кода - так это на совести автора и на его репутации. Что тут, что там доверяй-но-проверяй. |
|||
|
||||
Регистрация: 23.05.2011
Сообщений: 31
|
Цитата:
Приделал к коду Владимира Сергеевича запуск поддержки функций VL и определение двух команд SetByLay - для установки свойств по слою примитива и SetByCur - для установки свойств примитива по текущим свойствам и изменения слоя на текущий. В этом коде именно эти функции реализованы. Может Вам так легче будет их использовать. Проверил - команды работают. А код на кнопку, как я выше написал (с лисп-командой) не пробовали заменить. Т.е. вместо строки в определение макроса на кнопке: ^C^C_.change;_p;_color;_bylayer;_lineweight;_bylayer;; вставить строку: ^C^C(Command "_.CHANGE" "_p" "" "_p" "_Color" "_BYLAYER" "_LType" "_BYLAYER" "_LWeight" "_BYLAYER" "") Может этого будет достаточно. Эта строчка работает - проверил. "Война" идет куда надо |
|||
|
||||
проектирование автомобильных дорог Регистрация: 15.11.2019
Москва
Сообщений: 55
|
Цитата:
|
|||
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как активировать масштаб веса линий? | инженер гарин | AutoCAD | 5 | 13.12.2018 17:11 |
Цвета линий в AutoCAD. Зачем они нужны и как их изменить | АнтонЧ | AutoCAD | 47 | 09.10.2013 20:34 |
Где можно прочитать достоверную информацию про использование цветов, веса линий ... при печати в режиме Monocrome? | Edgario | AutoCAD | 12 | 19.05.2010 09:28 |
изменение толщины (веса) линий при печати, без редактирования чертежа | lex0101 | AutoCAD | 6 | 01.12.2009 20:37 |
Привязка только к объектам определенного цвета | Torino | AutoCAD | 30 | 29.03.2004 15:56 |