построения 4-угольника по 8-ми точкам.

Доброго времени суток!
Нет ли у кого лиспа для построения 4-угольника по 8-ми точкам?
По такой схеме:

 

Мне кажется что прямоугольник будет сложно построить по таким точкам. Прямоугольник = прямые углы. А тут, смести одну точку дальше или ближе от угла и будет уже призма (не прямоугольный прямоугольник)

 

Корёгин Евгений, а где шла речь за прямоугольник?
Выше написано: 4-угольник. В общем случае неправильный.

 

Ну... я в своё время решил этот вопрос хитро.
1. Снимали точки по плоскостям с разными кодами, грубо говоря по X - с кодом "Х", по Y - с кодом "Y".
2. С помощью лиспа FRTO заменяли точки с кодом X на вертикальные палочки (параллельные плоскости съемки), Y на горизонтальные (параллельные плоскости съемки).
3. Не помню каким лиспом в пересечении полилиний этих ставились точки. Эти точки и были углами конструкций.
4. Но т.к. заказчик требовал расстановку размеров от каждой оси до каждого угла - дальше точки заменялись на кружочки и еще каким-то лиспом размеры притягивались в центр кружочка. Как-то так.

Сейчас, с использованием Civil 3D это дело можно было бы упростить, загружая сразу COGO точки по кодам нужного вида и т.п.
Пищу для размышлений дал? :)
Вам можно ограничиться 1-3 и добавить пункт 4 в котором по 4 точкам строить полилинии. Помоему в GeoMenu был такой лисп в разделе работы с полилинией)

 

Дал) Если найду frto.lsp - уже полдела.
Коды - минус.
Остается узнать каким лиспом решается п.3))
Честно говоря, расчитывал на существование лиспа, который решит эту задачку за одну команду и выделение точек. Типа лиспа 4_ugolnik, который строит параллелограм по 3м точкам или 4угольник по 4. Когда-то любезно поделился Disney...

 

Программка строит четырехугольник по восьми точкам.

 

ivsem, спасибо огромное!
Но что-то я туплю... Загружаю, как обычно, через appload. Приложение тут же запускается, но... как запустить его повторно? Какой командой? на 8pointstoquardangle кад не реагирует.

P. S. Единственное, что хотелось бы чуть улучшить - построение не указанием точек, а выбором. Но это так, мелочи. Нет предела совершенству) Давно надо самому программирование осваивать, а то дальше макросов у меня руки из...

 

Вообще, если уж на то пошло, про улучшения, был бы просто самый низкий поклон если бы программу эту чутка усложнить.
1. Добавить возможность выбрать радиус поиска 8-ми точек, допустим 8 точек если находятся не далее метра друг от друга - программа считает их одним "четырехугольником", а в строке нужно прописать радиус=1.000.
2. Если осуществимо первое, то сделать возможным выделить всю съемку разом и применить ко всем точкам этот лисп. Чтобы он поискал где там ближайшие к друг другу точки и сделал тучу чертырехугольников)))

Эх, мечты :) Спасибо @ivsem - задачка редкая, но иногда весьма геморройная

 

АлексейМанс, тогда уж и в лиспе "4_ugolnik" (вы, видимо на него намекали в менюгео) давно мечтаю о таком. Так сложилось, что её я применяю чуть не каждый день. А по восьми точкам мне ещё две секции отстрелять и пока все.
Я ж говорю, пока самостоятельно не осилю, мечтать можно долго))) Но и задача освоения autolispa или других языков пока неподъёмная(((

Пока нашел такой более простой способ открытия: drag'n'drop - тупо перетащить файл в окно када.

 

Чтоб мечты превратились в реальность, нужно выкладывать файлы с примером, а так каждый может по разному понимать желания...

 

Файл в приложении.
В верхнем ряду колонн уже контура уже построены выложенным выше лиспом.
Точки съёмки в виде точек автокада (импортированы Вашим Геоимпортом). Изначально они были на своих реальных отметках. Сейчас координату Z поменял на 0,00 (иначе лисп не работает, а хотелось бы).
Если бы удалось реализовать построение автоматом (по радиусу 1м, например), то было б неплохо на основе точек COGO.
Остальные пожелания изложены выше)))

А если удастся, можно ли доработать 4_ugolnik, чтоб строил автоматом с отбором точек в заданном радиусе?

 

Добавил повторный запуск программы, набрать 11 и нажать Enter или пробел.

--- Сообщения объединены, 9 дек 2016, Оригинальное время сообщения: 9 дек 2016 ---

В автомате можно построить тучу четырехугольников, если массив сьемочных пикетов буде упорядочен.
Вместо безликих точек, можно использовать блок с атрибутом в котором будет номер пикета и сьемка будет вестись в соответствии с логикой построения. Пикеты с номерами 1 и 2 находятся на одной линии. Пикеты 3 и 4 на второй линии и т. д.
Пикеты начиная с номера 9 уже относятся ко второму четырехугольнику. При таком раскладе сьемки можно все построить в автомате и однозначно.

 

Для программы то хорошо, а вот для съемки в поле не очень. Тут в любом случае снимать с нескольких стоянок, и очень сложно будет соблюдать и запоминать нумерацию. Потому и "мечты" :)

 

Коллеги срочно нужен Лисп по построению точек автоматом в пересениях полилиний, Можно даже с нулевой отметкой.

Выбираем красные полилинии и нажимаем enter. Появляются точки автокада и COGO в местах пересечений.
Я думаю это не сложно реализовать.

 

Во. Ксати вспомнил, polyline_to_circle пользовался. Чтобы проектные четырехугольники (с проставленными размерами по вершинам) перемещались в центра окружностей, которые ставились вместо точек. Размеры тем самым менялись на фактические)

 

http://forum.dwg.ru/showthread.php?t=37397

 

Disney, там фик поймешь как все запускается. Копирую коды в командную строку и ничего. Мне бы Лисп обычный с командой.

 

Это функция, команду нужно заключить в скобки (get-intersections)

 

А давайте так, если не сложно...
Точки автокада можно импортировать Геоимпортом. Далее, чтоб точки были упорядочены применяем команду _AeccCreatePtConvertAdeskPts (преобразовать точки AutoCAD). Выбираем по группам из 8 точек (к сожалению, если выбрать сразу все, то они не будут упорядочены) и вуаля - получаем группы по 8 точек COGO c упорядоченными по Вашему условию номерами. Всё же быстрее, чем от руки кликать.

 

Скопировал функцию в блокнот. Дальше как ее в скобки заключить?