Реклама i
ФОТОТЕХ
VetCAD

Вставка и автоматическая нумерация блоков v.2.2.3 и v.4.1 Test

    10 оценок

roaa

размещено: 15 Августа 2012
обновлено: 11 Февраля 2022
Нумерация блоков на полилинии и без нее.
Нумерация блоков производится текстом, МТекстом или атрибутами.
Присутствует возможность нумерации блоков с одним и с несколькими атрибутами (с выбором атрибута).
Нумерация с поддержкой разрядности типа "01" "001" и т.д.
Для выбора нумерации требуемых блоков используется фильтр, для выбора атрибута в блоке с несколькими атрибутами - выбор маски.
При выборе стартового номера и приращения равным нулю возможна простановка текста без нумерации.
Команда для кнопки ^C^C^P(progn(if (= C:anshl nil) (load "anshl")(prin1))) anshl
Дополнительные возможности:
Распределение блоков между точками.
Выделение при подсчете блоков.
Команда для построения блоков с полилинии в ряд: blin
Динамическая отрисовка блоков с полилинии: schemdiag
Нумерация любых блоков атрибутом (с созданием атрибута для блока без оного): atbnum
Количество блоков на чертеже:
Всего binf1
Выбранных binf2
Количество блоков в выделении:
Всего binf3
Выбранных binf4
Количество блоков на полилинии:
Всего binf5
Выбранных binf6
Выделение полилинии с блоками на ней: binf0
Вставка блоков с параллельной нумерацией атрибутов и отрисовкой полилинии: multinsblk
Вставка блока в чертеж из файла (библиотеки блоков): (liblkins nameblk file rotate), где:
nameblk имя блока, если nil выдаст запрос
file файл блока или библиотеки блоков, если nil поиск файла
rotate с поворотом T, без поворота nil
Программа Peter Jamtgaard - Вставка атрибута в блок insertatt

Предварительная версия 4.1 программы anshl (только команда anshl).
Вставка и автоматическая нумерация блоков v.2.2.3 и v.4.1 Test1
Вставка и автоматическая нумерация блоков v.2.2.3 и v.4.1 Test2

Комментарии

Комментарии могут оставлять только зарегистрированные участники
Авторизоваться
Комментарии 11-20 из 229
kirsumy , 23 августа 2012 в 11:26
#11
Большое спасибо за программу
kirsumy , 24 августа 2012 в 10:22
#12
Если на полилинии стоит блок без атрибутов происходит следующее: если он первый то выпадает окно "Блоки не содержат атрибутов. Программа завершена." и блоки с атрибутами не нумеруются; если блок без атрибутов стоит посередине то стоящие за ним блоки с атрибутами не нумеруются. Нельзя ли сделать так, чтобы при ПОВТОРНОМ запуске программы в окошке "Стартовый номер" автоматически стояла "1". И ещё, не принципиально но, может можно убрать промежуточное окошко "Выберите полилинию", а то когда этих полилиний несколько десятков.....
Сай , 06 сентября 2012 в 13:13
#13
Все хорошо, но щлейфы полулинией рисуют только Васи, которые книг по автокаду никогда не читали. :)
roaa , 09 сентября 2012 в 01:08
#14
""...щлейфы полулинией рисуют только Васи, которые книг по автокаду никогда не читали..." Нескромный вопрос...на каком языке читал?
М_Геннадий , 24 сентября 2012 в 03:59
#15
Если начертить все полилинии, то обрабатывается только первая, а на последующих сообщает, что блоков не найдено.
А если начертить полилинию, пронумеровать, начертить следующую полилинию, пронумеровать и т.д. Все нормально, но тогда теряет смысл окно выбора полилинии. И еще заметил, если вкл. привязки, то после нумерации блоков настройки привязок скидываются.
roaa , 24 сентября 2012 в 09:26
#16
Обновил лисп.
kirsumy , 29 сентября 2012 в 19:47
#17
Как запускать эти команды?
"Количество блоков на полилинии:
Всего - (binf nil)
Выбранных - (binf T)
Количество блоков на чертеже: (bi nil nil)
Количество выбранных блоков на чертеже: (bi nil t)
Количество блоков в выделении: (bi t nil)
Количество выбранных блоков в выделении: (bi t t)"
roaa , 30 сентября 2012 в 21:51
#18
Как написано, так и запускать.
Например, для того, чтобы посчитать общее количество блоков на чертеже, в командной строке вводите:
(bi nil nil)
DCHEM , 05 октября 2012 в 08:52
#19
Вот я поместил файл anshl.vlx в корень диска C и прописал для кнопки макрокоманду ^C^C^P(progn(if (= C:anshl nil) (load "anshl")(prin1))) anshl, а макрос не запускается.
Пишет:
Команда: ; ошибка: сбой при выполнении LOAD: "anshl"
Команда: Неизвестная команда "ANSHL". Для вызова справки нажмите F1.
DChem , 05 октября 2012 в 10:09
#20
Спасибо за программку! Отличная вещь! ;)
zip

0.29 МБ

СКАЧАТЬ