Все объекты чертежа на один слой в два клика!

Команда: OBJTOLAYER
Описание: Этот код перемещает все объекты чертежа на один слой. Есть возможность указать имя слоя и опция удаления пустых слоев после перемещения.
Вводимые данные:
Имя слоя, если слоя с таким именем нет — он будет создан;

Удаление пустых слоев [да/ нет] — удаляет или оставляет пустые слои после перемещения объектов.

PS Этот код я написал по просьбе моего боевого товарища Ольги Семыкиной, разгребающей великолепные чертежи лучших проектировщиков нашей необъятной Родины.