Смещение нескольких точек в NanoCAD на одинаковое расстояние от опорной точки

Здравствуйте. Можно ли как-то в Нанокаде сделать так, чтобы сместить сразу несколько точек от центра съемочной станции на одинаковое расстояние?
На картинке схематично нарисовано, как должно быть. Есть станция съемки (красный круг), есть три точки, снятые с этой станции: Т1, Т2, Т3 (желтые круги). Как сместить их на равное расстояние относительно станции съемки (зеленые круги это как они должны сместиться)?
Таких точек очень много и вручную каждую смещать геморно. Может есть способ сделать это более безболезненно?

Смещение точек

 

Написать лисп как вариант. Или выгрузить все в excel там просчитать и загрузить обратно.

 

Создать блок с центром ( Станции съемки) и применить команду - Масштаб.

 

А если я не умею кодить в Lisp? Примеры есть конечно, но с кодированием не дружу, увы.
С экселем не совсем понятно, как это сделать можно.

 

Обычными тригонометрическими формулами.

 

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

 

Извеняюсь, только экселем )

 

Хм, интересно, у меня почему-то не получилось. А у Вас и масштаб сохранен и в размер попало. Может Нанокад не так хорош, как Автокад.
Попробую ещё раз.

 

Подскажите пожалуйста, как Вы с экселем это сделали?

 

Самому стало интересно! Словно в тумане- в Excel- столбик с направл-ми (tg), ну, и приращения по коорд. осям?

 

Прямая и обратная геодезические задачи:
1. Сначала по координатам высчитываем угол и расстояние,
2. потом по углу и расстоянию+дельта высчитываем новые координаты.

 

Вы нас с ТС из рогатки расстреливаете, что ли? Примерно, то же постом выше я и говорил...
"К барьеру, сударь, к барьеру!"
Если не хотите стреляться- выкладывайте Excel- файл!
Mel0, будьте моим секундантом!

 

Это если немного точек можно посчитать. А если их штук 200? С каждой станции по 15-20 точек в разных направлениях и для каждой высчитывать новые координаты может быть трудоемко.

 

Mel0, считает Ексел! Вам только таблицу нужно составить.
Вы в таблицу просто перенесете координаты Ваших станций и точек, взятых с этих станций.
В итоговых колонках получите новые (смещенные) координаты.
Вы будете удивлены- как это быстро делается в Екселе.

 

Оффтоп

Вот так неожиданность

 

В принципе, для тестовых трёх точек получилось. Так это должно было быть?
Как и писал Павел, необходимо решить две геодезические задачи. Сначала обратную геодезическую задачу решить надо, потом к горизонтальным проложениям прибавить необходимое смещение и решить прямую геодезическую задачу.
Может кто знает, как эти решения можно превратить в код Lisp? Идея понравилась, но программирование вообще не моё. Есть пример похожего кода Пример кода (можно же ссылку такую давать? вроде не реклама), но как его использовать я не понимаю, к сожалению.

(вложения одинаковые, два раза случайно прикрепилось)

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

С автокадом не удалось познакомиться, в конторе стоит нанокад, поэтому сравнить не с чем) Но кто работал в обеих программах восхваляют автокад)

 

Даже не глядя на Ваши .xlsx: если Вас не устроил Ексел- что-то у Вас не получилось!

 

С Excel всё получилось посчитать, разница между старой и новой координатой как надо, но он не так много сокращает время. Нужно формулы подправить так, чтобы только координаты вставлять и всё посчитает, только как я не знаю, увы, а так в некоторых местах вручную править надо (про знаки приращений например, когда дирекционный считаю).

 

Mel0, учитесь в Екселе! Там только правильно таб составить. Количество точек неважно. Если сами не сможете -кто-то поможет- не научитесь.

 

А зачем? Достаточно посчитать градиент от станции до точки и использовать его:

Код:

dx = xi - xc
dy = yi - yc
L = sqrt(dx * dx + dy * dy)
gx = dx / L
gy = dy / L
 
xis = xi + dL * gx
yis = yi + dL * gy