(Причина редактирования: Не прикрепил файл)

Тема: Изменение площади многоугольника

Нужен лисп для изменения площади многоугольника, при условии
изменения положения любой вершины, длины сторон не менялись. Если
такое возможно, заранее благодарен. (Acad 2000). И всех с Новогодними и
Рождественскими праздниками! Здоровя, удачи, успехов и неиссякаемого
оптимизма при любых жизненных обстоятельствах!

Post's attachments

Stest.dwg 25.63 Кб, 3 скачиваний с 2021-01-05 

You don't have the permssions to download the attachments of this post.

(изменено: Alan, 5 января 2021г. 19:35:06)

Re: Изменение площади многоугольника

Если смотреть на чертеж, то проще всего представить участок полилинией.
Тогда при перемещении вершины, новую площадь можно получить командой

Команда: _.AREA
Укажите точку первого угла или [оБъект/Добавить площадь/Вычесть площадь] <оБъект>: Б
Выберите объекты:
Площадь = 971.6947, Периметр = 142.5807

Но загвоздка в том, что будут меняться длины сторон.
Так что трудность состоит в том ИМХО, чтобы сделать изменяемую фигуру с неизменяемыми сторонами.
Вот тут и трудность, нужны новые координаты вершин.
Попробуй построить Автокадом новую фигуру.
В примере сторона слева (16.63) красная и синяя НЕ равны друг другу.

Re: Изменение площади многоугольника

Этот полигон и есть замкнутая полилиния. Эту проблему было решено давно, но не помню где я это встречал.
Кажется выполнение этой процедуры заключалось в том, что одна или две по выбору, базовые неподвижные
стороны  многоугольника, а затем выбраем вершину или сторону которые динамически перемещаем до желаемого
результата по площади.

Post's attachments

Stest.dwg 29.9 Кб, 1 скачиваний с 2021-01-05 

You don't have the permssions to download the attachments of this post.

Re: Изменение площади многоугольника

Ответил Введите текст ссылки...