[Sergey FS]

Помогите вспомнить больному на всю голову человеку, как в AutoCADe создать полилинию из двух и более линий.
Спасибо!

[виталич]

Что имеется в виду?
Мультилиния (MLINE), состоящая из нескольких эквидистантных отрезков (кривых), или, все-таки, полилиния (Pline), к которой нужно последовательно присобачить еще что-нибудь?
--------
Не стесняйтесь читать HELP.

[Startrek]

PEDIT >select > it is not a pline , do you want to convert> Y > J >select lines

[kos]

Сообщение от Startrek PEDIT >select > it is not a pline , do you want to convert> Y > J >select lines

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

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

[виталич]

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

А вот это напрасно.
На форуме где-то говорили про дистриб. русского HELPа. Поройся.
Или про ссылки , где его взять. Да и на сайте в разделе КОМАНДЫ много толкового.
---
Удачи

[Сергей FS]

Спасибо Виталичь за совет - будем искать. (Я на сайте новенький)

[Piton]

Как объединить примитивы без лишних вопросов? (выбрал нажал кнопку объединилось повтор по пробелу и опять запустилась команда объединения без вопросов).
как модернизировть PLJOIN.LSP из экспресс тулз от 2000 када или pledit из 2006?

[Vova]

2006: join

[Dym]

;*****************************************************************************
(defun cOF (/ a b b1 p1 d pckbox)
(setq d 20 p1 nil pee (/ pi 2)e 3 pckbox (getvar "pickbox")line " ")
(if(= #parof nil)(setq #parof(/(getvar "viewsize")10)))
(princ "\nCurrent offset <")(princ #parof)
(setq answer(getstring ">: "))
(if (/= (atof answer) 0.0)(setq #parof(atof answer)))

(princ line)
(setvar "pickbox" pckbox)
(setq ent(entsel "\nPick the line: "))
(setvar "pickbox" 2)
(setq point(cadr ent))
(princ line)
(setq side(getpoint "\nPick an offset side: "))
(setq dist(distance side point))(setq ang(angle side point))
(if(or(or(< ang 0.78)(> ang 5.5))(and(> ang 2.35)(< ang 3.92)))
(setq ang(- 0 ang))(setq ang(- pi ang))
);end if
(setq other(polar point ang dist))
(command "offset" #parof ent side ent other "")
(entdel(car ent))

(setvar "pickbox" pckbox)
(prin1)
)
(Prompt "\nType DOF to envoke the command")


var but eto spomozhet dlja razvitija. ne moe, zdesj najdeno, klanjajsja avtoru 2j denj voina..

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

Попробуй еще команду Тулпака PJS.

[Piton]

2 Vova
join не получается пишет

Код:

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

 Command: join
Select source object:
Line, open polyline, arc, elliptical arc, or open spline expected.  Select a 
supported object:
Select lines to join to source: 1 found
Select lines to join to source: 1 found, 2 total
Select lines to join to source: 1 found, 3 total
Select lines to join to source: Specify opposite corner: 1 found, 4 total
Select lines to join to source:
0 lines joined to source, 4 objects discarded from operation
Command: Specify opposite corner:

P.S. autocad 2006
2 mitjaj ругается при загруке

Код:

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

 Command: _appload dof.lsp successfully loaded.
Command: ; error: malformed list on input

2 Кочетков Андрей
PJS задает лишнии запросы

Код:

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

DS> Maximum Separation <0.0000>: 0
DS> Endpoint Average/Connect <A>/C:
DS> Process Layers Separately Y/<N>:

[Bredx]

А я себе просто кнопочку сделал
_pedit \_j _box \\
Может и не универсально, но работает,
Кстати, может кто подскажет как её можно довести до блеска(ну или хотя бы отшлифовать)

[Krieger]

Как объединить примитивы без лишних вопросов?

Кстати, есть переменная которая при команде pedit регулирует спрашивать или нет про переделку линии в полилинию. Щас не помню, какая, надо хелп пакопать.

[Piton]

2 Krieger
это переменная

Код:

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

PEDITACCEPT 1

но все равно проблемма не решиться так как еще спросит

Код:

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

 
Enter an option [Close/Open/Join/Width/Fit/Spline/Decurve/Ltype gen/Undo]: J
Join Type = Extend
Enter fuzz distance or [Jointype] <0.0000>:

[Serz]

Piton>
По поводу Join: Что бы все стыковалось, кончики линий должны быть прилеплены тютелька в тютельку. Для этого есть объектная привязка. А АКАД Вам сказал: объекты нашел, а присоединить не могу.

[Profan]

Для справки

В русской версии команды "СОЕДИНИТЬ" ("_JOIN") есть ошибка.
В файле acadres.dll в строковом ресурсе 2098 можно найти такую запись:
"Замкнуть пересечение _Crossing cLose"
а надо:
"Пересечение Замкнуть _Crossing cLose"
После исправления команда стала замыкать дуги и эллиптические дуги при вводе опции "З" в командной строке или через контекстное меню.

[Piton]

2 Serg
Все тютелька в тутельку :wink: (pedit тем более объединяет c опцией fuzz distance 0 )

2 Profan
У меня английская версия Autocad 2006

[Serz]

Piton>
Ну, тогда проверьте, в одной ли они плоскости. А еще лучше: выложите файл. А мы-то его ужо... :wink:

[Profan]

Для Piton
Ну, так я и написал не "Для Piton", а "Для справки".
У некоторых может быть русская версия AutoCAD 2006, и поскольку здесь упоминают команду "_JOIN" ("СОЕДИНИТЬ"), я и решил дать эту информацию.