Утилита LISP для автоматического подсчёта длины кабельных трасс в AutoCAD

CABLESPEC6 — утилита на AutoLISP для автоматического подсчёта длины кабельных трасс в AutoCAD. Она измеряет линии и кривые, группирует результаты по слоям, учитывает монтажный запас и формирует готовую спецификацию.

Возможности CABLESPEC6

  • Измерение объектов LINE, LWPOLYLINE, POLYLINE, ARC и SPLINE.
  • Обработка выбранных объектов или всех подходящих объектов чертежа.
  • Группировка кабельных трасс по слоям.
  • Подсчёт количества отдельных трасс.
  • Добавление 6 метров на каждую трассу.
  • Добавление общего запаса 10%.
  • Формирование таблицы непосредственно в AutoCAD.
  • Экспорт результатов в CSV для последующей работы в Excel и других табличных программах.
  • Вывод общей длины и итоговых значений по всему чертежу.

Как производится расчёт

Для каждого слоя программа определяет суммарную геометрическую длину выбранных объектов и количество отдельных трасс. Затем к каждой трассе добавляется 6 метров на подключение и монтаж, после чего к полученному значению прибавляется 10% запаса.

Формула расчёта:

Итоговая длина = (геометрическая длина + 6 м × количество трасс) × 1,10

Порядок работы

  1. Загрузите LISP-файл в AutoCAD с помощью команды APPLOAD.
  2. Запустите команду CABLESPEC6.
  3. Выберите необходимые линии, полилинии, дуги и сплайны.
  4. Чтобы обработать весь чертёж, нажмите Enter, не выбирая объекты.
  5. Укажите точку размещения таблицы.
  6. Получите спецификацию в чертеже и CSV-файл в папке текущего DWG.

Результат расчёта

В создаваемой таблице для каждого слоя отображаются:

  • название слоя;
  • количество трасс;
  • исходная геометрическая длина;
  • фиксированная добавка по 6 метров на трассу;
  • длина с учётом фиксированной добавки;
  • итоговая длина с запасом 10%.

В конце таблицы выводится строка «ИТОГО» с общими значениями по всему расчёту.

Единицы измерения и настройки

По умолчанию утилита предназначена для чертежей, выполненных в миллиметрах: полученные значения автоматически переводятся в метры.

При необходимости непосредственно в LISP-файле можно изменить:

  • фиксированную добавку на каждую трассу;
  • процент запаса;
  • коэффициент перевода единиц чертежа в метры.

Обратите внимание

Каждый отдельный графический объект считается самостоятельной трассой и получает дополнительный запас 6 метров. Если одна кабельная трасса состоит из нескольких отдельных отрезков, перед расчётом их рекомендуется объединить в одну полилинию.

Утилита предназначена для AutoCAD с поддержкой Visual LISP и ActiveX, прежде всего для версии AutoCAD под Windows.

Небольшая видеоинструкция как пользоваться: