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

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

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

Версия для печати
 
Ответ
Опции темы Поиск в этой теме
Непрочитано 13.04.2011, 20:25 20 |
LISP. Подготовка подосновы
VVA
 
Инженер LISP
 
Минск
Регистрация: 11.05.2005
Сообщений: 6,554
Отправить сообщение для 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.3
Код:
[Выделить все]
;;;	Версии:
;;;	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 Кб, 429 просмотров)

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

Последний раз редактировалось VVA, 06.09.2017 в 22:28. Причина: версия 3.1 (сохранение полей в атрибутах при расчленении)
Просмотров: 156013
 
Непрочитано 02.08.2011, 18:00
#41
ssn

Инженер проектировщик (раздел ТМ - фриланс)
 
Регистрация: 06.12.2003
Воронеж
Сообщений: 1,076
Отправить сообщение для ssn с помощью Skype™


а случаем нет такой проги, которая действовала наподобие MERGE, только с сохранением цвета примитивов.
т.е. есть два слоя, на каждом примитивы с цветом по слою
допустим хочу все это дело собрать на один слой (допустим третий), но что бы объёкты каждого из слоёв остались прежнего цвета, только конечно получится что цвет назначен явно.
это про те же подосновы. если хочется сохранить разноцветность чертежа, но все разместить на одном слое (да и управляемость сохранится хоть как то).

PS^ если цвет задан явно, то впринципе и MERGE не меняет цветсти... значит надо просто задать всем примитивам цвета явно.

Последний раз редактировалось ssn, 02.08.2011 в 18:13.
ssn вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 02.08.2011, 18:13
#42
VVA

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


ssn,
1. Нужен Лисп для перевода цвета объекта пост #4
2. MERGE
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 02.08.2011, 18:14
#43
ssn

Инженер проектировщик (раздел ТМ - фриланс)
 
Регистрация: 06.12.2003
Воронеж
Сообщений: 1,076
Отправить сообщение для ssn с помощью Skype™


спасибо.
оперативненько однако....
ssn вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 12.08.2011, 12:38
#44
ssn

Инженер проектировщик (раздел ТМ - фриланс)
 
Регистрация: 06.12.2003
Воронеж
Сообщений: 1,076
Отправить сообщение для ssn с помощью Skype™


а нельзя ли лисп из поста 42 немного откоректировать, что бы была возможность сразу при переопределении параметров цвета, тощины и прочего ещё и переносить объект на определённый слой (который можно было бы выбрать на чертеже допустим)
если выбор примитива есть - все объекты на этот слой, если выбор пустой - просто переназначение свойств...
получится почти команда MERGE...
В идеале это бы конечно срастить эти две команды в одну. просто когда очень много слоёв команда MERGE тоже запарая (выбор каждого слоя отдельно)
ssn вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 19.08.2011, 09:59
#45
Eddicordo

КИП и А
 
Регистрация: 28.04.2010
Киев
Сообщений: 99
Отправить сообщение для Eddicordo с помощью ICQ


Всем привет
VVA,
Звиняй что так долго проподал.
Выкладываю файлик с блоком где при взрыве не корректно взрываются символы с верним и нижним индексами
Вложения
Тип файла: dwg
DWG 2004
Ошибка взрыва.dwg (48.8 Кб, 4308 просмотров)
Eddicordo вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 05.10.2011, 18:46
#46
shartal


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


При наличии в блоке маскировки, после расчленения любой из указанных команд, меняется произвольным образом порядок прорисовки- часто она вылазит на верх. И если в чертеже несколько блоков перекрывающих друг друга, после расчленения предстоит невероятная работа по раскладке всего по порядку. Самое странное, вставки одного и того же блока расчленяются по разному.
shartal вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 05.10.2011, 18:56
#47
VVA

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


shartal, Выложи пример файла
Eddicordo, Верхние и нижние индексы починил. Пока не выкладываю, переделываю FixBlok. Диалог готов, осталось код немного доработать
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 05.10.2011, 21:10
#48
Vova

Engineer
 
