[Kostinok]

Здравствуйте, возможно кто то уже встречался с этой проблемой, поэтому хочется перенять опыт и пополнить знания, тем паче, что это действительно смогло бы помочь.
Идея такая:
Представте себе кучу линий на чертеже - это несколько объедененных групп, встает вопрос как быстро и точно подсчитать длины ГРУПП, состоящих из этой кучи линий, т.е. есче раз 20 линий на чертеже - это 3 электрогруппы (к примеру электроосвещение).
Так вот каждый раз я объединяю линии в одной моей электрогруппе в группу AutoCADовскую, командой "-g", даю этой AutoCADовской группе одноименное название (к примеру О1). После выделяю всю новоиспеченную группу и набираю команду "list" - AutoCAD находит мои линии объединенные в группе и дает по каждой информацию, из всей информации меня интересует только length, поэтому после в этом же текстовом окне я набрав команду cal начинаю складывать все мои линии.
Немного про выделение: точнее сказать сначала мне приходиться обводить те линии, которые должны попасть в одну группу, делаю это определенным цветом, в определенном слое, что бы после нажав QSelect можно было их легко найти, а потом уже состряпать группу.

Хотелось бы автоматизировать процесс, т.е. сначала нарисовав линии (поверх остальных) бысто их выделить, но не тратить на это драгоценное время - т.е. не щелкать на proreties, не выбирать qselect, не задавать там определенный цвет, и не жать потом на выделить - чувствую, что все это возможно...
И вторая задача, после того как AutoCAD определился с новой группой - он мне показал сумму всех длин линий входящих в группу.

Буду очень благодарен если подскажите несколько приемов для решения этой задачки, или другие пути решения.
Заранее спасибо.

[Олег К.]

А поиском воспользоваться?
Нашел бы что-нибудь вроде этого: Нужен LISP для суммы длин отрезков линни

Добавлю еще пару своих программ. Как использовать лисп расписано в отдельной теме.

[Kostinok]

Спасибо большое, буду теперь с лиспами разбираться.
Еще вопрос:

Можно ли выбрать мои начерченные определенным цветом линии с клавиатуры или написав макрокоманду, мне просто надо знать как работать с Qselect и с его переменными если такие есть, ну в принципе не могут не быть.

И еще: подскажите или дайте если есть, хорошую книжку, что бы разобраться с lisp файлами, как это пишется, какие там команды, как их применять, ну с чего все начинали знакомство с лиспами

[Олег К.]

Можно в хелпе посмотреть или в учебнике по AutoCADу.
Стандартные команды QSELECT и FILTER; из Express Tools - GETSEL, FASTSEL и SSX; в лиспe - функция ssget.

Из книг я бы рекомендовал учебники Н.Н.Полещука издательства БХВ, серия "в подлиннике". Также стоит прошерстить поиском автокадовские форумы, обычно там нужная информация в большем объеме. Вот только искать её замучаешься.

------- добавлено
Щас как порекомендую . Сам начинал с книги Ю.А.Кречко и В.В.Полищука "Автокад R13: новые возможности" (до сих пор в столе лежит).
А если серьезно - Н.Н.Полещук, П.В.Лоскутов "AutoLISP и VisualLISP в среде AutoCAD".

[VVA]

Посмотри здесь. Может что-нибудь понравится
ObjectARX. GeomProps — площадь, длина, объем выбранных примитивов
LISP. Подсчет длины линий на определенном слое
Про лисп почитай http://dwg.ru/art/8
ObjectARX. SelSim - выбор по образцу

[Kostinok]

Да, чем больше углубляешься в AutoCAD - тем он непонятнее, а чем непонятнее - тем интереснее.
Большое спасибо, теперь читать не перечитать.

[Vova]

Книги, которые тебе рекомендовали, даны на долгосрочную перспективу становления из тебя программиста. Для начала научись, будучи простым пользователем, применить ЛИСП, уже написанный другими. Например, из ссылки, которую дали выше выбери по-очереди один за другим лиспы, проверь их на своем чертеже, и сообщи здесь, какой пришелся по-вкусу. Я предпочитаю лисп от KOS #9. Заодно отработаешь загрузку лиспов-временно или навсегда. Как загрузить лисп см http://dwg.ru/art/8

[Kostinok]

