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

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

Задумал лисп для layout

Ответ
Поиск в этой теме
Непрочитано 26.04.2008, 23:15
Задумал лисп для layout
Red Nova
 
ՃԱՐՏԱՐԱԳԵՏ, տ.գ.թ.
 
Торонто
Регистрация: 23.10.2007
Сообщений: 1,990

Вот в чем идея.
Я пользуюсь листами.
Листы обычно именуются так:
“1” “2” “3”
или
“К-1” “К-2” “К-3”
или
“КМ 1” “КМ 2” “КМ 3”
При этом указанные тут цифры соответствуют номеру страницы в штампе.

Задуманы две операции.
1. Переименование листов.
Допустим имеем к примеру 10 листов, с похожими наименованиями, и поочередными номерами страниц. При это не обязательно чтобы первый лист начинался с 1, он может и с другой цифры начаться, ведь часть проекта может быть и в другом файле. Чтобы не переименовывать все листы по очереди (если есть нужда), было бы удобно заполнить название только первого листа, отметить все листы подлежащие перенумернацие, и получить в итоге похожие названия листов, разнумерованные по очереди. При этом перенумернацие подлежат только выделенные листы (ведь в файле могут быть листы которые не надо трогать).

2. Передача номера страницы штампу.
На листах у меня только штамп, который загнан в блок, но часть штампа (только надпись и номер текущей страницы) не в блоке, они мтекстом располагаются поверх блока, еще иногда на листе располагается примечание.
Нужно чтобы для выделенных листов номер из названия переписался по принципу оверрайт в мтекст над штампом. Нужный мтекст вычисляется как единственный содержащий только цыфры. Ведь в остальных обязательно кроме цифр есть и текстовое содержание.
Понимаю что все по разному штампы делают, и может предложенная тут команда будет на любителя, но мои размышления полностью в рамках того как у меня в офисе устроен штамп.

Если кто-то откликнется, прикрепляю файл с моим штампом.
Заранее спасибо.

Вложения
Тип файла: dwg
DWG 2007
лист со штампом.dwg (194.5 Кб, 1844 просмотров)

__________________
Блог
Просмотров: 8338
 
Автор темы   Непрочитано 28.04.2008, 10:57
#21
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, տ.գ.թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,990
Отправить сообщение для Red Nova с помощью Skype™


DEM, Cпасибо. В связи со штампом СПДС есть пару вопросов. Количество листов есть постоянная величина. А насколько я понял в СПДС штампах надо в каждом штампе отдельно вводить эту цифру. Может есть вариант автоматизировать о котором я не знаю?

VVA, Спасибо за пример. Правда это не всегда подходит. Как быть если название листа "КМ-1", а поле должно захватить только "1", конечно-же можно подстроится и писать в названии листа только 1, но все же интересно знать можно так или нет.
А по пункту 1, с поста 1? Как считаешь не реально?
__________________
Блог
Red Nova вне форума  
 
Непрочитано 28.04.2008, 12:13
#22
DEM

YngIngKllr
 
Регистрация: 29.03.2005
СПб
Сообщений: 12,968


1. В штампы СПДС можно вводить поля
2. По поводу выхватывания части поля то вопрос уже обсуждался попробуй по ищи по ключевому слову ПОЛЕ
__________________
Работаю за еду.
Working for food.
Für Essen arbeiten.
العمل من أجل الغذاء
Працую за їжу.
DEM вне форума  
 
Непрочитано 28.04.2008, 12:55
#23
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,996


Fields, как взять только часть текста?
Поле: %<\AcDiesel $(substr,$(getvar,CTAB),4)>%
Из имени листа (переменная CTAB) берется строка, начиная с 4 символа
Листы должны иметь формат TTTNNN, где TTT - текстовая часть, NNN - числовая часть. Примеры: КМ-1, КМ-1.1
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Автор темы   Непрочитано 28.04.2008, 13:03
#24
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, տ.գ.թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,990
Отправить сообщение для Red Nova с помощью Skype™


Хе хе, темка то моя. Правда помню, я тогда так и оснался в тумане, щас попробую напрячься, и сделать как VVA говорит. Да прибудит со мной сила.
__________________
Блог
Red Nova вне форума  
 
Непрочитано 28.04.2008, 13:25
#25
dextron3

проектировшик
 
Регистрация: 01.01.2007
СССР
Сообщений: 5,149


Red Nova, не все так просто листы штампы с лайаутами соеденить,
не забывай что на лайаутах примечание где стоит ссылка на близ лежащие листы, на листы со спецификациями, также на узлы,
я раньше думал об этом, но лучше когда сам забил лист, проверил примечание, так и ошибок меньше...
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
 
Автор темы   Непрочитано 28.04.2008, 14:41
#26
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, տ.գ.թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,990
Отправить сообщение для Red Nova с помощью Skype™


VVA, Никак не получается эту строчку в поле прописать. Можно файл?
DEM, А как вообще из одного листа в другой поле задать, я умею только тогда поле задавать, когда оба объекта в одном пространстве. жму pick object, и выбераю нужный текст, но этим вариантом между листами прыгать не выходит.
__________________
Блог
Red Nova вне форума  
 
Непрочитано 28.04.2008, 14:58
#27
lee


 
Регистрация: 28.02.2004
43
Сообщений: 1,819
<phrase 1=


Цитата:
Сообщение от dextron3 Посмотреть сообщение
lee, Hodie caesar, cras nihil...
Кто бы сомневался. Про Волгу и Каспийское море расскажи. Я в тетрадку запишу
lee вне форума  
 
Непрочитано 28.04.2008, 18:31
#28
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,996