Регистрация: 05.09.2003
New-York
Сообщений: 9,745


Там некоторая смесь языков. Будет-ли в итоговой программе диалог на англ и как вызывать его на нужном языке?
Vova вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 05.10.2011, 22:16
#49
VVA

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


Диалог будет на русском, если кодовая страница ANSI_1251, в остальных случаях английский. Смесь - чтобы прикинуть как будет смотреться диалог.
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 06.10.2011, 10:23
#50
shartal


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


Файл с блоком. Блок несколько урезан, атрибуты решеткой, но в реальности они должны быть, и обычным burst блок нельзя обработать. После burst маскировка сохраняет положение. А вот в рекомендованом на форуме Burst Upgraded с маскировкой та же беда.
Вложения
Тип файла: dwg
DWG 2010
Чертеж2.dwg (262.2 Кб, 4304 просмотров)
shartal вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 06.10.2011, 11:22
#51
angel-fear

инженер-электрик
 
Регистрация: 21.10.2010
Краснодар
Сообщений: 132


Цитата:
Сообщение от VVA Посмотреть сообщение
А MERGE это что, простите? Где эту команду откопать?
angel-fear вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 06.10.2011, 12:19
#52
VVA

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


Цитата:
Сообщение от angel-fear Посмотреть сообщение
А MERGE это что, простите? Где эту команду откопать?
Имелось ввиду Layer merge
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 06.10.2011, 13:57
#53
angel-fear

инженер-электрик
 
Регистрация: 21.10.2010
Краснодар
Сообщений: 132


А почему эта команда (laymrg) не предлагается при выборе по TAB? По какому принципу вообще этот выбор работает?
angel-fear вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 06.10.2011, 16:21
#54
VVA

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


angel-fear, Ты это о чем?
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 03.11.2011, 15:43
#55
Kostinok

Инженер-электрик
 
Регистрация: 13.10.2007
Калининград
Сообщений: 150


VVA, здравствуйте

Команда "BGCOLORXREF", меняет цвет выбранной внешней ссылки, а как вернуть исходное состояние цвета?

Файл прилагаю, ссылка в файле "1136-11-ЭН.dwg" одноцветная, когда как исходный файл "11_02838_500_не_согл.dwg" разноцветный.
Вложения
Тип файла: zip 1136-11-ЭН.zip (465.9 Кб, 102 просмотров)
__________________
Можно сопротивляться вторжению армий, вторжению идей сопротивляться невозможно. /В. Гюго/
Kostinok вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 04.11.2011, 10:37
1 | #56
VVA

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


VISRETAIN тебе в помощь
1. Установи VISRETAIN в 0
2. В диспетчере ссылок обнови ссылку
3. Установи VISRETAIN в 1
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 24.11.2011, 11:20
#57
Eddicordo

КИП и А
 
Регистрация: 28.04.2010
Киев
Сообщений: 99
Отправить сообщение для Eddicordo с помощью ICQ


VVA, Привет.

Цитата:
Сообщение от VVA Посмотреть сообщение
Eddicordo, Верхние и нижние индексы починил. Пока не выкладываю, переделываю FixBlok. Диалог готов, осталось код немного доработать
Не могли бы выложить исправленую версию программы с индексами? А то очень неудобно взрывать все и после отслеживать все индексы.
Благодарю. )
Eddicordo вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 24.11.2011, 12:04
#58
VVA

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


Eddicordo,
Выложил, тестируй. Изменил команду BgBLFIX, правда толком еще не оттестировал. Так что тестируй так же
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 09.12.2011, 18:50
#59
VVA

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


Обновлена до версии 2.13. Причина
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Непрочитано 12.12.2011, 17:25
#60
shartal


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


Есть маленькая просьба, нельзя ли запрос о конвертации всех полей убрать. Хочу создать пакетный файл на обработку группы dwg, и вспылающий запрос не позволяет автоматизировать это.
shartal вне форума вставить имя Обратить внимание модератора на это сообщение  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Готовые программы > LISP. Подготовка подосновы

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

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

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

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