[voverrr]

Здравствуйте.
Такая проблема.
После экспорта в автокад имею множество круглых отверстий, в которых окружность состоит из двух половинок полилиний(или сплайнов).
Нужно заменить эти неполноценные окружности на нормальные.
Вручную - очень долго. Окружностей много, около сотни.

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

Вопрос: возможно ли преобразовать каждый из этих объектов в один и тот же блок? Возможно лиспом? Предположим, что все эти недо-окружности между собой полностью идентичны.

[AMDen]

https://forum.dwg.ru/showthread.php?t=152092
Возможно здесь найдется решение.

[voverrr]

спасибо.
как создать блоки из элементов - этого я там не нашёл, но как заменить одинаковые примитивы на образец - очень даже решение есть.

[Oleg T]

Offtop:

Сообщение от voverrr как создать блоки из элементов - этого я там не нашёл

BricsCAD, Blockify
https://help.bricsys.com/hc/en-us/ar...28153-Blockify

[koMon]

Сообщение от voverrr в которых окружность состоит из двух половинок полилиний(или сплайнов).

образец выложите

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

koMon, это команда _.donut, кажется

[koMon]

Алексей, так ведь

Сообщение от voverrr После экспорта в автокад

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

koMon, я к тому, что создаются-то наверняка такие же полилинии: 2 дуговых сегмента с центральным углом 90, замкнутая.

[koMon]

ну тогда нф городить огород с блоками?

[voverrr]

Приложу файл.
в данном случае все окружности почему-то превратились в дуги 180 градусов. Половина окружности, только правая. Левых половин окружностей нет.

Это произошло после экспорта из солида в ДХФ.

В принципе, после ссылки AMDen, я порылся и нашёл лисп, который способен заменить эти полуокружности блоком или окружностью. Приложил.

[Vova]

Сообщение от voverrr в которых окружность состоит из двух половинок полилиний(или сплайнов). Нужно заменить эти неполноценные окружности на нормальные.

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

Сообщение от voverrr Окружностей много, около сотни.

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

[koMon]

Сообщение от Vova чем дискутировать на форуме

так-то да, но всё же, дуги в окружности

Код:

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

 
(vl-load-com)
(setq arc_sset (ssget '((0 . "ARC"))))
(while (setq current_arc (ssname arc_sset 0))
	(entmake (subst '(0 . "CIRCLE") '(0 . "ARC") (vl-remove-if-not '(lambda (every_dxf_group)
																		(member (car every_dxf_group) '(0 100 67 410 8 62 6 370 10 40 210))
																	)
																	(entget current_arc)
					 							 )
			  )
	)
	(ssdel current_arc arc_sset)
	(vla-erase (vlax-ename->vla-object current_arc))
)
(princ)

[Vova]

Сообщение от voverrr ...в которых окружность состоит из двух половинок полилиний (или сплайнов)

А если сплайны?

[koMon]

Едва ли Solid сделает экспорт окружности в DXF в сплайн. Это более по части Корела, ну или ещё какого продукта, оперирующего кривыми Безье. Но если даже такое и возможно, то и сплайн можно подменить на окружность я думаю без особых проблем.