| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Экспорт координат выбранных точек в *.txt

Экспорт координат выбранных точек в *.txt

Ответ
Поиск в этой теме
Непрочитано 14.05.2008, 16:06
Экспорт координат выбранных точек в *.txt
slan.ru
 
Регистрация: 13.05.2008
Сообщений: 6

Добрый день, уважаемые знатоки!

Сразу прошу, не пинайте ногами и не отправляйте в поиск. Все темы, в заголовках которых есть слово "координаты" и "координат" прочитал. Нашел много полезного для себя и практически то, что искал. Но многое остается в полутьме для моего мозга. Сама суть моего поста.

Я работаю в дорожном строительстве. С недавнего времени моя организация приобрела электронный тахеометр. На данный момент ось дороги выносим в натуру с помощью него. Координаты X и Y узловых точек по оси беру из CREDO_MIX, а координату Z подставляю по мере необходимости и вида выноса. Для фрезеровки, нижнего слоя, верхнего, и.т.п.

Возникла необходимость выноса в натуру кромок проезжей части. Но они не всегда соответствуют виду оси. В городских условиях могут быть примыкания, карманы для автобусных остановок и.т.п. Требуется (для начала) получить координаты узловых точек. Хочу начать с того, что бы получить координаты ВЫБРАННЫХ ТОЧЕК в текстовый файл. Последовательность:

1. Проставляем токи в требуемых узлах.
2. Выбираем необходимые точки.
3. Запускаем макрос.
4. Макрос создает в каталоге текстовый файл c названием как у чертежа.
5. Туда записываются координаты примитивов (вроде бы так тут это называют) в формате:
Pt X Y Z <Space>, где
Pt - для начала просто нумерация точек по мере добавления в файл,
X Y Z - координаты,
<Space> - разделитель.

От Вас прошу помощи. В программировании мало понимаю, но для меня пока что ясно, что скрипты можно создать как макрос - VBA, и LISP - на собственном языке. Хотелось бы увидеть такой скрипт, я думаю он не будет громоздким, на удобном Вам языке, но с описанием. Начну разбираться - с чего-нибудь надо начинать. Для начала поставленная задача будет минимальной, в дальнейшем хочу усложнить задачу собственными силами, если потяну.

Сразу оговорюсь, возможности купить ToolPak, Express и уж тем более Civil у меня нет, , да и не требуется пока мне выполнение задач отличных от этой. Поэтому надеюсь на Вашу помощь в написании такого скрипта. А уж за описание процедуры - буду безгранично благодарен.

P.S> Если требуются еще исходные данные - готов в найкротчайшие сроки предоставить их.
Просмотров: 233842
 
Непрочитано 05.03.2018, 13:50
#141
Browning Zed


 
Регистрация: 17.01.2014
Сообщений: 97


VVA, в посте #7 есть скриншот диалогового окна программы. Существует ли в природе версия данной проги с DCL-файлом?
Browning Zed вне форума  
 
Непрочитано 05.03.2018, 17:47
1 | #142
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,990
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Цитата:
Сообщение от Browning Zed Посмотреть сообщение
VVA, в посте #7 есть скриншот диалогового окна программы. Существует ли в природе версия данной проги с DCL-файлом?
В том же посте ECoorE rev11c.zip
DCL файл пишется лиспом "на лету". См опцию "Settings"
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 22.03.2018, 09:59
#143
lesha_rz


 
Регистрация: 07.10.2010
Сообщений: 12


Прочитал несколько веток по проблеме, решил написать сюда.
Схожая с моей была поднята в сообщении #48, но ответа по всей видимости не было

Цитата:
Сообщение от MANUL Посмотреть сообщение
Товарищи, общий вопрос:
Каким образом отслеживать ещё и географические коодинаты? При условии что положение геомаркера задано и и текущему чертежу вроде назначена СК: LL84
В изыскательском файле есть географическая привязка и ACAD и Civil в строке состояния показывает координаты в градусах и минутах. Civil без проблем экспортирует полилинию в kmz, которая корректно отображается и в GE и в SAS Planet-е.
Теперь, мой дилетантский вопрос: как при всем этом богатстве материалов выгрузить координаты вершин в географических координатах?
_list и описываемые здесь lispы выгружают прямоугольные.
lesha_rz вне форума  
 
Непрочитано 22.03.2018, 10:25
#144
trir


 
Регистрация: 18.12.2010
Сообщений: 5,047


как я сразу и говорил - работать через FDO
trir вне форума  
 
Непрочитано 22.03.2018, 10:53
#145
lesha_rz


 
Регистрация: 07.10.2010
Сообщений: 12


