[Isuma]

Собственно, у меня объект, начерченный полилинией. Длины сегментов 1678,535 и 1421,213. Есть ли какой-нибудь лисп, который единовременно изменит длины с определённым округлением, то есть, сделает их 1700 и 1400 соответственно?
И ещё вопрос: можно ли настроить команду Соединить таким образом, чтобы точность поиска сопрягаемых узлов было равна определённому диапазону: чтобы линии, находящиеся на расстоянии друг от друга соединялись в полилинию?

Пока самый приемлемый выход из этого я нашёл следующий:
1. Включить динамический ввод с поставленной галочкой напротив "Включить ввод размеров, где возможно".
2. Каждую из линий дёргать за ручку, нажимать Tab и вводить конечную длину.
3. Уменьшать все объекты в 100 раз.
4. В настройках автонанесения зависимостей включить только Совпадение. поставить точность 1. Выполнить автонанесение.
5. Увеличить в 100 раз. Удалить зависимости.
6. Соединить в полилинию.

Но вопрос в том: можно ли редактировать всё скопом, округлять?

[sertor]

1. Попробуйте воспользоваться командой УВЕЛИЧИТЬ (_LENGTHEN) с опцией Всего.

чтобы линии, находящиеся на расстоянии друг от друга соединялись в полилинию?

Можно воспользоваться комадной "Очистка чертежа" из функционала AutoCAD Civil(MAP)3D (если таковой есть в наличии).

[Bull]

Сообщение от Isuma можно ли настроить команду Соединить таким образом, чтобы точность поиска сопрягаемых узлов было равна определённому диапазону: чтобы линии, находящиеся на расстоянии друг от друга соединялись в полилинию?

Нет. Но вот смотрю в АКАД 2013 (может и раньше, я с 2008-го пересел) появилась команда "Соединение кривых". Там через сплайн получается. Почитай справку. Команда на панели "редактирование" по умолчанию

[Isuma]

Сообщение от sertor Попробуйте воспользоваться командой УВЕЛИЧИТЬ (_LENGTHEN) с опцией Всего.

Команда хорошая, но только у меня все линии разной длины. мне не нужно, чтобы длина их была одна, а только одинаковая кратность.

to Bull:
да, команду такую знаю. только вот при этом длина линий меняется.

[swell{d}]

есть лисп для округления координат узлов полилинии. если округлить с точностью 100, будет то, что вам нужно

[Isuma]

Сообщение от swell{d} есть лисп для округления координат узлов полилинии. если округлить с точностью 100, будет то, что вам нужно

А ссылочку на лисп вы можете дать?

Только координат, не длин? а если у меня линии пойдут под углом, будут погрешности?

[swell{d}]

если линии под углом, то наверное не подойдёт.
в любом случае, тем на форуме много, вот, например

[Isuma]

Сколько ни перепробовал...а точность только до целых значений, максимум..почему-то.

Наверное, что-то другое искать надо...

[twilight]

Сообщение от Isuma Собственно, у меня объект, начерченный полилинией. Длины сегментов 1678,535 и 1421,213. Есть ли какой-нибудь лисп, который единовременно изменит длины с определённым округлением, то есть, сделает их 1700 и 1400 соответственно?

Действительные размеры нужно округлить или достаточно чтоб в проставленном размере автоматом округлялось? (в свойствах размеров есть округление).

И ещё вопрос: можно ли настроить команду Соединить таким образом, чтобы точность поиска сопрягаемых узлов было равна определённому диапазону: чтобы линии, находящиеся на расстоянии друг от друга соединялись в полилинию?

Можно использовать команду _mpedit с опцией join там запрашивается допустимый "зазор" объединения.

[Isuma]

Сообщение от twilight Действительные размеры нужно округлить или достаточно чтоб в проставленном размере автоматом округлялось (в свойствах размеров есть округление).

Округлить нужно не размеры, а длины.

Сообщение от twilight Можно использовать команду _mpedit с опцией join там запрашивается допустимый "зазор" объединения.

Изменятся длины отрезков.

[twilight]

Сообщение от Isuma Округлить нужно не размеры, а длины.

Маловероятно. Для точек и отрезков еще как-то пердставимо а для полилинии вообще невероятно. Например что будет с замкнутым треугольником?

Сообщение от Isuma Изменятся длины отрезков.

