[arminos]

Можно ли написать Lisp для построения поперечных профилей существующего (а непроектного) ж.д. пути под AutoCad2008. С таким условием если на плане (в AutoCadе все в 3D модели) уже имеется триангуляция, ситуация(контуры угодий), подземные коммуникации, рельеф, насыпь или выемка (а именно подошва, бровка земляного полотна и балластной призмы), ось ж.д. пути, пикетаж и имеется ведомость головок рельса. Просто не совсем удобно, когда дается перегон в 15 км, и просят через 50м выдать поперечники (набивать в ручную можно, но столько теряется времени). В цивиле и в геониксе я не работаю т.к. начальник мой скряга в этом отношении и закрыл эту тему раз и навсегда (вообщем ругались долго и поэтому сидим на AutoCadе 2008 и на стареньком дос кредо приложении). Может эта программулина сидит у кого-нибудь поделитесь кто может.

[Do$]

Сообщение от arminos дается перегон в 15 км, и просят через 50м выдать поперечники

И мы то же самое просим

Сообщение от arminos на плане (в AutoCadе все в 3D модели) уже имеется триангуляция, ситуация(контуры угодий), подземные коммуникации, рельеф, насыпь или выемка (а именно подошва, бровка земляного полотна и балластной призмы), ось ж.д. пути, пикетаж и имеется ведомость головок рельса.

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

Сообщение от arminos В цивиле и в геониксе я не работаю т.к. начальник мой скряга в этом отношении и закрыл эту тему раз и навсегда

В Civil'е, насколько я знаю, двумя щелчками поперечник строится, причем с динамической связью с планом. Только план должен быть нарисован в трехмерке.

[arminos]

Здраствуйте! Спасибо что окликнулись в эту идею. Да разница между Санкт-Питербургом и Томском по времени грандиозное. Выкладываю план, поперечники и ведомости по головке рельса. Целью такого эсперимента является получить такие же поперечники с плана в AutoCade 2008. Потом напишите, получили ли файлы или нет.

[Do$]

Как я понимаю, для нас геодезисты сразу ведут съемку примерно через 50м. В итоге у них получаются точки на одной линии, по которым без триангуляций строится поперечник. В вашем же случае, я с трудом представляю, как вы вручную поперечник строите, не говоря уж о программной реализации.

[arminos]

А можно сохранить файл под AutoCad2008?
Все посмотрел файл. А мы всегда рисуем ж.д. путь одной полилинией, а не по нитям (правая и левая ГР). Разрешиться ли задача если: предварительно трассу-3д полилинию(ось пути или середина шпалы) положить в уровень и разбить ее поперечниками из 3д полилиний, и эти полилинии с проецировать на поверхность? Ведь каждая вершина будет иметь отметку. Даже если вершин будет много (зная характерные места) их можно будет удалить. Головку рельса в триангуляцию не включаем она у нас получена нивелированием т.е. она есть в ведомости, из-за этого на поперечнике ось пути подписываем отметкой головки рельса (в поле, для поперечника, берем одну отметку ГР для однопутного участка на прямой любую нить, а на кривой, только внутреннюю нить.). И только потом воспользоваться lispом когда 3д полилиния собрана (т.е когда на нее нажимаем, она показывает свои вершины и анализируем ее с планом), нажимаем на программу и она строит (по образцу) в нужном нам масштабе поперечный профиль. У меня есть еще идеи на алгоритмы вот только не знаю как программно писать их. А эта идея реализуема, что я сочинил? Только не теряйтесь пишите. А то на этом форуме, я смотрю, мало кто связан с железнодорожной отраслью.

[Do$]

Добавил к предыдущему

[arminos]

и я добавил к предыдущему текст

[Do$]

Сообщение от arminos А мы всегда рисуем ж.д. путь одной полилинией, а не по нитям (правая и левая ГР).

Геодезисты "рельсы" рисуют зачем-то. Как нам объяснили - их в таком виде требуют где-то для согласования. Ну да бог с ними, нам не жалко - мы их у себя удаляем, оставляем только оси путей.

Сообщение от arminos А эта идея реализуема, что я сочинил?

Попробуйте вручную сделать все то, что написали. Если получится - то и лиспом тоже получится

[arminos]

Я дойду в AutoCade только до расстановки по трассе поперечников из 3д полилиний. А вот как с проецировать 3д полилинию на поверхность пока не знаю. Я почему и хотел чтобы эта полилиния была основой поперечного профиля для дальнейшего программирования. Может я и ошибаюсь конечно. Тогда получается, что не возможно в lispe с проецировать 3д полилинию на поверхность? А вот еще информация у меня на работе к AutoCadу есть приложение AcadTopoPlan там можно выделив одну 3д грань и во внутрь (а можно и по граням) поставить интерполированную точку с отметкой. Но я не знаю на каком языке она написана и не знаю какими вы языками программирования владеете. Если заинтересовало, я смогу завтра на электронку вам скинуть это приложение с описанием, и как установить ее.

[Do$]

Ну вручную вы же как-то строите поперечники?

[arminos]

Могу рассказать даже как строим. Открываем план и также по снятым точкам для поперечников начинаем от оси пути сначала влево затем вправо откладывать расстояния и при чем всегда от любой точки до оси. И записываем в ведомость сначала ось пути с головкой рельса, расстояния, отметку и ее назначение. А дальше по этой ведомости набиваем так сказать в программу данные и после нее уже строиться поперечный профиль в AutoCade. Короче убого, не удобно и медленно. Вот и хотелось все с мертвой точки сдвинуть.





Что то не получается отправить программку, но она есть на сайте http://www.acadtopoplan.ru, бесплатно можно скачать.