| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

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

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

Ответ
Поиск в этой теме
Непрочитано 13.04.2011, 20:25 24 |
LISP. Подготовка подосновы
VVA
 
Инженер LISP
 
Минск
Регистрация: 11.05.2005
Сообщений: 6,990

Набор команд, опубликованных в теме Подоснова
Желательно ознакомиться с указанной темой или как минимум с описанием
Описание команд
Код:
[Выделить все]
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 - Задает выбранный цвет всем объектам
BGCOLORCMD - Задает выбранный цвет всем объектам с запросом в командной строке
BGCOLORXREF - Меняет цвет выбранных внешних сылок (только в текушем сеансе)
BGCOLBL - Установка "послою" цвета примитивов подосновы. Если цвет задан явно- создается новый слой !Новое с версии 3.0
BGResetXRef -Сброс настроек слоев выбранных внешних ссылок на установленные в исходном файле
BGBLCC - Изменяет цвет выбранных блоков
BGENCC - Изменяет цвет выбранного элемента блока
BGCATT - Изменяет цвет атрибутов выбранных блоков
BGCBL2 - Изменяет цвет в блоках 2 и более уровня (вложенных блоках)
BGBLFIX - Нормализация блоков (цвет, слой, взрываемость и т.п.)
BGCFT   - Конвертирует все поля в обычный текст
BGCFTSEL - конвертирование полей в обычный текст в выбранных примитивах
BGHATCHDEL - Удаление штриховки
Текущая версия 3.13a
Отличие версий 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 - сохранение полей в атрибутах
;;;   3.2    BGCFT игнор
;;;   3.3    Исправление в команде M2B
;;;   3.4    Исправление fix bg:explode-block (исключение обработки внешних ссылок)
;;;   3.5    BG:BURST-ONE измененая для сохранения постоянных атрибутов
;;;   3.6    добавлено bg:del-constraint в BGBLEXP
;;;   3.7    изменения в команде M2B
;;;   3.8    Изменения в bg:FieldCode (http://forum.dwg.ru/showpost.php?p=1754063&postcount=467)
;;;   3.9    Изменения BGLAYDEL. Слои удаляются командой _-LAYDEL
;;;   3.10   Добавлена команда BGCOLORCMD
;;;;  3.11   Изменения BGLAYDEL
;;;;  3.12   Изменения в функции mip_MTEXT_Unformat (VVA 2021-12-24)
;;;;          https://forum.dwg.ru/showthread.php?p=1975506#post1975506
;;;;   3.12a   Изменения в функции bg:hatch-delete-form-Block (VVA 2022-05-13)
;;;;            https://forum.dwg.ru/showpost.php?p=1991289&postcount=624

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

Вложения
Тип файла: zip bgtools 3.3.zip (53.6 Кб, 6490 просмотров)
Тип файла: zip bgtools3.13b.zip (57.3 Кб, 208 просмотров)

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

Последний раз редактировалось VVA, 29.01.2024 в 16:36. Причина: См историю изменений
Просмотров: 411650
 
Непрочитано 13.11.2014, 22:29
#221
Profan


 
Регистрация: 25.12.2005
Москва
Сообщений: 13,627


Offtop: А говорят, что за битого двух небитых дают.
Profan вне форума  
 
Непрочитано 13.11.2014, 22:41
#222
gomer

строю, ломаю
 
Регистрация: 03.04.2008
Украина
Сообщений: 5,515


ну так прояви полет фантазии, то, что ты выложил конечно очень полезно, но у темных людей это не заработает или очень со скрипом
gomer вне форума  
 
Непрочитано 14.11.2014, 13:13
#223
zmejsan


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



БОЛЬШОЕ ЧЕЛОВЕЧЕСКОЕ МЕРСИ!!!
zmejsan вне форума  
 
Непрочитано 27.11.2014, 10:54
#224
Profan


 
Регистрация: 25.12.2005
Москва
Сообщений: 13,627


Вопрос к VVA:
Программа BGHATCHDEL (удаление штриховки) удаляет любую штриховку из блоков. Как бы сделать так, чтобы штриховка удалялась по выбору.
Например, мне надо удалить только штриховку SOLID из блоков, другие типы штриховок не трогать.
Profan вне форума  
 
Автор темы   Непрочитано 28.11.2014, 08:24
1 | #225
VVA

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


Цитата:
Сообщение от Profan Посмотреть сообщение
Программа BGHATCHDEL (удаление штриховки) удаляет любую штриховку из блоков. Как бы сделать так, чтобы штриховка удалялась по выбору.
Пока не придумал как сделать список всех штриховок в чертеже, кроме перебора. Пока 3 варианта в порядке моих предпочтение:
1. Написать вариант удаления штриховок SOLID
2. Перебрать все штриховки и составить список имен для выбора
3. Считать имена штриховок из *.pat файлов
В моей практике пока что так же требовалось удалять SOLID штриховки
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 10.12.2014, 15:41
#226
adu

инженер систем безопасности
 
Регистрация: 07.10.2011
Сообщений: 36
<phrase 1=


Уважаемый VVA!
Можно ли добавить в bgtools команду для расчленения всех таблиц на чертеже, либо поправить bgballdyn2a и bgballdyn2s так, чтоб они видели блоки вставленные в ячейку таблицы?
Все свободные дин. блоки на чертеже преобразовываются в статические либо анонимные, а те, что вставлены в ячейку таблицы игнорируются (((
Пример прилагаю.
Вложения
Тип файла: dwg
DWG 2007
Чертеж1.dwg (135.1 Кб, 2606 просмотров)

Последний раз редактировалось adu, 10.12.2014 в 15:57.
adu вне форума  
 
Непрочитано 10.12.2014, 16:49
#227
crosandr

Инженер-строитель
 
Регистрация: 09.07.2010
Санкт-Петербург
Сообщений: 1,988


А чем обычное расчленение (_explode) не устраивает?
crosandr вне форума  
 
Непрочитано 10.12.2014, 16:52
#228
adu

инженер систем безопасности
 
Регистрация: 07.10.2011
Сообщений: 36
<phrase 1=


Данное действие необходимо в составе множества других. Для одного чертежа конечно можно вручную исполнить, но когда их большое количество это очень затратно по времени.
Мне необходимо задать все эти действия (в том числе и расчленение таблиц) на одну кнопку.
adu вне форума  
 
Непрочитано 12.12.2014, 20:16
#229
АлексЮстасу

топограф, технолог
 
Блог
 
Регистрация: 24.05.2009
Москва
Сообщений: 3,030


Интересный случай в http://forum.dwg.ru/showthread.php?p...16#post1348616.
Анонимные блоки отметок высот (синего цвета) содержат вложенные тоже анонимные блоки. И, похоже, в каждом из них точка привязки с координатами с огромными значениями. Т.е. при разбивании или при преобразовании в именованные блоки все они отлетают на величину, равную этим значениям координат. Причем, возможно, у каждого из этих блоков отметок свои координаты точек привязки. Т.е., если все такие блоки преобразовать или все разбить, а потом сдвинуть, то они могут на свои места не сесть.

Может быть предусмотреть еще одну команду - замены координат точки привязки на 0,0?

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

Последний раз редактировалось АлексЮстасу, 12.12.2014 в 20:49.
АлексЮстасу вне форума  
 
Непрочитано 25.02.2015, 17:52
#230
shartal


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


Странная вещь происходит. В чертеже есть аннотативный блок, который имеет в себе больше одного аннотативного масштаба. В блоке есть односточный и многострочный атрибуты. К чертежу применяется BGBLALLDYN2S или BGBLALLDYN2A. Блок правильно преобразовывается и отображается. После сохранения, закрытия и открытия, многострочный атрибут отображается в том масштабе в котором блок вставлялся в чертеж. Т.е. текущий масштаб на момент вставки был 1:100, блоку был добавлен масштаб 1:200, видовой экран имеет маштаб 1;200 и до закрытия все выглядит отлично. После открытия многосторочный атрибут имеет высоту под масштаб 1:100.
shartal вне форума  
 
Автор темы   Непрочитано 25.02.2015, 18:09
#231
VVA

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


shartal, Выложи пример, посмотрю, хотя идей никаких. В вышеназванных командах используются стандартные методы динамических блоков
Цитата:
Команда: (vlax-dump-Object(setq obj(vlax-ename->vla-object(car(entsel)))) t)
Выберите объект: ; IAcadBlockReference: Интерфейс AutoCAD для работы с
вхождениями блоков.
; Значения свойств:
; Application (RO) = #<VLA-OBJECT IAcadApplication 0000000140d28e28>
; EffectiveName (RO) = "MIP_LTB_AIR_DYN"
; InsertionPoint = (1683.11 1261.97 0.0)
; InsUnits (RO) = "Безразмерный"
; IsDynamicBlock (RO) = -1
; Layer = "0"
; ObjectName (RO) = "AcDbBlockReference"
….
; Поддерживаемые методы:
; ArrayPolar (3)
; ArrayRectangular (6)
; ConvertToAnonymousBlock ()
; ConvertToStaticBlock (1)
; Copy ()
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 26.02.2015, 10:13
#232
shartal


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


фыв орининал
фыв_ после обработки
От динамики здесь только точка вставки, но этого достаточно.
Вложения
Тип файла: dwg
DWG 2010
фыв.dwg (221.6 Кб, 1951 просмотров)
Тип файла: dwg
DWG 2007
фыв_.dwg (196.2 Кб, 1946 просмотров)

Последний раз редактировалось shartal, 26.02.2015 в 10:19.
shartal вне форума  
 
Непрочитано 05.03.2015, 10:48
#233
PsixVK


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


здравствуйте!
хотел спросить возможно ли в диалоговое окно "BGBLFIX" добавить просмотр миниатюр блоков? хотя по моему это выглядит как сверхнаглость
простите если такое уже спрашивали, бегло просмотрел тему не увидел похожего вопроса
PsixVK вне форума  
 
Автор темы   Непрочитано 05.03.2015, 12:39
#234
VVA

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


Цитата:
Сообщение от PsixVK Посмотреть сообщение
хотел спросить возможно ли в диалоговое окно "BGBLFIX" добавить просмотр миниатюр блоков?
К сожалению в DCL этого нельзя. По крайней мере я не знаю как это можно сделать
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 27.03.2015, 15:20
#235
shartal


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


Команда BGCFT убивает текст в мультивыносках с полями. Содержимое полностью стирается.
А команда CFTAll отсюда http://forum.dwg.ru/showthread.php?t=20190&page=2 символы в вопросы превращает.
Что делать..
Вложения
Тип файла: dwg
DWG 2010
Чертеж9.dwg (194.5 Кб, 1593 просмотров)
Тип файла: dwg
DWG 2010
10.dwg (194.1 Кб, 1593 просмотров)

Последний раз редактировалось shartal, 27.03.2015 в 15:29.
shartal вне форума  
 
Автор темы   Непрочитано 27.03.2015, 23:06
#236
VVA

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


Обновил до версии 2.32
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 30.03.2015, 10:13
#237
PsixVK


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


Цитата:
Сообщение от VVA Посмотреть сообщение
Обновил до версии 2.32
а в "историю изменений" дописать?
PsixVK вне форума  
 
Непрочитано 30.03.2015, 11:00
#238
RNB

Проектирование мостов
 
Регистрация: 29.01.2014
Новосибирск
Сообщений: 433


Цитата:
Сообщение от VVA Посмотреть сообщение
PFL - Properties From Layer
Почему-то не даёт никаких результатов...
RNB вне форума  
 
Автор темы   Непрочитано 30.03.2015, 11:35
#239
VVA

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


Цитата:
Сообщение от PsixVK Посмотреть сообщение
а в "историю изменений" дописать?
В файле есть. Добавил в #1
Цитата:
Сообщение от RNB Посмотреть сообщение
Почему-то не даёт никаких результатов

без файла помочь ничем не смогу
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 30.03.2015, 11:41
#240
RNB

Проектирование мостов
 
Регистрация: 29.01.2014
Новосибирск
Сообщений: 433


Цитата:
Сообщение от VVA Посмотреть сообщение
без файла помочь ничем не смогу
Просто открываю пустой файл, рисую несколько примитивов, руками меняю свойства. Вызываю программу, ничего не меняется. Может я неправильно понял назначение лиспа? (я так понял, что меняет все свойства объектов на "по слою").
Акад 2016демо. Вин7х64
RNB вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Готовые программы > LISP. Подготовка подосновы

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Научите лиспу на примере (или как kpblc, VVA и компания пытаются обучить чайника лиспу) Red Nova LISP 4555 24.03.2024 13:44
{Конкурс} 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