А как можно объединить линии на расстоянии но не поменять их длину? Двигать их что ли и поворачивать?

[Isuma]

Сообщение от twilight Маловероятно. Для точек и отрезков еще как-то пердставимо а для полилинии вообще невероятно. Например что будет с замкнутым треугольником?

Ок. Отрезки. пусть будут отрезки. не принципиально.

Сообщение от twilight А как можно объединить линии на расстоянии но не поменять их длину? Двигать их что ли и поворачивать?

Совершенно верно. Как я описал в 1 посте. через автонанесение зависимостей.

[twilight]

Сообщение от Isuma Ок. Отрезки. пусть будут отрезки. не принципиально.

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

Сообщение от Isuma Совершенно верно. Как я описал в 1 посте. через автонанесение зависимостей.

По-моему проще начертить заново.

Ну и стандартный вопрос - а зачем это нужно?

[Isuma]

Сообщение от twilight Выше говорили про округлении координат там что-то похожее было

Линии, идущие под углом будут некорректны.

Сообщение от twilight а зачем это нужно?

Чтобы исправить чужие чертежи. Архитекторы, что хотят, то и творят. я уже не говорю о том, что после них приходится обнулять координату Z. потому что чертят они не в плоскости.

[twilight]

Сообщение от Isuma Линии, идущие под углом будут некорректны.

Угу. Но после смещения некоректными могут стать объекты потому что нельзя смещать и поворачивать линии в произвольном направлении и не получить граблями по лбу.

Чтобы исправить чужие чертежи. Архитекторы, что хотят, то и творят. я уже не говорю о том, что после них приходится обнулять координату Z. потому что чертят они не в плоскости.

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

[Isuma]

Сообщение от twilight Угу. Но после смещения некоректными могут стать объекты потому что нельзя смещать и поворачивать линии в произвольном направлении и не получить граблями по лбу.

Как раз объекты и станут нормальными, в отличие от чертежей архитекторов. О повороте речи не идёт. Только смещение.
Руками - это, конечно, хорошо. Но оптимизировать это дело хотелось бы из-за больших объёмов.

[357]

Сообщение от Isuma Архитекторы, что хотят, то и творят

С этого и нужно было начинать... Из моего опыта:
- вернуть дезигнерам чертежи для исправления (обычно невыполнимый вариант)
- перечертить самому
- плюнуть на точность и чертить по их подоснове.
В будущем при определении времени исполнения проекта (заказа) учитывать время (и деньги) на перечерчивание дезигнерских эскизов.

[twilight]

Сообщение от Isuma Как раз объекты и станут нормальными, в отличие от чертежей архитекторов. О повороте речи не идёт. Только смещение.

ОК. Жил был прямоугольный треугольник со сторонами 5; 7 и 8,602325267043. И тут ему округлили стороны. Без поворотов.

[Isuma]

Сообщение от twilight ОК. Жил был прямоугольный треугольник со сторонами 5; 7 и 8,602325267043. И тут ему округлили стороны. Без поворотов.

Треугольник, так и быть, можно и вручную. а вот когда много сегментов - дело другое. в месте нестыковки можно и узким участком пожертвовать ради точности остальных.

голову на плечах ещё никто не отменял, но экономить время тоже нужно.

[baaba]

Сообщение от Isuma Есть ли какой-нибудь лисп, который единовременно изменит длины с определённым округлением, то есть, сделает их 1700 и 1400 соответственно?

Вот моя разработка.
http://forum.dwg.ru/showthread.php?t=92362

Но округляет она значения координат в МСК. Это наверное не то..

[sbi]

Сообщение от Isuma голову на плечах ещё никто не отменял, но экономить время тоже нужно.

Голова на плечах вещь нужная, но в средние века некоторым ее сносили за не надобностью.В масштабе 1:100, если это чертеж, лучше корректировать размеры.
Можно и для Вашего желания или хотения откорректировать и ввод точек в Exel, VBА, Lisp...и тд

[Isuma]

Сообщение от sbi В масштабе 1:100, если это чертеж, лучше корректировать размеры

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

Неужели за всё это время не написано ни одного лиспа для корректировки длин линий с округлением значений? или это невозможно?

[357]

Сообщение от Isuma или это невозможно?

Может быть и возможно, но на каждую дезигнерскую глупость лисп не напишешь.
)))

[swell{d}]