Сообщение от Vova выбери по-очереди один за другим лиспы, проверь их на своем чертеже, и сообщи здесь, какой пришелся по-вкусу.

Vova, LISP от KOS #9 я вообще не смог подключить, самый (на мой малообразованный взгляд) грамотный был LISP от Grinzaid под номером 8, и я вроде понял его принцип.

там все считается по координатам, а нет ли такой функции которая выдавала бы сразу длину линии или полилинии?

[Vova]

До того, как ты проработаешь рекомендованные выше книги тебе, как пользователю, совсем не обязательно понимать принцип работы лиспа. Просто используй его. А именно, надо загрузить в автокад, набрать вызывающую его команду и на запрос в ком. строке пометить все линии, длины которых надо просуммировать. И прочитать результат. Лисп от Grinzaid суммирует только отрезки, а от KOS умеет считать кроме того и дуги, и полилинии, да еще скажет, чего он не сумел подсчитать. Лисп вызывается командой (entlen) Со скобками. Зaтем Enter

[Kostinok]

Vova, может я что то не то сделал, но при сохранении LISPа от KOS, под именем entlen.lsp, а после при наборе load указывая где он лежит получаю сначала:

Command: _appload entlen.lsp successfully loaded.

а когда пишу entlen...:

Unknown command "ENTLEN". Press F1 for help.

еще небольшая просьба не мог бы посмотреть тему "Повторение выполнения макрокоманды по циклу. КАК? "
там нужен LISP для одновременного рисования примитивов и добавления их в группу

[Vova]

Сообщение от Kostinok Vova, может я что то не то сделал, но при сохранении LISPа от KOS, под именем entlen.lsp, а после при наборе load указывая где он лежит получаю сначала: Command: _appload entlen.lsp successfully loaded. а когда пишу entlen...: Unknown command "ENTLEN". Press F1 for help.

А внимательно прочитать то, что было выше? 1. ссылка на то, как правильно воспользоваться опубликованным нз форуме лиспом. 2. это:

Сообщение от Vova Лисп вызывается командой (entlen) Со скобками. Зaтем Enter

С группами посмотрю, но потом. А для чего это нужно? Кроме того, здесь пробегал лисп по продвинутой работе с группами. Найди его, может там найдешь, что надо

[VVA]

Про группы можно почитать здесь LISP. Группировка и разгруппировка объектов

[Kostinok]

VVA, Спасибо большое буду разбираться, а группы: необходимо рисовать линию и автоматически добавлять ее к группе, вот и все впрынцыпе...
Еще раз спасибо за (entLen) - теперь ьы понять как это все работает, я имею в виду принцип, чувствую, что необходимо знать с чем имеешь дело, да и дополнительные знания еще никому не мешали.

И сразу еще хотелось бы узнать, возможен ли вообще такой лисп, который отслеживал бы все "пересечения", имеется в виду, если нарисованная группа пересекается с блоком.
Т.е. программа сама считает сколько раз и с какими, именно БЛОКАМИ, пересечена группа?

[SGL]

Для подсчета суммы длин отрезков, дуг, полилиний меня вполне устраивает калькулятор. Например, для подсчета длины трубопровода я изолирую слой, на котором расположена осевая линия. Выделяю первый отрезок и в разворачивающейся панели свойств нахожу length. В графе числового значения нажимаю на значок калькулятора. Это число появилось в развернувшемся окне калькулятора, нажимаю М+. Выделяю следующий объект – панель свойств, значок кальк. – М+. После каждого нажатия М+ отображается суммарная длина объектов. Всего три нажатия кнопкой мыши для каждого объекта.

[Valery Brelovsky]

Сообщение от SGL Для подсчета суммы длин отрезков, дуг, полилиний меня вполне устраивает калькулятор. Например, для подсчета длины трубопровода я изолирую слой, на котором расположена осевая линия. Выделяю первый отрезок и в разворачивающейся панели свойств нахожу length. В графе числового значения нажимаю на значок калькулятора. Это число появилось в развернувшемся окне калькулятора, нажимаю М+. Выделяю следующий объект – панель свойств, значок кальк. – М+. После каждого нажатия М+ отображается суммарная длина объектов. Всего три нажатия кнопкой мыши для каждого объекта.

