Рисование проема на плане за один клик

Данная штука пригодится тогда, когда надо быстро нарисовать проемы в стенах на плане здания. В вложении два файла: тестовый пример в автокаде и автолисп файл.

При загрузке *.LSP файла будут доступны такие команды:

PROEM - формирование проема с динамическим предпросмотром (grread)
PROEMG - формирование проема без предпросмотра (getpoint, клавиатурный ввод)
SETPROEMWIDTH - установка ширины проёма

дополнительно добавил функцию:
EXTENDTOINTERSECT - которая позволяет продлить не совсем сходящиеся линии в точку их пересечения

Формирование проёмов происходит за счет указания точки в районе двух параллельных линий/полилиний. После указания точки, линии стен разрываются, и строятся линии откосов. Результат команд PROEM и PROEMG - всегда одинаков, различия только визуальные:

В первом случае (команда PROEM) указание точки может быть только с помощью мыши, но зато существует динамический просмотр результата. Красным цветом показывается место где в стене можно вырезать проём, либо желтым - где проем геометрически невозможно выполнить.

Во втором случае (команда PROEMG) указание точки возможно стандартным способом (используется getpoint) с помощью мышки, с помощью клавиатуры, с использованием объектной привязки. Но в это способе отсутствует динамический просмотр результата.

С помощью отдельной команды SETPROEMWIDTH сделал установку ширины проема для обоих вариантов команды PROEM и PROEMG

Отдельно стоит сказать про команду EXTENDTOINTERSECT. При формировании проемов возможна такая ситуация когда узлы откосов будут немного не совпадать с узлами стен. Такое можно наблюдать когда стены не совсем параллельны. На этот случай сделана эта команда. После её выполнения концы стен и откосов продлеваются до точки пересечения (аналогично команде CHAMFER с нулевыми расстояниями фаски). Только EXTENDTOINTERSECT позволяет выбирать группу объектов, что гораздо проще в использовании.