Файл
Вложения
Тип файла: dwg
DWG 2004
Поле на лист.dwg (64.5 Кб, 940 просмотров)
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 28.04.2008, 18:32
#29
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,996


>Iee, dextron3 Так скоро и я латынь выучу
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Автор темы   Непрочитано 28.04.2008, 20:50
#30
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, տ.գ.թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,990
Отправить сообщение для Red Nova с помощью Skype™


VVA,
Спасибо, теперь понял (беру на вооружение).
А что ты демаешь про
Цитата:
1. Переименование листов.
Допустим имеем к примеру 10 листов, с похожими наименованиями, и поочередными номерами страниц. При это не обязательно чтобы первый лист начинался с 1, он может и с другой цифры начаться, ведь часть проекта может быть и в другом файле. Чтобы не переименовывать все листы по очереди (если есть нужда), было бы удобно заполнить название только первого листа, отметить все листы подлежащие перенумернацие, и получить в итоге похожие названия листов, разнумерованные по очереди. При этом перенумернацие подлежат только выделенные листы (ведь в файле могут быть листы которые не надо трогать).
__________________
Блог
Red Nova вне форума  
 
Непрочитано 03.05.2008, 13:45
#31
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,996


по п.1 см http://dwg.ru/f/showthread.php?p=238788
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Автор темы   Непрочитано 03.05.2008, 16:58
#32
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, տ.գ.թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,990
Отправить сообщение для Red Nova с помощью Skype™


Иду туда
__________________
Блог
Red Nova вне форума  
 
Непрочитано 30.05.2008, 13:26
#33
dep


 
Регистрация: 07.12.2004
ЛССР
Сообщений: 12


Цитата:
Сообщение от VVA Посмотреть сообщение
Fields, как взять только часть текста?
Поле: %<\AcDiesel $(substr,$(getvar,CTAB),4)>%
Из имени листа (переменная CTAB) берется строка, начиная с 4 символа
Листы должны иметь формат TTTNNN, где TTT - текстовая часть, NNN - числовая часть. Примеры: КМ-1, КМ-1.1
А как переделать этот код чтобы брать не "начиная с 4ого символа", а, скажем, ДО 4ого символа?

Заранее благодарю.
dep вне форума  
 
Непрочитано 30.05.2008, 13:51
#34
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,996


Категория полей Diesel Expression
$(substr,$(getvar,CTAB),1,4)
или
%<\AcDiesel $(substr,$(getvar,CTAB),1,4)>%
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Автор темы   Непрочитано 04.06.2008, 18:00
#35
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, տ.գ.թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,990
Отправить сообщение для Red Nova с помощью Skype™


VVA,
А можно написать такую формулу, чтобы отсчет велся сзади, но до тех пор пока есть цифры?
Примеры
КМ-1 берем 1
ЭМ1.2 берем 1.2
ОолР 23 берем 23
__________________
Блог

Последний раз редактировалось Red Nova, 04.06.2008 в 19:50.
Red Nova вне форума  
 
Непрочитано 04.06.2008, 18:03
#36
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,996


Цитата:
А можно написать такую пормула, чтобы отсчет велся сзади
Требует пояснений. Написать на чем? На лиспе?
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Автор темы   Непрочитано 04.06.2008, 19:55
#37
Red Nova

ՃԱՐՏԱՐԱԳԵՏ, տ.գ.թ.
 
Регистрация: 23.10.2007
Торонто
Сообщений: 1,990
Отправить сообщение для Red Nova с помощью Skype™


Сорри, в одном слове две ошибки многовато.
Я имел ввиду формулу для поля, отображающего номер страницы. Дело в том, что не всегда удобно брать скажем начиная от третьей цифры, так как имя листа может изменится, например
КМ1
станет
РРС1
В следствие вместо 1, в поле номера листа будет С1.
А надо чтобы бралась только численная часть
__________________
Блог
Red Nova вне форума  
 
Непрочитано 05.06.2008, 05:28
#38
TwoZero

Программист
 
Регистрация: 06.03.2008
г.Иркутск
Сообщений: 52
<phrase 1= Отправить сообщение для TwoZero с помощью Skype™


насчет динамических блоков и притормаживания, у меня на чертеже куча разнообразных динамических блоков и таблиц привсем при этом
у меня стоит подсветка примитивов, ну незнаю почему у вас тормозин но у меня все просто летает.
Компьютер:
Pentium 4 intel core2 4300 1.8Ghz
NVIDIA GeForce 7600 GS
1 GB ОЗУ
остальное нетак важно
да и вообще, автокад очень требователен к видеокарте а не к процессору, чем круче видюха тем быстрее акад будет работать,
всетаки у автакада мощьная графическая система.
TwoZero вне форума  
 
Непрочитано 05.06.2008, 07:23
#39
dextron3

проектировшик
 
Регистрация: 01.01.2007
СССР
Сообщений: 5,149


1. Подскажите как отключить подсветку динамических блоков только?
2. Как сделать копию динамического блока с переименованием, а функционал оставался тем же? (при этом старый динблок остался тем же)
dextron3 вне форума  
 
Непрочитано 05.06.2008, 09:50
#40
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,996


Red Nova, Думаю Diesel'ом такое невозможно.
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Задумал лисп для layout



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Новая задачка для ЛИСП умельцев Gostushev LISP 63 29.10.2020 13:10
Резервуар 250м.куб. на проверку dextron3 Инженерные сети 42 07.05.2011 15:59
Нужен маленький лисп - для текста maksimys LISP 2 28.11.2007 08:51
ЛИСП Polyline для AutoCAD LT paradplanet LISP 2 05.07.2006 02:38
Определение нагрузок для нестандартных конструкций. NIVa Конструкции зданий и сооружений 2 06.08.2005 21:42