И сколько времени уйдет на эту процедуру при сотне линий.
В то время как предложенные в посте #5 ссылках на программы выполняют эти расчеты практически мгновенно. Там же можно поискать программу выбора по образцу. Рекомендую и Вам обратится к этим программам это значительно облегчит Вашу работу. Сам пользуюсь ими.

[Valery Brelovsky]

Вот и сылка на программу
ObjectARX. SelSim — выбор по образцу
http://www.caduser.ru/cgi-bin/f1/board.cgi?t=37949gn

[SGL]

Ничего не имею против программ для подсчета. Я привел пример, когда не надо постоянно считать сумму длин из сотен отрезков, и кто-то, возможно, не знает как использовать калькулятор.

[T-Yoke]

Сообщение от Kostinok ...Еще вопрос: Можно ли выбрать мои начерченные определенным цветом линии с клавиатуры...

А я всегда в контекстном меню выбираю команду быстрый выбор, и по признаку цвкт может выбрать все лини какие вам нужны.
Попробуйте, рекомендую.

[Valery Brelovsky]

Сообщение от T-Yoke А я всегда в контекстном меню выбираю команду быстрый выбор, и по признаку цвкт может выбрать все лини какие вам нужны. Попробуйте, рекомендую.

Вопрос не только чтобы выбрать линии но и получить их суммарную длину.

[kopilkaspama]

Про подсчет длины линий наиподробнейшую информацию я лично видел вот здесь: http://proektsb.ru/?content=autocad

[Кулик Алексей aka kpblc]

kopilkaspama, у тебя из 2 сообщений 2 со ссылками на твой ресурс. Намек ясен?

[ЕЖЕК]

Раз подняли топик, воспользуюсь!

Приспичило мне тут помимо подсчета длин по критериям, еще одна задача!
Простановка над каждым примитивом (line, pline)из набора, над его центром, текста(или мтекста) содержащего его длину.(можно еще с коэффициентом)

Заранее спасибо!

[Кулик Алексей aka kpblc]

ЕЖЕК, в поиск. А не найдешь - тогда field.

[ЕЖЕК]

Сообщение от Кулик Алексей aka kpblc ЕЖЕК, в поиск. А не найдешь - тогда field.

Поиском нашел более похожее тему http://forum.dwg.ru/showthread.php?t=842&page=6
читаю ее уже часа два, ничего такого нет, надо править лиспы

А field это я так понимаю дизель писать нужно чтоли?

[Кулик Алексей aka kpblc]

Зачем Diesel? И без этого обойтись можно...

[ЕЖЕК]

Сообщение от Кулик Алексей aka kpblc Зачем Diesel? И без этого обойтись можно...

Я понимаю что ничего сложного нет, но я уже ничего не писал на лиспе лет 5.
А так сделал сборку и вышеозначенного поста, которая позволяет выбрать примитив и поставить в ручном режиме текст-длину, не совсем то что хотел, но качественно лучше чем совсем без САПРа .
Спасибо

[VVA]

ЕЖЕК, Полями было здесь LISP. Вставка в таблицу поля, соотвествующего площади примитива
Полями и тестом здесь Добавление в чертеж длины полилинии
в частности в #11 RPL- Report Polyline Length

Пишет длину вначале плиний и линии и заносит в гиперссылку. Подвел мышу и посмотрел

[zz212243]

Ребят, подскажите, почему при каждом заходе в автокад приходится по-новому загружать лисп "(entlen)" через "appload" ?

[sertor]

Сообщение от zz212243 Ребят, подскажите, почему при каждом заходе в автокад приходится по-новому загружать лисп "(entlen)" через "appload" ?

Один из вариантов - добавить лисп в автозагрузку (портфель).

[zz212243]

sertor, в смысле? Добавить лисп-файл в меню "пуск"-"автозагрузка"? В автокаде я автозагрузки не встречал... Если в автокаде- то где этот портфель (автозагрузка) находится?

[Хмурый]

диалоговое окно команды _appload

[zz212243]

Спасибо, Хмурый и sertor! Помогло!

[pan]

Сообщение от Kostinok Можно ли выбрать мои начерченные определенным цветом линии с клавиатуры или написав макрокоманду, мне просто надо знать как работать с Qselect и с его переменными если такие есть, ну в принципе не могут не быть.

Начиная с AutoCAD 2011 в контекстном меню появилась команда "Выбрать подобные"