Цитата:
Сообщение от trir Посмотреть сообщение
как я сразу и говорил - работать через FDO
Если не сложно, можно поподробнее?
lesha_rz вне форума  
 
Непрочитано 22.03.2018, 11:07
#146
trir


 
Регистрация: 18.12.2010
Сообщений: 5,047


1. Создаёшь слои
2. Экспортируешь в нужную СК
trir вне форума  
 
Непрочитано 22.03.2018, 11:12
#147
lesha_rz


 
Регистрация: 07.10.2010
Сообщений: 12


Спасибо, за два бесполезных ответа.
lesha_rz вне форума  
 
Непрочитано 22.03.2018, 11:47
#148
trir


 
Регистрация: 18.12.2010
Сообщений: 5,047


команда MAPEXPORT и сохранить в gml в нужной СК - получишь текстовый файл с координатами
лично я предпочитаю просто копировать слой в пределах БД
trir вне форума  
 
Непрочитано 22.03.2018, 13:03
#149
lesha_rz


 
Регистрация: 07.10.2010
Сообщений: 12


Цитата:
Сообщение от trir Посмотреть сообщение
команда MAPEXPORT и сохранить в gml в нужной СК - получишь текстовый файл с координатами
лично я предпочитаю просто копировать слой в пределах БД
Спасибо, попробую, во множестве выводимых атрибутов и свойств наверняка найду Долготу/Широту
Пока вышел из положения следующим образом: по имеющейся полилинии создал точки COGO и из Навигатора Области Инструментов просто скопипастил в Excel.
Параллельно можно добавить маркеры точек с номерами и координатами для вывода графики.
lesha_rz вне форума  
 
Непрочитано 29.08.2018, 11:24
#150
Vikulassuk

генпланист
 
Регистрация: 23.09.2009
Череповец
Сообщений: 31


Цитата:
Сообщение от VVA Посмотреть сообщение
slan.ru Пробуй COORT для твоего примера
Описание

Модифицированны и оптимизированы команды COOR, COORN, COORT, добавлена команда COORNP
COORNP - COORNP + Point - отрисовка точек в узлах полилинии. Файл Ecoor.zip
*** Добавлено 15 мая 2010

CoorNP-Координаты+Нумерация+Точки. Точки рисуются текущими режимами PDMODE and PDSIZE

[/more]!!!Другие решения для экспорта: Ссылки здесь
Здравствуйте! Ваш лисп просто супер! Спасибо вам большое!
Помогите, пожалуйста, разобраться в нем немного.
Как сделать, чтобы в точках рисовался кружочек? У вас , вроде, такое есть, но никак не могу это осуществить.
И еще такой вопрос - реально ли сделать, чтобы нумерация была на выноске с текстом "т.1", "т.2" и т.д?

Заранее спасибо, если найдете время ответить
Vikulassuk вне форума  
 
Непрочитано 03.05.2019, 15:48
#151
anastaskot


 
Регистрация: 03.05.2019
Сообщений: 2


Добрый день! Пользуюсь ECoor для выгрузки координат в Excel, и соответственно нумерую точки (1,2,3...). Но далее мне нужно увеличить шрифт до 2.5 и проставить кружки на точки радиусом 1, после чего нумерация наползает на полилинию и точку, приходится потом растаскивать все вручную. Есть ли возможность, чтобы это все автоматически растаскивалось? А то по 2 тысячи и более точек вручную растащить - это смерть. Приложила фото, на 1 - как получается и на 2 - как должно быть.

PS: я просто сама не смыслю в коде ничего, но мне кажется там должно быть уточнение, что текст (номер точки) не должен залезать на полилинию и/или на другой текст(номер точки). Буду очень признательна если поможете это написать.
Миниатюры
Нажмите на изображение для увеличения
Название: автокад.jpg
Просмотров: 114
Размер:	106.6 Кб
ID:	213794  Нажмите на изображение для увеличения
Название: автока.jpg
Просмотров: 111
Размер:	116.9 Кб
ID:	213795  

Последний раз редактировалось anastaskot, 03.05.2019 в 16:24.
anastaskot вне форума  
 
Непрочитано 10.05.2019, 23:54
#152
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,990
<phrase 1= Отправить сообщение для VVA с помощью Skype™


anastaskot, Найди строку
Цитата:
(polar ln (/ pi 4) 1.) ;_Координаты на 1 ед по углом 45 градусов
Здесь определяется точка отрисовки текста (на 1 ед под углом 45 градусов от вершины полилинии)
Попробуй заменить 1. на большее число.
Если устроит, можно задавать не угол, а смещение по x y от вершины полилинии
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 12.05.2019, 21:26
#153
anastaskot


 
Регистрация: 03.05.2019
Сообщений: 2


