[loginovskiy]

Коллеги, точнее опытные программисты Lispov-цы!!!
Есть полилиния (трасса трубопровода) полученная в Credo. В ней отсутсвуют кривые, участки кривых
представлены в виде коротких сегментов полилинии. Работать с такой трассой плохо, т.к. невозможно
определять элементы кривой используя функции curve. Значит нужно заменить эти сегменты на дуги.
Я думаю, что сначала нужно определить какие сегменты должны попадать под дугу определяя последовательно
для каждых трех точек полилинии радиус и положение центра. Эти параметры должны совпадать (хотя бы примерно).
Вторая задача - перестроить полилинию, включив в нее дуги.

Я бы решил задачку дня за 3-4, но нужно срочно. Буду признателен за совет, ну а уж за готовый код ващще глубочайшую признательность!!!
DWG прилагаю.

[trir]

Проше взять таблицу элементов трассы и строить по ней

[loginovskiy]

Не проще потому, что все данные для построения профиля берутся с плана (DWG-файл). В нем "живут" все остальные данные по трассе - ПК, ВУ и пр. Разрывать технологию было бы неверно.

[trir]

Civil 3D

[Do$]

Задачка интересная... Самое простое, на мой взгляд, - находить концы и середину участков из коротеньких отрезков. Они, скорее всего, одинаковой длины в пределах одной кривой. Затем, по концам и середине строить дугу.
P.S. Длины отрезков примерно одинаковы (в пределах допуска). И углы между отрезками одинаковы. Я бы от этого отталкивался.

[trir]

Угу, а потом внезапно клотоида!

[Do$]

Трассы трубопровода по клотоиде? Надо нашим инженерам рассказать

[trir]

мда, упустил что это трубопровод. Все равно - зачем мучатся, когда есть вертикалка?

[skkkk]

В PowerCAD есть такая функция

The CP_PLINE2ARC command converts linear segment polylines into arc objects or polyline with arcs.

Вроде у нее есть 30-тидневный триал.