у меня есть скрипт на vba, но я хз будет ли он работать в акаде. по идее должен

[Isuma]

с 2009 автокада vba не работают.

[sbi]

Isuma Поиск по форуму " VBA AutoCAD" http://www.google.ru/cse?cx=partner-...010&gsc.page=1
Кроме того, любая площадь считается с учётом погрешности измерений .

[Isuma]

Спасибо, полезно.

В скрипта в dvb нет? только код?

[swell{d}]

В блокнот его и "сохранить как"

[Isuma]

Сообщение от swell{d} В блокнот его и "сохранить как"

ну допустим, расширение я изменил, только что от этого поменялось? всё равно загрузить его нельзя. пишет, что недопустимый формат.

[Valery Brelovsky]

Сообщение от Isuma Неужели за всё это время не написано ни одного лиспа для корректировки длин линий с округлением значений? или это невозможно?

Эта проблема не озвучивалась ранее и от сюда и обходимость написания лиспа не возникала.
Соласен с постом 23 нельзя на каждую глупость писать лисп.
Если это фигура то изменение длин приведёт к не вязке в углах. Кроме прочего это кординаты начала и конца линии и какие кординаты в этом случае редактировать.
Часто работаю с чертежами в котрых аналогичный благан в двумерном чертеже концы линий имеют разную высоту. Нужно было посчитать дины разводки труб для полива. Беру отрезок по плану метров 20 автокад даёт 200 метров сразу не дошло, Псмотрел чертёж в аксонометрии а там море линий начинающиеся на уровне отметок топографии и опускающиеся до нуля по высоте. В том же поекте открытый первый эттаж. при замене тротуара у здания отметки тротуара даны выше пола на 30 см. Даже при стенах такого не делают. И много других глупостей. И концы линий стыкуют на глаз, вроде как объектные привязки не существуют в природе. Могу по этому вопросу только посочуствовать нет панацеи от глупости.

[Isuma]

Что-то я так и не допёр как этот макрос запустить... объясните как сделать, будьте добры.

Сообщение от Valery Brelovsky Соласен с постом 23 нельзя на каждую глупость писать лисп.

Глупостей на свете много, но это не значит, что с ними не надо бороться.

[Кулик Алексей aka kpblc]

Сообщение от Isuma Глупостей на свете много, но это не значит, что с ними не надо бороться.

Ты пытаешься бороться не с глупостью, а с ее последствиями.

[swell{d}]

Сообщение от Isuma всё равно загрузить его нельзя. пишет, что недопустимый формат

к сожалению, я не пользуюсь автокадом и не знаю, как Вам помочь ещё

[Isuma]

Сообщение от Кулик Алексей aka kpblc Ты пытаешься бороться не с глупостью, а с ее последствиями.

тогда лиспы надо писать не на глупости, а на их последствия. будем к словам цепляться?

[Valery Brelovsky]

Сообщение от Isuma Собственно, у меня объект, начерченный полилинией. Длины сегментов 1678,535 и 1421,213. Есть ли какой-нибудь лисп, который единовременно изменит длины с определённым округлением, то есть, сделает их 1700 и 1400 соответственно?

Вот есть прямоугольник с катетами 300 и 500 а гипотенуза 583,095. Как в этой ситуации нужно округрять.

Сообщение от Isuma И ещё вопрос: можно ли настроить команду Соединить таким образом, чтобы точность поиска сопрягаемых узлов было равна определённому диапазону: чтобы линии, находящиеся на расстоянии друг от друга соединялись в полилинию?

А это макрос который соеденяет линии с зазором 10
объеденяет линии преобразуя в полилинию и само собой полилинии.

