Schöck
dwg.ru forum rss xml
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Готовые программы > LISP. Подготовка подосновы

LISP. Подготовка подосновы

Версия для печати
 
Ответ
Опции темы Поиск в этой теме
Непрочитано 13.04.2011, 20:25 23 |
LISP. Подготовка подосновы
VVA
 
Инженер LISP
 
Минск
Регистрация: 11.05.2005
Сообщений: 6,701
Отправить сообщение для VVA с помощью ICQ Отправить сообщение для VVA с помощью Skype™

VVA вне форума Вставить имя

Набор команд, опубликованных в теме Подоснова
Желательно ознакомиться с указанной темой или как минимум с описанием
Описание команд
Код:
[Выделить все]
BGLAYDEL - Удаление выключенных и замороженных слоев с примитивами
BG1BLEXP - Взрывает блоки, состоящие из одного примитива (возможно другого блока)
BGBLEXP  - Взрывает блок и все блоки, входящие в него, превращая видимые атрибуты в текст
BGBLEXP1 - Взрывает блоки 1-го уровня, превращая видимые атрибуты в текст
BGBLDYNEXP1 - Взрывает динамические блоки 1-го уровня, превращая видимые атрибуты в текст
BGBLEXP1NOATT - Взрывает блоки 1-го уровня, у которых нет видимых атрибутов
BGBLXCLIP - Показывает подрезанные блоки
BGBLDYN2A - Преобразовывает динамические блоки в анонимные
BGBLDYN2S - Преобразовывает динамические блоки в статические
BGBLALLDYN2A - Преобразовывает ВСЕ динамические блоки в анонимные    
BGBLALLDYN2S - Преобразовывает ВСЕ динамические блоки в статические  
BGBLXCLIPEXP - взорвать подрезанный блок
BGCB - копирует одно из вхождений блока в блок с новым именем 
BGRB - переименовывает одно из вхождений блока в блок с новым именем
M2U - Преобразовать MINSERT в Unnamed блок
M2B - Преобразовать MINSERT в блок
U2B - Преобразовать UNNAMED в блок
U2BM - Преобразовать UNNAMED в блок множественный выбор
UX - Взорвать UNNAMED блок
=======================================
BGRGB2ACI - Изменяет цвет с RGB на ACI
BGAll2RGB - Изменяет ACI цвет в его RGB эквивалент
BGCOLOR - Задает выбранный цвет всем объектам
BGCOLORXREF - Меняет цвет выбранных внешних сылок (только в текушем сеансе)
BGCOLBL - Установка "послою" цвета примитивов подосновы. Если цвет задан явно- создается новый слой !Новое с версии 3.0
BGResetXRef -Сброс настроек слоев выбранных внешних ссылок на установленные в исходном файле
BGBLCC - Изменяет цвет выбранных блоков
BGENCC - Изменяет цвет выбранного элемента блока
BGCATT - Изменяет цвет атрибутов выбранных блоков
BGCBL2 - Изменяет цвет в блоках 2 и более уровня (вложенных блоках)
BGBLFIX - Нормализация блоков (цвет, слой, взрываемость и т.п.)
BGCFT   - Конвертирует все поля в обычный текст
BGCFTSEL - конвертирование полей в обычный текст в выбранных примитивах
BGHATCHDEL - Удаление штриховки
Текущая версия 3.7
Отличие версий 3.3 и 3.6 - переписана функция взрыва блоков (команды BGBLEXP...)
В версии 3.3 - вариант из expresstools. Сохраняются поля при взрыве. Медленная обработка при большом количестве блоков
В версии 3.6 функция bg:BURST-ONE заменена функцией Lee Mac LM:burst. На порядок быстрее, если атрибут многострочный и включена маскировка - получаем маскированный мтест.
Поля не сохраняются.

