TG_MAX_LEGEND: Автоматическое создание легенды типов линий для чертежа

Скачайте лисп: TG_MAX_LEGEND.lsp
Версия: V1 (последнее обновление: см. код)

Этот профессиональный LISP-скрипт для AutoCAD автоматизирует создание графической легенды типов линий, используемых в чертеже. Программа анализирует полилинии, определяет уникальные комбинации типа линии, цвета и слоя, и создает наглядную таблицу-легенду с образцами линий и их описанием. Доступны три режима работы для максимальной гибкости.

Что делает этот лисп?

Скрипт выполняет комплексный анализ и визуализацию стилей линий в чертеже:

1. Автоматический анализ: Сканирует чертеж и собирает информацию о всех используемых типах линий, цветах и слоях у полилиний (LWPOLYLINE, POLYLINE).

2. Создание графической легенды: Для каждого уникального стиля создает: 
   Образец линии заданной длины. 
   Текстовое описание в формате: "Описание типа линии - Имя слоя".

3. Три режима работы: 
   TG_MAX_LEGEND — автоматически анализирует весь чертеж и создает полную легенду. 
   TG_MAX_LEGENDSEL — создает легенду только для предварительно выбранных пользователем полилиний. 
   TG_MAX_LEGENDQ — быстрая команда для создания легенды с параметрами по умолчанию.

4. Гибкая настройка: Позволяет задавать высоту текста, масштаб типа линий (LTSCALE), длину образцов в легенде и точку вставки.

5. Профессиональное оформление: Автоматически рассчитывает оптимальные отступы между элементами легенды для аккуратного вида.

Для каких задач создан:

• Автоматическое оформление штампов и условных обозначений на топографических планах и чертежах.

• Быстрое создание пояснительных таблиц для сложных проектов с множеством типов линий.

• Контроль и стандартизация используемых в проекте стилей.

• Подготовка чертежей к печати и передаче заказчику.

Пошаговая инструкция по использованию

Основная команда: TG_MAX_LEGEND (легенда всего чертежа)

1. Загрузка скрипта:

   • Скачайте файл TG_MAX_LEGEND.lsp.

   • В AutoCAD введите APPLOAD и загрузите файл.

   • Для запуска введите TG_MAX_LEGEND.

2. Настройка параметров:

   • Введите высоту текста <0.8>: — укажите высоту текстовых подписей (по умолчанию 0.8).

   • Введите масштаб типа линий (LTSCALE) <0.5>: — задайте масштаб отображения типов линий (штрихов, точек). Влияет на образцы в легенде.

   • Введите длину полилинии в легенде <30>: — задайте длину образцов линий в легенде.

   • Выберите точку вставки легенды: — укажите левый нижний угол будущей легенды.

3. Результат:

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

Команда: TG_MAX_LEGENDSEL (легенда выбранных объектов)

1. Запуск: Введите TG_MAX_LEGENDSEL.

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

3. Результат: Легенда будет создана только для выбранных вами линий.

Быстрая команда: TG_MAX_LEGENDQ (легенда по умолчанию)

1. Запуск: Введите TG_MAX_LEGENDQ.

2. Только точка: Программа запросит только точку вставки.

3. Результат: Создаст легенду для всего чертежа со стандартными параметрами (текст 0.8, LTSCALE 0.5, длина образца 30).

Как работает анализ и группировка

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

   • Тип линии (Continuous, Dashed, ByLayer и т.д.).

   • Цвет (по слою, по блоку или явно заданный).

   • Имя слоя.

2. Создается уникальный ключ комбинации этих свойств. Например: DASHED_1_Коммуникации.

3. В легенду попадает только одна запись для каждого уникального ключа, даже если таких линий в чертеже сотни.

4. Записи в легенде автоматически сортируются: сначала по имени слоя (по алфавиту), затем по типу линии.

Особенности и важные примечания

• Умные отступы: Расстояние между строками легенды (lineSpacing) и отступ текста от линии (textOffset) рассчитываются автоматически на основе введенной высоты текста для пропорционального и аккуратного вида.

• Только полилинии: Анализируются только объекты LWPOLYLINE и POLYLINE. Отрезки (LINE), дуги (ARC) и другие примитивы не учитываются. Для их включения в анализ необходимо сначала преобразовать их в полилинию (команда PEDIT).

• Описания типов линий: Программа извлекает человеко-читаемые описания типов линий (например, "Штриховая", "Точка-тире") напрямую из таблицы типов линий AutoCAD.

• Масштаб (LTSCALE и CELTSCALE): Для корректного отображения образцов в легенде временно устанавливается системная переменная CELTSCALE. После создания легенды ее значение восстанавливается.

• Производительность: На больших чертежах с тысячами полилиний анализ может занять несколько секунд.

Инструмент разработан специалистами «ТопГео» для автоматизации процесса оформления проектной документации, обеспечивая профессиональный вид чертежей и соответствие стандартам оформления условных обозначений.