^C^C(defun c:mypljoin( / selset _pedit) (if (setq selset (ssget "_:L" '((0^M;. "ARC,*LINE")))) (progn (setq _pedit (getvar "PEDITACCEPT")) (setvar^M;"PEDITACCEPT" 1) (command "_.pedit" "_m" selset "" "_j" 10.0 "") (setvar^M;"PEDITACCEPT" _pedit))));mypljoin;

Автор Кулик Алексей aka kpblc

[Кулик Алексей aka kpblc]

Тогда уж так, наверное:

Код:

[Выделить все]

(defun c:mypljoin( / selset _pedit) (if (setq selset (ssget "_:L" '((0 . "ARC,*LINE")))) (progn (setq _pedit (getvar "PEDITACCEPT")) (setvar "PEDITACCEPT" 1) (command "_.pedit" "_m" selset "" "_j" 10.0 "") (setvar "PEDITACCEPT" _pedit))));mypljoin;

(^M; лишние)

[Isuma]

Сообщение от Valery Brelovsky А это макрос который соеденяет линии с зазором 10 объеденяет линии преобразуя в полилинию и само собой полилинии.

он изменяет длины линий при этом?

Сообщение от Valery Brelovsky Вот есть прямоугольник с катетами 300 и 500 а гипотенуза 583,095. Как в этой ситуации нужно округрять.

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

[Лиспер]

Сообщение от Isuma он изменяет длины линий при этом?

Так подумай...
Было два отрезка: (558377.35 230930.50 0) - (558444.20 231018.84 0) и (558378.72 230922.81 0) - (558468.72 230892.81 0)
Длины соответственно: 110.78 и 94.87; Суммарная - 205,65
После объединения получаем полилинию с вершинами
(558444.0 231019.0) (558373.0 230925.0) (558469.0 230893.0) общей длиной уже 218,95
И чего теперь делать будем?

[Isuma]

Да, я уже проверил. изменяет. видимо использует Фаску, а потом Соединить.

Но лисп неплохой, спасибо, кстати! в хозяйстве будет полезен)

[Лиспер]

Не "видимо", а использует. И не "Фаску", а команду _.pedit. А так все правильно...

[Valery Brelovsky]

Сообщение от Кулик Алексей aka kpblc (^M; лишние)

Спасибо обновил. Но раньше тоже работал.

Сообщение от Isuma Да, я уже проверил. изменяет. видимо использует Фаску, а потом Соединить.

Если о том макросе что я выложил, то он продляет до пересечения.

Сообщение от Isuma на такой вопрос я уже отвечал

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

Сообщение от Isuma Честно говоря, меня интересуют не альтернативные решения проблемы, а конкретный вопрос об округлении длин линий.

Вы задали два вопроса об округлении длин и об объеденении линий.

[Isuma]

Сообщение от Valery Brelovsky Вы отвечали но как то не конкретно. Мне трудно представляется чертёж архитектора в котром основная масса независимых линий.

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

Сообщение от Valery Brelovsky Вы задали два вопроса об округлении длин и об объеденении линий.

Так и было. С объединением разобрались, спасибо.
Просто, так как это делается с помощью нанесения зависимостей (объекты двигаются и жертвуется точность только одного сегмента), не получится сделать простым соединением линий.

[CaMoCAD]

Сообщение от Isuma Как раз объекты и станут нормальными, в отличие от чертежей архитекторов.

Вас не смущает то, что Вы будете работать по "округленной" архитектуре, а Ваши смежники, возможно, - по той, какая есть? Ничего, что разбежитесь мал-мала? Имхо, надо бы оставить кривизну на совести архов и на голубом глазу выдавать детали по 1421 мм. И время на исправление съэкономите и уверенность останется что "такибыло".

[Isuma]

Сообщение от CaMoCAD Вас не смущает то, что Вы будете работать по "округленной" архитектуре

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

Сообщение от CaMoCAD на совести архов

Есть такая?

[CaMoCAD]

Сообщение от Isuma Цитата: Сообщение от CaMoCAD на совести архов Есть такая?

Мне что-то уже крайние лет 5 от архов приходит исключительно экспорт из архикада. Там свои тараканы (куча блоков, вайпауты пачками), но по z не скачет хотя бы. Тьфу-тьфу.

[Valery Brelovsky]

Как то говрим о округлении длин, а показать пример детали в которой это нужно сделать. Мне почему то кажется если чертёж сдела криво, то изменение длины дасе такую же кривизну только с округлёными длинами. Если хочешь сделать правильно то нужно просто начертить самому как должно быть. Думаю что округлением кривизны не убрать. И по этому поводу нужно подходить к вопросу, что не соответствие размеров длине это брак и должен переделываться и приводится в порядок. Я понимаю когда чертили на бумаге иногда можно было поменять размер исправить на бумаге сложновато хотя реально. Но сегодня пускать кривизну это грубейший брак. Это осложняет работу в подсчёте объём, это создаёт проблему в образмеривании, и создаёт дополнительный объём работ для смежников. Заметьте это не только у Вас, но издесь такие же косяки в этом вопросе.