Код:
[Выделить все]
;;;	Версии:
;;;	1.0 - исправлены ошибки burst - при наследовании типа линии поблоку, показ скрытых атрибутов и наследования типа линии блока
;;;	                                если в блок примитив входил не на 0 слое, тип линии поблоку.
;;;	      добавлена обработка Burst LineWeight
;;;	1.1  изменение цвета блока при наличии атрибутов (см ;;; Change VVA 12.09.2008)
;;;	...
;;;	1.4  Обработка стилей мультилиний
;;;	1.11 ChangeAllObjectsColor - Обработка размеров, leader и mtext с явным заданием цвета.
;;;	     BGBLEXP - обработка видимостей динамических блоков (если в видимости включены атрибуты)
;;;	     BG1BLEXP - Обабатываются блоки, состоящие из одного элемента и
;;;	     - имя блока A$C*
;;;	     - или любое другое имя и этот один элемент другой блок
;;;	1.12 - Не удаляет блоки, расположенные на выключенном/ замороженном слое
;;;	       и имеющие хотя бы 1 примитив на включенном слое, отличном от "0"
;;;	2.0  - BGBLEXP - исправлена ошибка со списком
;;;	2.1  - обработка блоков внешних ссылок ChangeXrefAllObjectsColor
;;;	2.2  - команда BGCFT
;;;	2.3  - add BGCOLORXREF and BGRGB2ACI
;;;	2.4  - Обработка многострочных атрибутов
;;;     2.5  - Добавленна gc:FieldCode ChangeAllObjectsColor ChangeXrefAllObjectsColor - обработка Unicode символов
;;;     2.6  - Добавленны команды BGBLDYN2A BGBLDYN2S
;;;     2.7  - Добавлена обработка предварительного выбора
;;;     2.8  - Баги с обработкой атрибутов и visibility
;;;     2.9 - Команда BGBLDYNEXP1 
;;;     2.9.1 - добавлена ф-ция bg:massoc
;;;     2.10  - Конвертация динамических блоков  bg:DynToStatic. Сохранение и восстановление значений атрибутов
;;;     2.11 - Изменения в bg:get-all-atts (обработка UNICOD символов в значениях атрибутов)
;;;              добавлена команда BGHATCHDEL
;;;             ChangeAllObjectsColor - change table text and grid color
;;;    2.12  - Учтен lineweight для атрибутов. Изменен BgBlFIX
;;;    2.13  - Добавлена функция BG:GET-TEXTSTRING (как замена vla-get-textstring. Т.к. неверно возвращает строку при наличии юникод символов)
;;;    2.14  - Добавлена команда BGAll2RGB Изменена ClearFieldInAllObjects
;;;    2.15  - Небольшие изменения в BGAll2RGB. добавлены BGCB и BGRB
;;;;   2.16  - BGCBL2 теперь работает с RGB и ACI цветами
;;;;   2.17  - BGBLCC  теперь работает с RGB и ACI цветами + мелкие изменения
;;;;   2.18  - Учтено предложение http://forum.dwg.ru/showpost.php?p=949149&postcount=102
;;;;           Добавлена команда BGBLXCLIPEXP
;;;;   2.19  - Команда BGBLFIX. Добавлена опция игнорирования блокированных слоев
;;;    2.22  - Добавлены опции Одинаковые масштабы и Разрешить расчленение
;;;    2.23 - Внесены изменения в команду BGBLXCLIPEXP
;;;    2.24  - Отредактирована команда UX (вложенность анонимных блоков)
;;;    2.25  - Fix BGBLCC и BGCBL2 command. Add BGCFTSEL
;;;    2.26  - BGCFT - добавлена обработка формата текста в таблице. Добавлены команды BGBLALLDYN2A и BGBLALLDYN2S
;;;    2.27  - в командах U2B ,UX добавлена обработка блоков с именем *E
;;;    2.28  - BGCFT - исправлена ошибка + изменения в function bg:DynToStatic
;;;    2.29  - Исправлен недочет ClearFieldInThisObject
;;;    2.30    Fixed minor bugs in function ClearFieldInThisObject   http://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/vla-get-textstring-u-symbols/td-p/4365165
;;;    2.31    BGCFT добавлена очистка полей в размерах  ( http://forum.dwg.ru/showthread.php?p=1335110#post1335110 )
;;;    2.32    изменения в bg:get-TextString (http://forum.dwg.ru/showpost.php?p=1386990&postcount=235)
;;;    2.33    изменения в bg:get-TextString (http://forum.dwg.ru/showpost.php?p=1386990&postcount=252) 
;;;    2.34    BGBLFIX обработка именованных стилей печати
;;;    2.35    BGBLEXP изменения
;;;    2.36    изменения в команде UX http://forum.dwg.ru/showthread.php?p=1421560#post1421560
;;;    2.37    BGCFT исправлена ошибка при обработке заблокированных ячеек таблицы
;;;    2.38    BGLAYDEL исправлена ошибка с востановлением слоев
;;;    2.40    Изменения в ф-ции bg:FieldCode. Добавлена ф-ция bg:GetObjectIDString mark VVA 2015-12-07
;;;    2.41    Изменения в ф-ции ClearFieldInThisObject. Обработка значений размеров над и под размерной линией. Mark VVA 2016-01-04
;;;    3.0    Добавлена команда BGCOLBL
;;;            Установка послою цвета примитивов подосновы. Если цвет задан явно- создается новый слой
;;;    3.1    BGBLEXP - сохранение полей в атрибутах

Полезные ссылки
C2L - Color to Layer или еще здесь
COLORFL - Color From Layer
PFL - Properties From Layer

Вложения
Тип файла: zip bgtools 3.3.zip (53.6 Кб, 1154 просмотров)
Тип файла: zip bgtools 3.7.zip (52.6 Кб, 366 просмотров)

__________________
Как использовать код на Лиспе читаем здесь

Последний раз редактировалось VVA, 02.08.2018 в 15:48.
Просмотров: 198479
 
Автор темы   Непрочитано 27.12.2017, 21:13
#421
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,701
Отправить сообщение для VVA с помощью ICQ Отправить сообщение для VVA с помощью Skype™


Цитата:
Сообщение от quazi Посмотреть сообщение
Пока в код не лез, но там же по идее просто один блок удалить, или можно проще?
Создай свою команду, например
Код:
[Выделить все]
(defun C:CFTAll ()(ConvField->Text nil))
или просто используй в макросах функцию
Код:
[Выделить все]
(ConvField->Text nil)
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 22.01.2018, 14:08
#422
Doctor_Che


 
Регистрация: 27.10.2015
Сообщений: 18


При использовании команды BGBLEXP1 возникла проблема.
Ситуация такая. В блок 1-го уровня входят блоки с атрибутами. При этом блок 1го уровня лежит на слое "Слой1", а блоки 2-го уровня на слое "Слой2".
После использования команды BGBLEXP1 блоки 2-го уровня оказываются на слое "Слой2", а их атрибуты на слое "Слой1".
Можно ли переделать команду так, что бы атрибуты блоков 2-го уровня оставались на слое своего блока?
Doctor_Che вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 22.01.2018, 14:17
#423
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,701
Отправить сообщение для VVA с помощью ICQ Отправить сообщение для VVA с помощью Skype™


Doctor_Che, Можно. Файлик с примером приложи
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 22.01.2018, 15:12
#424
Doctor_Che


 
Регистрация: 27.10.2015
Сообщений: 18


Цитата:
Сообщение от VVA Посмотреть сообщение
Doctor_Che, Можно. Файлик с примером приложи
Приложил
Вложения
Тип файла: dwg
DWG 2013
Чертеж1.dwg (57.0 Кб, 4 просмотров)

Последний раз редактировалось Doctor_Che, 05.02.2018 в 14:46.
Doctor_Che вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 27.03.2018, 19:49
#425
edemine


 
Регистрация: 20.03.2018
Сообщений: 1


Цитата:
Сообщение от Walkmax Посмотреть сообщение
с недавних пор на любую команду из bgtools стала появляться такая строка
Код:
[Выделить все]
 no function definition: vlax-erased-pнет определения функции: vlax-erased-p
при этом далее ничего не происходит, т.е. команда не выполняется
А у меня, на AutoCAD 2018 (Win10, 64, ver. 1709), это же сообщение выскакивает не "с недваних пор", а сразу, при первой же попытке использования.
Попробовал загрузить на соседнем компе. Там 2014. Без проблем, все работает
edemine вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 28.03.2018, 08:17
#426
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 35,840


(vl-load-com) ?
__________________

---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 28.03.2018, 15:14
#427
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,701
Отправить сообщение для VVA с помощью ICQ Отправить сообщение для VVA с помощью Skype™


Цитата:
Сообщение от Кулик Алексей aka kpblc Посмотреть сообщение
(vl-load-com) ?
Правильнее так (vl-load-com) ? и как вариант еще Что делать, если не работает ActiveX
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 04.04.2018, 16:34
#428
MFor

Инженер-проектировщик
 
Регистрация: 08.02.2007
С-Петербург
Сообщений: 96
Отправить сообщение для MFor с помощью ICQ


Добрый день.
Не нашел поиском, рискну спросить.
Можно сделать так чтобы BGCOLOR не перекрашивала заблокированные слои?

----- добавлено через ~7 мин. -----
И забыл еще спросить. Есть ли подобная утилита для установки веса линии всем выбранным примитивам?
MFor вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 04.04.2018, 17:22
#429
PsixVK


 
Регистрация: 19.10.2012
Киев
Сообщений: 684


Цитата:
Сообщение от MFor Посмотреть сообщение
И забыл еще спросить. Есть ли подобная утилита для установки веса линии всем выбранным примитивам?
есть
выбираете примитивы и перекрашиваете в любом удобном месте (на картинке жолтым показал: где цвет, вес и тип линий менять)
PsixVK вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 04.04.2018, 17:29
#430
engngr

сети
 
Регистрация: 03.11.2008
Московия*
Сообщений: 4,147


Заморозить заблокированные слои?
engngr вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 04.04.2018, 17:56
#431
PsixVK


 
Регистрация: 19.10.2012
Киев
Сообщений: 684


"BGCOLOR - Задает выбранный цвет всем объектам"
често я не понимать зачем эта команда если есть "Секд+Ф" и свойства где можно выбрать нужный цвет.
PsixVK вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 04.04.2018, 18:11
#432
MFor

Инженер-проектировщик
 
Регистрация: 08.02.2007
С-Петербург
Сообщений: 96
Отправить сообщение для MFor с помощью ICQ


Товарищи, я может не так выразился, но выделить все и задать цвет, вес и т.п. без чужой помощи за 15 лет научился как-то сам

BGCOLOR задает цвет всем объектам (ну или почти всем), включая блоки, блоки в блоках и т.д.
Есть ли подобная утилита, которая задаст вес всем линиям на чертеже, включая примитивы в блоках?

BGCOLOR перекрашивает все объекты на всех слоях, будь они выключены, заморожены, заблокированы, в отличии от BGHATCHDEL, которая спрашивает удалять с заблокированных и замороженных или нет.
MFor вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 04.04.2018, 18:34
#433
PsixVK


 
Регистрация: 19.10.2012
Киев
Сообщений: 684


Цитата:
Сообщение от MFor Посмотреть сообщение
Товарищи, я может не так выразился, но выделить все и задать цвет, вес и т.п. без чужой помощи за 15 лет научился как-то сам

BGCOLOR задает цвет всем объектам (ну или почти всем), включая блоки, блоки в блоках и т.д.
Есть ли подобная утилита, которая задаст вес всем линиям на чертеже, включая примитивы в блоках?

BGCOLOR перекрашивает все объекты на всех слоях, будь они выключены, заморожены, заблокированы, в отличии от BGHATCHDEL, которая спрашивает удалять с заблокированных и замороженных или нет.
"BGBLFIX - Нормализация блоков (цвет, слой, взрываемость и т.п.)"
нормализируете блоки а дальше любые извр BGCOLOR
PsixVK вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 04.04.2018, 23:13
#434
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,701
Отправить сообщение для VVA с помощью ICQ Отправить сообщение для VVA с помощью Skype™


Цитата:
Сообщение от MFor Посмотреть сообщение
Можно сделать так чтобы BGCOLOR не перекрашивала заблокированные слои?
Можно. Нужно посмотреть код. Давно писал, не помню. Гляну завтра на работе
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 12.04.2018, 16:46
#435
KohovecM


 
Регистрация: 12.04.2018
Сообщений: 6


Добрый день, спасибо большое за хорошее LISP-приложение! Можно ли ещё внести в него 2 изменения по BGBLEXP:
1. - Выделить отдельную команду для взрыва блока без сохранениия полей в атрибутах?
2. - И при взрыве блоков, чтоб сохранялись постоянные атрибуты?
Миниатюры
Нажмите на изображение для увеличения
Название: Снимок1.PNG
Просмотров: 23
Размер:	54.4 Кб
ID:	201238  Нажмите на изображение для увеличения
Название: Снимок2.PNG
Просмотров: 20
Размер:	41.4 Кб
ID:	201239  
Вложения
Тип файла: dwg
DWG 2007
MK_rod_beam.dwg (86.8 Кб, 1 просмотров)
KohovecM вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 13.04.2018, 08:30
#436
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,701
Отправить сообщение для VVA с помощью ICQ Отправить сообщение для VVA с помощью Skype™


Цитата:
Сообщение от KohovecM Посмотреть сообщение
Выделить отдельную команду для взрыва блока без сохранения полей в атрибутах?
Добавил версию 3.4. Различия описал в 1 посте. В многострочных артибутах поля, особенно с символами \U+???? корректно выделить невозможно.
Поэтому поля остаются в версии 3.3. Для меня важнее скорость при обработке большого количества блоков, сохранение многострочных атрибутов как мтекста с маскировкой
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 13.04.2018, 08:58
#437
KohovecM


 
Регистрация: 12.04.2018
Сообщений: 6


Спасибо большое!Атрибуты с постоянным режимом всё равно не сохраняются при разбиении, можно ли это сделать?
KohovecM вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 13.04.2018, 11:25
1 | #438
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,701
Отправить сообщение для VVA с помощью ICQ Отправить сообщение для VVA с помощью Skype™


Обновил до версии 3.5
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 13.04.2018, 12:14
#439
KohovecM


 
Регистрация: 12.04.2018
Сообщений: 6


Спасибо огромное!
KohovecM вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 15.04.2018, 11:21
#440
skkkk

AutoCAD_2008->2011
 
Регистрация: 20.03.2008
Московская область
Сообщений: 2,196


VVA, заметил одну особенность команды BGCFT (снос полей). Она обрабатывает помимо блоков еще и внешние ссылки. Не знаю, задумано ли это так или просто получилось само собой, но это на мой взгляд не совсем правильно. Во-первых, подоснова, как правило, разрабатывается другими людьми, а менять их чертежи - дурной тон. А во-вторых, на чертежах с большим количеством (10+) увесистых внешних ссылок Автокад уходит в задумчивое состояние, из которого не возвращается (в обозримом будущем - пробовал ждать около часа).
Можно было бы воспользоваться BGCFTSEL, но она не преобразует поля, которые сидят в текстах внутри блока, преобразует только поля в атрибутах.
skkkk на форуме вставить имя Обратить внимание модератора на это сообщение  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Готовые программы > LISP. Подготовка подосновы

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Научите лиспу на примере (или как kpblc, VVA и компания пытаются обучить чайника лиспу) Red Nova LISP 3665 24.09.2018 13:55
{Конкурс} Lisp. Задачки для студентов gomer LISP 10 05.01.2011 16:33
LISP на команду 3dcorbit Малюк LISP 2 30.09.2009 14:18
Запуск Lisp команды в новом документе BlackHarp LISP 1 26.03.2009 23:06
загрузка DOS прог через LISP Gaa LISP 15 12.08.2005 19:19

|| Главная || Каталог САПР || Тендеры || Публикации || Объявления || Биржа труда || Download || Галерея ||
|| Библиотека || Кунсткамера || Каталог предприятий || Контакты || Файлообменник || Блоги ||