Area-Diesel - Работа с контурами/площадями контуров

Давно уже лежит в закромах. Где взял - не помню.
Может понадобится кому для некоторых видов работ с контурами и вычисления площадей - в виде меню с использованием команд AutoCAD и языка Diesel:
1. Создание контуров по указанным точкам (задействована команда КОНТУР/BOUNDARY)
2. Создание 1 контура и вычисление его площади (задействованы команды КОНТУР/BOUNDARY + ПЛОЩАДЬ/AREA)
3. Печать последней вычисленной площади в М10:1 (задействована команда ТЕКСТ/TEXT)
4. Печать последней вычисленной площади в М1:100 (задействована команда ТЕКСТ/TEXT)
5. Печать последней вычисленной площади в М1:1 (задействована команда ТЕКСТ/TEXT)
6. Вычисление площадей контуров в режиме добавления/суммирования (задействована команда ПЛОЩАДЬ/AREA)
7. Переключение вычисления площадей контуров в режим вычитания (задействована команда ПЛОЩАДЬ/AREA)

Кидаем все файлы в доступную автокаду папку, загружаем меню areas.mns и ... пользуемся (кнопками меню).

ПыСы: Не мое. Переделывать не буду.