|
||
| Правила | Регистрация | Пользователи | Сообщения за день | | Поиск | | Справка по форуму | Файлообменник | |
|
Поиск в этой теме |
23.09.2012, 05:17 | #1 | |
Нужен макрос выявления "неправильных" ортогональных линий
Егорьевск Моск.обл.
Регистрация: 28.02.2007
Сообщений: 206
|
||
Просмотров: 12752
|
|
||||
Регистрация: 30.10.2010
Сообщений: 123
|
Цитата:
Были объекты на чертеже (пусть и не аккуратном) разложены по своим слоям, а ты предлагаешь некоторые из них перекинуть в бессмысленный слой "NOT_ORTO". И еще интересный вопрос: Попробуй, пользуясь терминами из геометрии, сформулировать, что такое "неправильное соединение концов линий" и чем будет отличаться "негоризонтальная линия" от наклонной |
|||
|
||||
Регистрация: 17.09.2012
Сообщений: 9
|
возможно сделать осмысленным если в нем расположить не линии, а указатели, например окружности, отмечающие неправильно соединенные концы линий.
__________________
Код порою получается жутковат, конешно, и убиться об его можно, да ведь все под богом ходим... |
|||
|
||||
идущий по граблям Регистрация: 26.05.2005
Сообщений: 5,095
|
Отклонение от прямых углов не более, чем на 1 градус: углы 359-1 град, 89-91 град, 179-181 град, 269-271 град. В строительных чертежах таких малых углов ОБЫЧНО не бывает. В исполнительных съемках - часто.
Цитата:
Offtop: PS Это на словах я такой умный, а код написать ниасилю - не маленький кусок работы, не до того Последний раз редактировалось kp+, 24.09.2012 в 13:50. |
|||
|
||||
Регистрация: 28.02.2007
Егорьевск Моск.обл.
Сообщений: 206
|
Какой же выход можете предложить? Провожу конструктивную линию, привязываясь к одному углу прямоугольника. А другой угол - стоит в стороне на пол-миллиметра или на полтора миллиметра, неважно. Но ясно видно, что прямоугольник - ортогональные линии (должны быть ортогональными)! И приходится ручками выравнивать. А выровняв один угол, сразу проверяешь длину сторон - она ведь изменилась. Вот так одно за другое цепляется.
p.s. Было именно в проектных чертежах, я по ним исполнительные делаю и сталкиваюсь часто с этой проблемой. А в новый слой хочу перекинуть, чтобы сразу определить эти линии. Ну, можно просто выделить их миллиметровой толщиной, например. А новый слой не портит мой чертёж, ведь это МОЯ исполнительная схема. А проектный чертёж я и не затрагиваю. Последний раз редактировалось Малявка, 24.09.2012 в 16:58. Причина: добавление |
|||
|
||||
Инженер LISP Регистрация: 11.05.2005
Минск
Сообщений: 6,992
|
Что пришло в голову
Код:
Цитата:
Если вертикальными или горизонтальными должны быть линии с отклонением по любой (X,Y) из координат до пол-милииметра, то измени Цитата:
Цитата:
__________________
Как использовать код на Лиспе читаем здесь Последний раз редактировалось VVA, 24.09.2012 в 22:42. |
|||
|
||||
Регистрация: 28.02.2007
Егорьевск Моск.обл.
Сообщений: 206
|
VVA, спасибо, однако не работает.
Я скопировала код, сохранила как F8.txt, переименовала в F8.lsp и загрузила в автокад. Вроде всё правильно сделала (я всегда так делаю). Вот командная строка. Позволяет выбирать линию и всё. Код:
|
|||
|
||||
Инженер LISP Регистрация: 11.05.2005
Минск
Сообщений: 6,992
|
Малявка, Проверь слои. А так же установи нужный допуск (Прочти в #6 после выделенного красным)
__________________
Как использовать код на Лиспе читаем здесь |
|||
|
||||
Регистрация: 28.02.2007
Егорьевск Моск.обл.
Сообщений: 206
|
VVA, работает! Моя великая благодарность! Маленькая просьба: добавьте в макрос ещё и обработку полилиний, включая составные. Если у такой полилинии хотя бы один отрезок входит в установленный диапазон (setq fuzz 0.1), то эта полилиния перемещалась бы на тот же слой _NOT_ORTO и проблемные точки выделялись бы окружностями. (хотя про окружности - это уже злоупотребление вашей добротой. Если это сделать сложно, то достаточно перемещения на слой, а там я уже разберусь вручную)
И - сделайте, пожалуйста, автоматическое создание этого слоя с голубым цветом (CYAN) и весом линии 0,5мм, если он не существует (просто лень каждый раз самой создавать один и тот же слой) Спасибо! Последний раз редактировалось Малявка, 25.09.2012 в 08:22. Причина: добавление |
|||
|
||||
Регистрация: 25.12.2005
Москва
Сообщений: 13,627
|
|
|||
|
||||
Регистрация: 28.02.2007
Егорьевск Моск.обл.
Сообщений: 206
|
Profan, программа А.Ривилиса L_ALIGN_XY тоже не работает с полилиниями, увы. Кроме того, она выравнивает линии автоматически, а мне надо самой решить, что делать с линиями. И выравнивает относительно её центра, а мне надо, чтобы один из концов оставался на месте. Какой - на моё решение.
Последний раз редактировалось Малявка, 25.09.2012 в 12:30. |
|||
|
||||
Регистрация: 17.09.2012
Сообщений: 9
|
можно попробывать и такой вариант. Неортогональные линии и LWлинии перемещает на слой "_NOT_ORTO", который должен быть предварительно создан.
Код:
__________________
Код порою получается жутковат, конешно, и убиться об его можно, да ведь все под богом ходим... Последний раз редактировалось MEsher, 26.09.2012 в 21:08. |
|||
|
||||
Регистрация: 17.09.2012
Сообщений: 9
|
забыл убрать Alert.
Если слоя нет, то создается слой _NOT_ORTO цветом 1 - красный. Исправил выше.
__________________
Код порою получается жутковат, конешно, и убиться об его можно, да ведь все под богом ходим... |
|||
|
||||
Регистрация: 17.09.2012
Сообщений: 9
|
Offtop: Говорила мне мама, не правь код по месту
теперь должен. Исправлено выше
__________________
Код порою получается жутковат, конешно, и убиться об его можно, да ведь все под богом ходим... |
|||
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Нужен макрос для AutoCAD, экспортирующий список деталей в текстовый файл | technos | Программирование | 20 | 24.10.2015 18:11 |
Нужен макрос для черчения почасовых графиков | SON | Программирование | 2 | 03.08.2010 21:11 |
Нужен макрос для команды "стыковка с поворотом" | *AllA* | AutoCAD | 2 | 15.07.2010 09:53 |
Нужен макрос (поворот на 90 предварительно выделенного) | dextron3 | Программирование | 20 | 10.07.2007 21:36 |
координаты Excel->_line x,y x,y для Acad. нужен макрос на | VictorSM | Программирование | 9 | 22.01.2006 18:41 |