[Sleekka]

Уважаемые участники форума помогите пожалуйста по автокаду, проблема в следующем:
не объединяются полилинии, командой PEDIT необъединяются т.к. полилинии получены в результате преобразований:
1) начерчен план стен полилиниями
2) Extrude
3) explode
4) delete все что выше нулевой плоскости Z.
5) regions explode
6) lines >>> pedit to Plines.
в итоге при pedit plines which при explode = arcs, выводится сообщение: Object is not parallel to UCS.
Файл с проблемой прилагаю, полилиния 1 - это и есть одна из тех злощастных арок.
ЗЫ: надеюсь на вашу помощь.
[ATTACH]1149853711.dwg[/ATTACH]

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

А flatten не делался?

[Андрей С.]

<Sleekka
У всех "дуговых" полилиний вектор выдавливания 0,0,-1. То есть их надо отзеркалить относительно плоскости XY. Например, таким вот образом:

Код:

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

Command: _mirror3d
Select objects: Specify opposite corner: 4 found
Select objects:
Specify first point of mirror plane (3 points) or
[Object/Last/Zaxis/View/XY/YZ/ZX/3points] <3points>: xy
Specify point on XY plane <0,0,0>:
Delete source objects? [Yes/No] <N>: y
Command:

Или попросить кого-то лисп для этого написать.

[Кочетков Андрей]

Я бы воспользовался командой PJS из Toolpac.

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

Без проверок на работоспособность:

Код:

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

(defun c:norm (/ adoc)
  (vl-load-com)
  (setq adoc (vla-get-activedocument (vlax-get-acad-object)))
  (vla-startundomark adoc)
  (vlax-for ent	(vla-get-blocks adoc)
    (if	(wcmatch (strcase (vla-get-name ent) t) "*_space*")
      (vlax-for	subent (vla-item (vla-get-blocks adoc) (vla-get-name ent))
	(if (vlax-property-available-p subent 'normal)
	  (vla-put-normal
	    subent
	    (vlax-3d-point '(0. 0. 1.))
	    ) ;_ end of vla-put-normal
	  ) ;_ end of vla-put-normal
	) ;_ end of vlax-for
      ) ;_ end of if
    ) ;_ end of vlax-for
  (vla-endundomark adoc)
  (princ)
  ) ;_ end of defun

[Андрей С.]

>kpblc
Увы. Объекты с "неправильным" вектором выдавливания просто исчезают...

[Grinzaid]

А так?
[ATTACH]1150229601.dwg[/ATTACH]

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

> Андрей С. : Нда... Действительно, исчезают. Интересно, с чего бы это?

[Sleekka]

ужы пытался сюда написать, да вот только в тот момент инет отрубили, с большим запозданием СПАСИБО всем огромное, вот только flatten странная команда читал хелп, где написано что все должно быть зашибись, а она почему то расстояния меняет?

[SUG]

Нужно порставить полвинный диаметральный размер (основная плоскость) через центр с выходом за осевую.
Кто знает как сделать быстро

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

Сообщение от Sleekka ужы пытался сюда написать, да вот только в тот момент инет отрубили, с большим запозданием СПАСИБО всем огромное, вот только flatten странная команда читал хелп, где написано что все должно быть зашибись, а она почему то расстояния меняет?

Где меняет? В исходном файле? Не меняет, специально проверял.
Кроме того, в исходном файле что-то странное блоками творится (скорее всего, последствия внедрения внешних ссылок) - блок сидит внутри блока (это я про оси). Подобные штуки flatten иногда не очень корректно обрабатывает. ИМХО - если не сильно надо, я б разбил блок (все равно их вхождений только по 1).
> SUG: :?:

[Sleekka]

блок сидит внутри блока

Просто я так черчу.
По поводу flatten пробовал конвертануть 3д солид на плоскость вида размеры почему-то меняются, я еще попробую а если нет то выложу примеры.

[Sleekka]

KpbIc, ты же наверное анализировал код который выполняет flatten, подскажи в чем дело, я тогда имел ввиду что flatten некоректно, проецирует солиды на плоскость вида.
Когда я читал help english of Express tools, я понял что flatten - команда - которая должна преобразоват 3д в 2д проецируя на плоскость вида (как вижу) причем предлагается выбрать спрятать невид линии или нет, так вот в итоге для часных случаев когда плоскость вида параллельна XOY. должны получаться нормальные размеры между ребрами солида, так ведь не получается. Выкладываю примеры 111 - 3д солид
123 - после флеттен
Многоуважемый наш прогграммер объясни пожалуйста мне что я не так делаю, посмотрев файлы ты увидишь, расстояния между линиями изменились. Если бы ты не писал ранее, что flatten коректно работает, я бы эту команду счел, недоразумением Autodeck и забил бы на нее, но раз уж ты говоришь что все зашибись и можно пользоваться подскажи пожалуйста КАК?

[Sleekka]

забыл
[ATTACH]1151947141.dwg[/ATTACH]

[Sleekka]

ваыва
[ATTACH]1151947272.dwg[/ATTACH]