https://ruclips.ru/ru/watch/PzHHq4jEMEc/autocad-dynamic-lisp-polygon-area-calculation-labeling