Рассылка
"Новости проекта"











Выноска координат Х и У в топографическом прочтении.

Добавлено: 17 Мая 2018   SIB
   0 оценок

__Краткое описание__

Программа проверена на работоспособность в AutoCAD 2010, 2013, 2016.

После загрузки меню "ВЫНОСКА КООРДИНАТ" доступны две новые команды, вызываемые соответствующими кнопками панели. Одна рисует выноску с координатами указанной точки, вторая - то же самое, но первые две цифры координат заменяет на знак "*".

Выноска рисуется всегда параллельно горизонту, для этого во время работы автоматически устанавливается временная ПСК, параллельная текущему виду. По окончании работы команды, возвращается предыдущая ПСК. Поэтому работу команды лучше не прерывать. Сделано это было с целью преимущественного использования программы в видовом экране в пространстве Листа для оформления выносками уже сформированного плана. В этом случае выноски будут горизонтальными, т.е. паралелльными основной надписи и потом не придется их крутить. Тем не менее, в модели тоже можно работать, осознавая факт их горизонтальности независимо от поворота текущего вида.

При любой текущей ПСК пишутся координаты Мировой системы координат. При этом X и Y меняются местами.

Комментарии

Комментарии 1-9 из 9
SIB
, 21 мая 2018 в 01:03
#9
Цитата:
Сообщение #8 от CHESNOK
Вот и тема на форуме
http://forum.dwg.ru/showthread.php?t=4371

А исходник повидимому здесь создавали
http://www.caduser.ru/forum/index.php?PAGE_NAME=read&FID=44&TID=46534


Спасибо!
CHESNOK
, 18 мая 2018 в 17:19
#8
Вот и тема на форуме
http://forum.dwg.ru/showthread.php?t=4371

А исходник повидимому здесь создавали
http://www.caduser.ru/forum/index.php?PAGE_NAME=read&FID=44&TID=46534
SIB
, 18 мая 2018 в 13:21
#7
Цитата:
Сообщение #3 от CHESNOK
Есть уже такая которая выноску формирует
Вот лисп. Писал не я. Но я поменял в Х и Y местами т.к. в исходном коде X и Y геодезические
[CODE](defun c:geo_koord_mleader (/ pod_z koord xyz)
(initget "Да Нет Lf Ytn _ Y N Y N")
(setq
pod_z (getkword "\nПодписывать Z [Да/Нет] ? : ")
)
(while (and
(setq koord (getpoint "\nТочка "))
)
(setq
xyz (strcat "X=" (rtos (nth 1 koord) 2 3) "\nY=" (rtos (nth 0 koord) 2 3)(if
(= pod_z "Y")
(strcat "\nZ=" (rtos (nth 2 koord) 2 3))
""
))
)
(VL-cmdf "_mleader" koord pause xyz "")
)
)

(princ "Вызов фукции: geo_koord_mleader")[/CODE]
Создал для лиспа кнопочку и давно уже пользуюсь. не знаю кто автор но спасибо ему

Спасибо! Код короткий, изящный, но в 2010м сразу не заработал. Поковыряю...
SIB
, 18 мая 2018 в 13:17
#6
Цитата:
Сообщение #2 от s4am
И параметр скрытия заднего плана текста не помешал.

На задний план никогда не жаловались))) Если только маскировкой, но это объект коварный))) Скорре всего этим не займусь, увы.
SIB
, 18 мая 2018 в 13:15
#5
Цитата:
Сообщение #1 от s4am
Штука просто отличная, спасибо. Вот если бы она выноску формировала а не группу примитивов, цены бы ей не было)))

Пожалуйста! Вещь древняя, переделывать под выноску не хочется да и не совсем просто. Тягать ее можно командой Растянуть, и если ее можно быстро отрисовать заново, то нет особого смысла в гибкости мультивыноски. А в акадовской Выноске будут проблемы с подчеркиванием между строками, насколько помню, там либо сверху, либо снизу, либо сбоку.
CHESNOK
, 18 мая 2018 в 11:23
#4
то есть наоборот в исходном коде X и Y были НЕ географические.
CHESNOK
, 18 мая 2018 в 11:20
#3
Есть уже такая которая выноску формирует
Вот лисп. Писал не я. Но я поменял в Х и Y местами т.к. в исходном коде X и Y геодезические
[CODE](defun c:geo_koord_mleader (/ pod_z koord xyz)
(initget "Да Нет Lf Ytn _ Y N Y N")
(setq
pod_z (getkword "\nПодписывать Z [Да/Нет] ? : ")
)
(while (and
(setq koord (getpoint "\nТочка "))
)
(setq
xyz (strcat "X=" (rtos (nth 1 koord) 2 3) "\nY=" (rtos (nth 0 koord) 2 3)(if
(= pod_z "Y")
(strcat "\nZ=" (rtos (nth 2 koord) 2 3))
""
))
)
(VL-cmdf "_mleader" koord pause xyz "")
)
)

(princ "Вызов фукции: geo_koord_mleader")[/CODE]
Создал для лиспа кнопочку и давно уже пользуюсь. не знаю кто автор но спасибо ему
s4am
, 18 мая 2018 в 10:10
#2
И параметр скрытия заднего плана текста не помешал.
s4am
, 18 мая 2018 в 10:08
#1
Штука просто отличная, спасибо. Вот если бы она выноску формировала а не группу примитивов, цены бы ей не было)))
Комментарии могут оставлять только зарегистрированные участники
Авторизоваться
Применение косоугольной системы координат в динамике тела с неподвижной точкой2014 г.

С. П. Шадрина

Применение косоугольной системы координат в динамике тела с неподвижной точкой

92 руб.
Размещение рекламы