[VVA]

Данный набор программ является коллективным продуктом участников форумов autocad.ru и dwg.ru с моими доработками.
Захотелось собрать все программы для работы с полилиниями воедино и оформить как полагается.

=========== Доступные команды PLTOOLS=================
Редакция 17.06.2014
PL-JOIN -Объединение выбранных полилиний
PL-VFI -вставка вершин в выбранной полилинии в местах пересечения с
указанными полилиниями, линиями, дугами
PL-JOIN3D -Объединение 3D полилиний
PL-L2A -Замена линейного сегмента в полилинии дуговым сегментом.
PL-A2L -Замена дугового сегмента в полилинии линейным сегментом.
PL-DIV -Разбивает выбранный сегмент полилинии на указанное количество
сегментов или через указанное расстояние
PL-DIVAll -Разбивает все сегменты полилинии на указанное количество
сегментов или через указанное расстояние
PL-VxAdd -Добавляет новую вершину к полилинии
ENTREVS -Реверс объекта
ENTREV -Реверс объектов (множественный выбор)
PL-CW -Реверс выбранных полилиний по часовой стрелке
PL-CCW -Реверс выбранных полилиний против часовой стрелки
PL-VxRdc -Удаление вершин полилиний, которые лежат на одной прямой
PL-VxDel -Удаление выбранной вершины
pl-VxOpt -Удаление совпадающих вершин из полилинии
PL-NoArc -Аппроксимация дуговых сегментов полилинии
PL-Clone -Построение полилинии путем копирования ее сегментов
PL-VxMove -Перемещение вершин полилинии
PL-Vx1 -Изменение начала полилинии
ConvTo2d -Преобразование линейных объектов в 2D полилинии
ConvTo3d -Преобразование линейных объектов в 3D полилинии
MPL -Построение средней линии Более продвинутая версия Rollin_Ball.lsp Find MidBoundary between two polylines.
R3P -Прямоугольгик по 3-м точкам
PL-P90 -Рисование перпендикулярных друг к другу сегментов полилинии
PL-CSE -Объединение 2d полилиний по примитиву
PL-SgWidth -Изменить ширину сегмента полилинии

Реверс дуговых сегментов полилинии из #79
На дуговых сегментах полилинии тип линий может быть "вверх тормашками", причем реверс не помогает. Этот артефакт можно побороть, если в полилинии включить "генерацию типа линий".

Панели, лисп и инструкции здесь http://dwg.ru/dnl/607
Иконки для темной темы здесь
Обсуждаем, критикуем, предлагаем

[nastasja]

Мне нужно преобразовать полилинию в дуговой сегмент. ПРоги я отсюда скачала, сделала, как написано в сопроводиловке txt, но что значит "активировать панель" я не поняла. Раньше я программированием и 3D не занималась, но теперь диплом делаю, так что приходится осваивать..

[Cfytrr]

VVA, у меня по прежнему после соединения разрыва между отрезками #140 останавливатся и остальные отрезки не соединят
AutoCad 2005, 2009

[VVA]

>nastasja "активировать панель" - значит сделать панельку с кнопками видимой.

Мне нужно преобразовать полилинию в дуговой сегмент

требует дополнительного разъяснения. Что-то мне подсважывает, что для твоих задач _pedit'a за глаза хватит
>Cfytrr Кинь примерчик на почту.

[Red Nova]

VVA лисп с #140 работает нормально. Спасибо.

P.S. Отлично придумано с допуском

[Red Nova]

VVA, Есть пожелание по поводу CSS. Обычно когда соединяют объект к другому, то свойства первого передаются второму. Только что пробовал соединить дугу к полилиние (первый объект - дуга). Так в этом случае соединенная полилиния принимает свойства второго объекта. Лучше бы было если бы тут все было как в обычном join.

[VVA]

Здесь обсуждаются предложения. Это не значит что я немедленно брошусь все исправлять/дописывать. У меня тоже есть работа. Предложения берутся на заметку и исправляются/доделываются в следующей версии. Если это действительно очень важно, то обновил код в #140 с учетом твоих пожеланий и замечаний KAI #135, кроме №7

[Red Nova]

Не стреляй, здаюсь. Просто думал ты не счел это важным, раз не ответил.
Удалил постыдное сообщение, раз оно тебя так разозлило.
Лисп опробовал, все работает.
Большое спасибо.

[Nikolays]

да эти PLTOOLS,у меня 2006 КАД,эти все функции у меня работали в один прекрасный момент перестали работать,из за чего не пойму

[VVA]

Nikolays,
1. Что выдает при попытке вызвать команду?
2. Попробуй в командной строке набрать _appload и загрузить pltools.fas из папки PLTOOLS, потом вызвать какую-либо команду
3. Тоже самое по п.2, только загрузи файл pltools.lsp из подпапки LISP папки PLTOOLS

[Nikolays]

это всё я сделал,но при выполнении команд выдаёт сообщение:ERRNO # 0: no function definition: nil,Выберите Полилинию, Сплайн или Отрезок для реверса <хватит>:ERRNO # 2: no
function definition: VLAX-ENAME->VLA-OBJECT,*error* functionAutoCAD variable setting rejected: "CMDECHO" nil

[VVA]

В PLTOOLS (vl-load-com) грузится автоматом при загрузке файла.
Nikolays,
1. Скопируй или набери в командной строке (vl-load-com)
2. Затем (vlax-get-acad-object)
Должно возвращать что-то типа #<VLA-OBJECT IAcadApplication 00c2eb8c>
А у тебя что пишет?

[Nikolays]

при запуске команды"vl-load-com"выдаёт сообщение:Команда: vl-load-com
Unknown command "VL-LOAD-COM". Press F1 for help
при запуске команды"vlax-get-acad-object":выдаёт сообщение:Unknown command "VLAX-GET-ACAD-OBJECT". Press F1 for help.

[Nikolays]

при копировании и вставке (vlax-get-acad-object)
выдаёт:
#<VLA-OBJECT IAcadApplication 00c2db8c>

[VVA]

Что еще могу посоветовать:
1. Попробуй скачай последнюю версию
2. Создай новую учетную запись и попробуй в ней
3. попробуй pltools на другой машине

[Nikolays]

У меня последняя версия pltools,на других машинах работает без проблем,да и на этой машине работали все команды,а потом перестали

[KAI]

Сообщение от Nikolays У меня последняя версия pltools,на других машинах работает без проблем,да и на этой машине работали все команды,а потом перестали

Мистика, однако!

[Red Nova]

VVA,

Попробуй скачай последнюю версию

Кстати, а где ее качать?

[VVA]

Red Nova, см. пост #1
Nikolays, Еще пара советов в порядке предпостения:
1. Попробуй на своей машине завести новую учетную запись и попробывать там pltools (рекомендация #154 №2)
2. Попробывать удалить Автокад и поставить снова.

[VVA]

Offtop: Теперь 1-й пост прикрепляется вверху каждой страницы. Удобно

[Nikolays]

с новой учётной записью Pltools тоже не работает