Программы для проектирования / Сумма для линий.  

Присутствует ли в ACAD функция при авторизации которой можно узнать сумму длин линий(линии) без установки конечно дополнительных модулей. ACAD2004/

Насколько я знаю, в ACADe отдельно такой команды нет (не только в 2004 но и в 2008). Длина отдельного примитива отображается в его свойствах. В поздних версиях ACADa можно посчитать сумму длин нескольких примитивов, используя поля и таблицы.

Всем известные лиспы
1. Lsum: подсчету длины линий и полилиний.
+
2. blcount: лисп по подсчету количества блоков.

скачать

Скорее всего должны тогда быть модули.Если кто знает где найти, дайте ссылку.Заранее благодарен

для подсчета суммы длин линий и полилиний пользуюсь лиспом (там ещё пару полезностей есть), блоки считаются внутренней функцией автокада

согласен с Water! длину линий считать лиспом (НЕ МОЯ личная разработка, со мной поделились и я делюсь):
(defun C:LINESUM ()
  (setq sset (ssget '((0 . "LINE"))))
  (if sset
    (progn
      (setq tot 0.0)
      (setq num (sslength sset) itm 0)
      (while (< itm num)
        (setq hnd (ssname sset itm))
        (setq ent (entget hnd))
        (setq pt1 (cdr (assoc 10 ent)))
        (setq pt2 (cdr (assoc 11 ent)))
        (setq dis (distance pt1 pt2))
        (setq tot (+ tot dis))
        (setq itm (1+ itm))
      )
      (princ (strcat "\nTotal Distance = " (rtos tot)))
    )
  )
  (princ)
)

 а в Автокаде подсчет блоков функцией "Быстрый выбор". я к этой длине прибавляю по количеству выключателей и розеток спуски по метра 1,5-2 и всю сумму умножаю на 10%-ый запас и в спецификацию. Если точно и честно считать длину, то это самое нудное из проектирования электрики, но надо...

обвожу отдельные большие участки проводки полилинией. в свойствах длина. потом суммирую все участки и умножаю на 1,1

жестковато, но, видимо, эффективно

есть такая утилита VetCAD

http://dwg.ru/dnl/load.php?id=206&z=.rar

для того, чтобы она полностью работала, надо заплатить денежку.
при пользование в беспланом режиме - ограничения на функции, но все равно там есть полезности
в частности удобный текстовый редактор (работает с однострочными тескстами в режиме многострочного), а также суперкалькулятор (типа калькулятор) - считает количество всех блоков, блоков с одинаковым названиями, суммарную длину линий, дуг, полилиний, окружностей и т.д.
работает с версиями 2004-2008

по  VetCad все понятно, почему то мне досталась та часть которая конструктив считает( не смог оценить электрическое назначение(... одно непонятно- что с Lisp ами? автокад удачно все принял, а что дальше? как применить все это к подсчету длины?

кстати может у кого есть демо версия электрического веткада?

ВОТ ЭТО:
(defun C:LINESUM ()
  (setq sset (ssget '((0 . "LINE"))))
  (if sset
    (progn
      (setq tot 0.0)
      (setq num (sslength sset) itm 0)
      (while (< itm num)
        (setq hnd (ssname sset itm))
        (setq ent (entget hnd))
        (setq pt1 (cdr (assoc 10 ent)))
        (setq pt2 (cdr (assoc 11 ent)))
        (setq dis (distance pt1 pt2))
        (setq tot (+ tot dis))
        (setq itm (1+ itm))
      )
      (princ (strcat "\nTotal Distance = " (rtos tot)))
    )
  )
  (princ)
)

сохраняем в блокноте (текстовый редактор) с расширением *.lsp. Далее загружаем из автокада (). И последнее: после загрузки данного файла вводим (печатаем) в командную строку "linesum", появится курсор для выделения объектов, выделяем нужные линии и нажимаем ENTER. В командной строке будет сумма длин выделенных линий.
P.S. можно до ввода "linesum", если у Вас те линии, сумму длин которых нужно подсчитать, находятся на определенном слое выделить и скопировать. потом после ввода команды очень просто и быстро выделяем нужные линии. (есть у кого-то *.lsp, который считает сумму длин линий и полилиний на определенном слое, в определенном цвете и т.п.)

В самом Автокаде не существует.
Есть разработанное приложение для автокада GeomProps(Площадь, длина и объем выбранных примитивов в панели свойств)
Не только суму длин выбранных линий или примитивов, а и площадь и объёмы.

Давно уже написал программку на VBA, загружается обычно. Пробуйте

Объясните, как VetCAD загрузить в Автокад 2009 или Автокад 2011. Заранее благодарна FilipchikZF@ya.ru

http://ries.pro/index.php/magazin-proektirovshchika#!digiseller/detail/2557789
все полилинии на выбранных слоях (включая замороженные слои и за пределами видимости экрана);
выбор рамкой (полностью в области);
выбор секущей рамкой;
все типы линий (LINE, SPLINE, POLYLINE, LWPOLYLINE);
только простые линии;

РЕЗУЛЬТАТ:
сумма длин всех слоев;
сумма длин по каждому слою.

ФУНКЦИИ:
два коэффициента (множитель и делитель) с возможностью пересчета на каждом слое.

ПЛАТФОРМЫ:
AutoCAD

ОГРАНИЧЕНИЯ:
с разрешением экрана 1920х1080 вмещается 39 слоев в окно "результаты". Количество слоев не ограничено - все завист от разрешения экрана.

📱Размещаем вакансии в Телеграм-канале!
Теперь, размещая вакансии на Proekt.by мы дублируем их в нашем Телеграм-канале с ~5000 подписчиками. Преимущество - мгновенный охват огромной аудитории - специалистов стройотрасли.