Цитата:
Сообщение от VVA Посмотреть сообщение
anastaskot, Найди строку

Здесь определяется точка отрисовки текста (на 1 ед под углом 45 градусов от вершины полилинии)
Попробуй заменить 1. на большее число.
Если устроит, можно задавать не угол, а смещение по x y от вершины полилинии
Спасибо за подсказку! Теперь легче, хоть и приходится ручками дорабатывать.

PS: а смещение по х и у также в коде или из автокада можно настроить?
anastaskot вне форума  
 
Непрочитано 12.05.2019, 21:30
#154
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,772


anastaskot, посмотри справку по функции polar - там все внятно достаточно описано.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 12.05.2019, 23:39
#155
trir


 
Регистрация: 18.12.2010
Сообщений: 5,047


Цитата:
А то по 2 тысячи и более точек вручную растащить - это смерть.
Ну так в Civil 3D на это есть штатный функционал...
trir вне форума  
 
Непрочитано 15.05.2019, 08:07
#156
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,990
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Цитата:
Сообщение от anastaskot Посмотреть сообщение
PS: а смещение по х и у также в коде или из автокада можно настроить?
Вместо строки
Цитата:
(polar ln (/ pi 4) 1.) ;_Координаты на 1 ед по углом 45 градусов
впиши
Цитата:
(mapcar '+ ln '(1. 2. 3.))
где
1 - смещение по X со своим знаком
2 - смещение по Y со своим знаком
3 - смещение по Z со своим знаком
Пример смещения от вершины, координаты которой хранятся в переменной ln на -2.5 по Х ; 3.2 по Y и 0 по Z
Цитата:
(mapcar '+ ln '(-2.5 3.2 0.))
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 29.07.2019, 09:46
#157
bengan777


 
Регистрация: 10.07.2012
Сообщений: 35


Добрый день. Используем для нумерации точек и выгрузки координат в exel ваш лисп ECoorE rev11c.LSP, за что вам огромное спасибо.
Возник вопрос. Появилось желание немного переделать нумерацию точек. Сейчас текст с номером точки появляется с одинаковым смещением по диагонали на северо-восток относительно узловой точки.
Есть ли возможность сделать так, чтобы текст вставлялся только с внешней стороны фигуры(как на скрине 2)?

Последний раз редактировалось bengan777, 10.03.2020 в 16:24.
bengan777 вне форума  
 
Непрочитано 30.07.2019, 14:17
#158
bengan777


 
Регистрация: 10.07.2012
Сообщений: 35


Если не ошибаюсь, реализовывать это надо по одному из описанных тут алгоритмов^
https://ru.wikipedia.org/wiki/%D0%97...B8%D0%BA%D1%83
К сожалению, сам я делать это буду очень долго( Если кто нибудь поможет, буду очень признателен.
bengan777 вне форума  
 
Непрочитано 01.08.2019, 12:37
1 | #159
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,990
<phrase 1= Отправить сообщение для VVA с помощью Skype™


bengan777, В этой реализации программы такой возможности нет. Можно только отредактировать смещение для всех точек. Координаты обрабатываются поточно, возможность определять и хранить для каждой точки свое смещение не предусмотрено.
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 01.08.2019, 12:42
1 | #160
Boxa

КЖ; C#
 
Регистрация: 03.11.2005
Санкт-Петербург
Сообщений: 2,587


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

ИМХО, алгоритм то там простой:
берете координаты вершины и смещаете на единичный вектор в сторону средней точки между предыдущей и последующей вершинами, потом проверяете полученные координаты на попадание в контур, если попали внутрь, то умножаем вектор на -1. Собственно всё. Далее умножаем полученный вектор на требуемую величину смещения. Код проверки на попадание в контур можно найти тут на форуме, хотя можно и самому написать, там ничего сложного нет, тут уж как удобнее.

Цитата:
Сообщение от bengan777 Посмотреть сообщение
К сожалению, сам я делать это буду очень долго(
Дорогу осилит идущий.

Цитата:
Сообщение от bengan777 Посмотреть сообщение
Если кто нибудь поможет, буду очень признателен.
Надеюсь помог.
Boxa вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Экспорт координат выбранных точек в *.txt

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Экспорт координат из dxf в txt eilukha Вертикальные решения на базе AutoCAD 14 26.04.2008 21:53
Нумерация точек на плане и вывод их координат в полярной системе kukuikar Программирование 1 17.02.2008 11:15
Получение текстового массива координат точек. Камыч AutoCAD 5 30.07.2007 12:28
Помощь по Лире Серега М Лира / Лира-САПР 52 28.05.2007 02:47
простановка реальных ординатных размеров (координат точек) AnnaT AutoCAD 7 15.06.2005 17:56