[EgorS]

Как качественно переводить 3d полилинию (вынутую из 3dsmax) в 2d полилинию? После применения команды flatten ее сильно коребит, разрывает и тд. Прикладываю пример: файл 3dsmax, файл автокад с исходным и переведенным узором.

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

Все нормально переводится.

[EgorS]

Сообщение от Кулик Алексей aka kpblc Все нормально переводится.

а что вы там перевели? 3d полилиния как была 3d так и осталась, автокад 2014. Нужно 3D Polyline перевести в обычную, чтоб потом выдавать этот файл для программы по лазерной резки.
PS: почему Бот закрыл аналогичную мою тему?? Я ее переименовал как он хотел, сейчас и эту хочет закрыть!

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

Сорри, не тот файл закинул.

[Gmk17]

Кулик Алексей aka kpblc, а как ты это сделал?
У меня аналогичный результат получился после _explode и применения следующей команды (не помню где на форуме взял):

Код:

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

^C^C(defun C:JPL ( / ope ssnab )(setq ope (getvar "PEDITACCEPT"))(setvar "PEDITACCEPT" 1)(setq ssnab (ssget "_I"))(while (not ssnab)(setq ssnab (ssget)))(command "_pedit" "_Multiple" ssnab "" "_Join" 0 "")(setvar "PEDITACCEPT" ope)(setq ssnab nil)(princ));JPL;

[AlexCondor]

SuperFlatten? У меня вроде сработало...

[Gmk17]

Сообщение от AlexCondor SuperFlatten? У меня вроде сработало...

Ну да, так тоже получается. После SF можно взорвать и обычным _pedit объединить.

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

Gmk17, да так и сделал. Можно было бы свое решение нарисовать, но стало лениво - для одноразовой задачи лисп прописывать.

[EgorS]

Супер - будем разбираться!)