[petro_f]

Плагин кабельных трасс с автоматическим подсчётом длины кабеля и внесением данных по типу прокладки кабеля.

В плагине реализованы функции:

1. Создания кабельного блока с "цифровой подписью" созданного блока, с внесением информации по типу прокладки:
   • Создание кабельных блоков (кабеля) из линий, полилиний, дуг и сплайнов с автоматическим подсчётом длины кабеля. Ручным и полуавтоматизированным (из таблицы) вводом информации по кабелю и типу и количеству "упаковки" кабеля.
   • Создание новых кабелей на базе существующего кабеля с внесением новой информации по кабелю.
   • Пакетное создание кабелей на базе существующего кабеля с внесением новой информации по кабелям.
2. Проверки и верификации существующих кабелей.
3. Проверки и редактирования информации после ручной правки кабеля.
4. Пакетного редактирования существующих кабельных трасс с функциями:
   • Обрезки кабелей по заданной линии, рамке или многоугольной рамке.
   • Добавления трассы к кабелю.
   • Добавление добавочной длинны к кабелю и пересчёт информации по длине и "упаковке" кабеля.
   • Пересчёта информации по длине вновь получившегося кабеля и пересчёта длины "упаковки" кабельной линии.
   • Объединения соприкасающихся линий трассы, для корректной обрезки кабеля при редактировании.
   • Смены "базовой точки" кабельного блока после редактирования.
5. Замены существующей трассы кабеля на новую трассу с взятием информации от заменяемого кабеля.
6. Пакетного переименования кабелей с указанием информации для переименования в виде таблицы.
7. Экспорта данных для создания (редактирования) кабелей и кабельного журнала с возможностью:
   • Экспорта в программу Word с оформлением кабельного журнала (форматы А3, А4 вертикалый, горизонтальный).
   • Экспорта в програму Excel с функцией контроля длинн упаковки кабели и длины самого кабеля.
   • Экспорта в таблицы AutoCAD с разбивкой на листы с учётом рамки и штампа (большого и малого).
   • Технического экспорта в AutoCAD данных по кабелю из специальных кабельных блоков (с электрических схем).
   • Технического экспорта данных по кабелю в кабельные журналы Word (без указания длинн и типа упаковки).
   • Технического экспорта данных по кабелю в программу Excel (без указания длинн и типа упаковки).
8. Импорта данных для создания кабелей с возможностью:
   • Импорт из программы Word с оформленного КЖ (форматы А3 и А4, вертикальный и горизонтальный) с преобразованием полученных данных в формат таблицы AutoCAD.
   • Импорта в AutoCAD данных по кабелю из специальных кабельных блоков (с электрических схем).
9. Маркировки существующик кабелей на планах. Маркировка может быть осуществлена:
   • Мультивыноской - для единичных кабелей в месте маркировки.
   • Табличкой с именами кабелей - для множества кабелей в месте маркировки.
   • Табличкой с именами кабелей со стрелкой из мультивыноски - для множества кабелей в месте маркировки.
   • Табличкой с перечнем задействованных марок и сечений кабеля, с подсчётом общего сечения кабеля в месте выделения. Удобно для подбора сечений КНС (кабеле несущей системы).
10. Поиска и выделения существующих кабелей для дальнейшей работы с ними.
11. Просмотр и копирование типов кабелей из базы данных плагина, для дальнейшей работы с ними.
12. Выгрузка табличной информации по занимаемому сечению кабеля и минимально необходимого сечения КНС (кабеленесущей системы), лотки..короба и пр. .

Ссылки на GIF-ки:
Создание кабеля с извлечением информации из блоков кабелей на электрической схеме
Создание копии кабеля на базе существующего кабеля
Создание множественных копии кабеля на базе существующего кабеля
Замена трассы уже существующего блока кабеля
Пакетное редактирование кабелей
Пакетное переименование кабелей КЖ
Маркировка кабеля на планах
Экспорт импорт КЖ


Основной файл плагина составляет файл PDKFKG.lsp расположенный по пути C:\PDKFKG\0_LISP.
Имя папки, её расположение и основные настройки плагина редактируются в двух файлах в разделе основных настроек (там везде даны подсказки):

• Файл плагина PDKFKG.lsp расположенный по пути C:\PDKFKG\0_LISP - строки с 38 по 76 для версии плагина [>= v 14.20]
• Файл загрузки плагина 0_PDKFKG_LOAD.lsp расположенный по пути C:\PDKFKG - строки с 1 по 13 для версии плагина [>= v 14.20]

Для загрузки плагина в AutoCAD необходимо распаковать архив PDKFKG.rar в корневую директорию диска C: (если Вы хотите распаковать в другую директорию, то не забудьте внести эти изменения в перечисленные выше файлы) и из получившейся папки C:\PDKFKG всего один раз загрузить файл загрузки плагина 0_PDKFKG_LOAD.lsp.
После загрузки появится две плавающих панели с иконками. Малая панель с "выпадающими" иконками дублирует большую панель и может быть без болезненна отключена. Данная панель предназначена для работы на маленьких мониторах и позволяет не занимать много места.

Расшифровки действующих функций даны при первой загрузке плагина (в консольную строку AutoCAD), а так же полностью указаны в всплывающих хелп-сообщениях при наведении и удержании курсора над иконками функций на панели плагина.

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

Для замены иконок по своему вкусу в файле PDKFKG.mnu по пути C:\PDKFKG можно заменить на свои, или как вариант просто подменить файлы иконок и удалив файл PDKFKG.cuix заново открыть AutoCAD.

При старте плагина меняются или проверяются следующие переменные:

• USERR1 - проверяется что не равна 0.0 Отключить можно закомментировав или удалив строку 6 в файле PDKFKG.mnl по пути C:\PDKFKG
• DIMSCALE - проверяется что не равна 0.0 Отключить можно закомментировав или удалив строку 7 в файле PDKFKG.mnl по пути C:\PDKFKG
• CANNOSCALEVALUE - проверяется что не равно 0.0 Отключить можно закомментировав или удалив строку 8 в файле PDKFKG.mnl по пути C:\PDKFKG
• MENUBAR - переводится в 1 для отображения строки плагина. Отключить можно закомментировав или удалив строку 9 в файле PDKFKG.mnl по пути C:\PDKFKG

1. В версии [>= V 14.21] поправил переменную масштабирования, которая идёт в файле по умолчанию. Теперь для расчёта масштаба используется переменная DIMSCALE. Поправил оформление функции wcmatch и убрал не действующие строки - на работе плагина это никак не отразилось.
2. В версии [>= V 14.22] переформатировал выводимое меню плагина. Сгруппировал команды и уточнил описания команд.
3. В версии [>= V 14.24] добавил сводную таблицу по количеству кабеля. Табличка нужна для внесения данных в спецификацию проекта. Сводная таблица вставляется в таблицу "Таблица прокладки кабеля".
4. В версии [>= V 14.25] Поправил заливку ячеек таблички при изменении имени кабеля в функциях "PDKFKGCPY" и "PDKFKGMCPY".
5. В версии [>= V 14.30] Добавил функцию пакетного обмена упаковки кабеля "PDKFKGPACKSWAP". Например кабель был уложен в гофре, а заказчик захотел заменить на ПВХ-трубу. Эта функция как раз позволит сделать это для выбранных блоков разом.
6. В версии [>= V 14.6] Добавил варианты маркировки кабеля с выбором точки привязки, сделал одинаковой установку маркировки кабеля (одиночного и множественного). Пофиксил часть мелких ошибок. Перевёл картинки в png. Добавил команды "PDKFKGALLMARKM2, PDKFKGALLMARKM2Q, PDKFKGALLMARKM2EQ, PDKFKGALLMARKM2E". Описание есть при загрузке плагина.
7. В версии [>= V 15.0] Добавил варианты установки маркировки кабеля в виде ссылки (м-выноска) и таблички с номерами кабелей. Связь таблички и м-выноски реализована в виде связанного поля. Установка данной маркировки командой "PDKFKGMARKALLMARK". Описание есть при загрузке плагина.
8. В версии [>= V 16.3] Добавил функционал в функции Пакетное изменение кабельных блоков "PDKFKGMCORRECT". Добавилась возможность в пакетном редактировании блока производить обрезку кабелей рамкой, а так же добавилась функция добавления или удаления добавочной длины кабеля. Так же добавил возможность осуществить простое обновление информации по кабелю, без правки кабеля.
9. В версии [>= V 16.6] Добавил функционал в функции Пакетное изменение кабельных блоков "PDKFKGMCORRECT". Добавилась возможность в пакетном редактировании блока производить обрезку кабелей секущей рамкой. Так же добавил вариант отказаться от редактирования кабеля, если вдруг что то пошло не так.
10. В версии [>= V 17.2] Добавил возможность осуществлять подсчёт текущего сечения выбранных кабелей, что необходимо для осуществления подборки КНС (лотков, коробов...). Команда "PDKFKGCABHOLD". Так же добавил команду для просмотра базы данных кабелей с возможностью копирования выбранного кабеля, для дальнейшего использования. Команда "PDKFKGCABBD".
11. В версии [>= V 17.8] Прошло много изменений. Добавил новые поля в блок кабелей. Добавил возможность делить кабель на "контрольный" и "силовой". Добавил поле "Группа кабеля" и возможность ставить мультивыноску с данным полем. Добавил возможность осуществлять подсчёт текущего сечения выбранных кабелей с делением на контрольные и силовые кабели, а так же общий расчёт для всех кабелей. Это необходимо для осуществления подборки КНС (лотков, коробов...). Команды "PDKFKGCABHOLD" и "PDKFKGMARK_GROUP". Модернизировал команду для просмотра базы данных кабелей с индикацией диаметра и возможностью копирования выбранного кабеля, для дальнейшего использования. Команда "PDKFKGCABBD".
12. В версии [>= V 18.0] Добавил в вывод команды "PDKFKGCABHOLD" вес кабеля на один погонный метр и вес всех кабелей в КНС так же на 1 погонный метр. Данные нужны для расчёта крепежа КНС.
13. В версии [>= V 18.2] Добавил автоматический ввод тестового имени кабеля при первом старте плагина. Поправил странный глюк автокада при копировании кабеля (в функции "PDKFKGCPY" и "PDKFKGMCPY"). Добавил кабелей в базу данных кабелей.
14. В версии [>= V 18.3] Поправил перерасчёт кабеля в функции копирования кабельного блока ("PDKFKGCPY") при использовании нестандартного масштаба (по мотивам поста #54).
15. В версии [>= V 18.4] Добавил защиту от нулевого масштаба (по мотивам поста #85 и #88).
16. В версии [>= V 18.5] Поправил автоматическое включение отображение толщин линий. Теперь плагин не меняет отображение толщин линий. (по мотивам поста #92).
17. В версии [>= V 18.5.1] Добавил в базу данных кабель REDAK.
18. В версии [>= V 18.6] Добавил возможность фильтрации перечня кабелей в окне выбора кабелей. Это удобно, когда ищешь известный тебе кабель, можно не листать список, а просто его сократить.
19. В версии [>= V 18.7] Добавил возможность вместе с фильтрацией перечня кабелей в окне выбора кабелей, создавать список выгружаемых кабелей.
20. В версии [>= V 18.8] Добавил возможность сверить наличие кабелей на чертеже и в таблице. Таблица должна быть стандартной для этого плагина (8 столбцов), которую выгружает из схем плагин. Команда "PDKFKGCHECK".
21. В версии [>= V 18.10] Поправил работу функции выдающей выбранный коэффициент умножения. Добавил защиту от отрицательных чисел. По мотивам поста #153
22. В версии [>= V 18.11] Поправил ошибку когда при снятой галочке "Запоминать предыдущий ввод" при указании на таблицу не вводились данные.
23. В версии [>= V 18.12] Добавил функционал по мотивам поста #159 и #160.
24. В версии [>= V 18.14] Исправил не работающую функцию защиты из-за которой, при отсутствии доступа к файлу данных кабелей, автокад зависал (по мотивам поста #189). Так же добавил в базу данных кабели https://ekz.nt-rt.ru/images/manuals/PvPg.pdf
25. В версии [>= V 18.15] Добавил отображение длины выделенных линий при создании кабеля. Эта информация теперь добавляется через слэш в строчке длинны кабеля. Так же добавил в базу данных кабели КПЭПнг(А)-HF и ParLan.
26. В версии [>= V 18.16] Поправил функцию запоминания и восстановления настроек. Добавил функционала для проверки кабелей. Теперь функция "PDKFKGCHECK" позволяет выбирать для проверки несколько таблиц. Немного изменил цветовую гамму заливки таблички после создания кабеля. Увеличил поля в выгружаемом в AutoCAD кабельном журнале.
27. В версии [>= V 18.17] Добавил функционала для проверки кабелей. Теперь функция "PDKFKGCHECK" так же осуществляет сверку не только по имени кабельного блока но и по его содержимому (все поля таблички).
28. В версии [>= V 18.18] Ещё раз изменил цветовую гамму плагина. Добавил возможность установки своих цветов заливки методом правки исходного текста содержимого глобальных переменных цветовых значений. Добавил команду "PDKFKGHELP" которая вызывает окно с образцами цвета, его техническим номером и расшифровкой значения.

Благодаря нашим не равнодушным пользователям плагина появилась возможность оформить плагин в ленточном оформлении.

• Turpak предоставил файл "Загрузка ленты_vх.xх.zip", который содержит всю необходимую информацию для загрузки ленты. Более подробно смотрите в посте #80. Текущая лента для плагина версии >= V 18.8.
• Barmaley Bubusikin предоставил файл "PDKFKG Toolbar 18.12.rar", который содержит файл частичной адаптации ленты. Если есть вопросы как загружать этот файл, то прочтите как это делать в посте #80. Текущая лента для плагина версии >= V 18.14 (подходит и для текущей версии 18.17).

P.S. Для получения последней версии надо скачать файл PDKFKG.zip с исходным плагином (если он у Вас ещё не установлен), и файл обновления. Распаковать и заменить (добавить) все содержащиеся в обновлении файлы. Далее работать по исходной инструкции настройки, установки плагина.
P.P.S. Пересобрал исходный файл "PDKFKG.rar". Можно удалить предыдущую папку и установить плагин заново (хотя не обязательно, можно просто поступить как советовал выше). Текущая проверенная версия сборки плагина 18.8. Максимальная версия - смотри вложения.
P.P.P.S. Для преобразования блоков старого образца, достаточно использовать команду "PDKFKGBROKENV".

[Сергей812]

Что за тяга по умолчанию в корневой каталог системного диска ставить программу? Причем программу, которая по сути не требует прав выше пользовательских - насколько понимаю.

[petro_f]

Сообщение от Сергей812 Что за тяга по умолчанию в корневой каталог системного диска ставить программу? Причем программу, которая по сути не требует прав выше пользовательских - насколько понимаю.

Сергей, тяги никакой нет, но если бы Вы внимательно читали текст, то увидели бы, что это не обязательно...
Написано вроде чётко и понятно...

Сообщение от petro_f Имя папки, её расположение и основные настройки плагина редактируются в двух файлах в разделе основных настроек (там везде даны подсказки): Файл плагина PDKFKG.lsp расположенный по пути C:\PDKFKG\0_LISP - строки с 38 по 76 для версии плагина [>= v 14.20] Файл загрузки плагина 0_PDKFKG_LOAD.lsp расположенный по пути C:\PDKFKG - строки с 1 по 13 для версии плагина [>= v 14.20]

Просто мне так уж исторически сложилось, что удобней кинуть туда папку было.

[Erbol2014]

Я дико извиняюсь, но ваш файл "Планы с кабелями для тестов.dwg " имеет внутри макрос....
Вы нам трояна втюхать хотите? С трояном это в лабораторию касперского https://www.youtube.com/watch?v=nURH6dKb9ac
А рамку чертежа специально из "кусков" делаете, чтобы жизнь усложнить ?

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

В качестве намека, где и как можно хранить подобные вещи: http://autolisp.ru/2011/04/11/data-set-and-get-03-2/
При первом запуске запрашивать каталог установки и записывать полученные данные, а потом просто к ним обращаться.
Offtop: P.S. Предоставление "готовой" программы обычно не подразумевает правки исходного кода.

[Сергей812]

И использование в качестве кабеля вместо полилинии с расширенными данными (например) блока с атрибутами очень спорное решение, имхо.

[petro_f]

Сообщение от Erbol2014 Я дико извиняюсь, но ваш файл "Планы с кабелями для тестов.dwg " имеет внутри макрос....

Уважаемый где и что Вы там нашли? Всё что у меня загружено это взято тут, SelSim и GeomProps.
Единственное я не сильно проверял подложку от нашего отдела АР, но и там сидят спецы не пальцем деланные.... Так что просто не загружайте ничего и да будет Вам счастье...

Сообщение от Erbol2014 А рамку чертежа специально из "кусков" делаете, чтобы жизнь усложнить ?

Мне так удобнее и её я Вам и не предлагаю Меня данная рамка устраивает на 146%

Сообщение от Кулик Алексей aka kpblc В качестве намека, где и как можно хранить подобные вещи: http://autolisp.ru/2011/04/11/data-set-and-get-03-2/ При первом запуске запрашивать каталог установки и записывать полученные данные, а потом просто к ним обращаться.

Я конечно Вас уважаю, но лезть в реестр по всякому поводу считаю глупой затеей. Не у всех в корпоративной политике есть разрешение на доступ программ к реестру. Я понимаю, что кад и так там ковыряется, но мне проще в самом исходном файле внести один раз настройку. Зато потом при переносе, переустановки системы ничего не надо трогать.. как то так.. я из старых DOS-ников и винде не сильно доверяю

Сообщение от Кулик Алексей aka kpblc Offtop: P.S. Предоставление "готовой" программы обычно не подразумевает правки исходного кода.

Это не конечная версия программы. Так же править никто никого не заставляет. Можно пользоваться как есть... а можно и не пользоваться. Я считаю, что лучше сразу показать где и что можно подкорректировать под себя. Кому не нравится тот просто пройдёт мимо.

----- добавлено через ~5 мин. -----

Сообщение от Сергей812 И использование в качестве кабеля вместо полилинии с расширенными данными (например) блока с атрибутами очень спорное решение, имхо.

Решение не спорное, а на самом деле обдуманное. Оно позволяет мне контролировать линию от случайного копирования и прочих радостей жизни. Так же я сделал редактирование блоков (в том числе и пакетное). Так что не вижу в этом ничего плохого.
При том данная программа делалась под себя.. кому понравится, тому понравится. Я никого не заставляю

[Сергей812]

Сообщение от petro_f Оно позволяет мне контролировать линию от случайного копирования и прочих радостей жизни

Чем защищает? Как полилинию могут случайно удалить, так и блок. Так же как и скопировать. Защищается от изменений, если блокировать слой, например. Так что это чисто вопрос реализации)

[petro_f]

Сообщение от Сергей812 Чем защищает? Как полилинию могут случайно удалить, так и блок. Так же как и скопировать. Защищается от изменений, если блокировать слой, например. Так что это чисто вопрос реализации)

От удаления практически защититься не возможно (хотя конечно блок можно просто восстановить)... а вот от копирования - попробуйте скопировать блок, а затем нажать на иконку с треугольником.. Функция тут же пометит этот блок как неисправный. Так же попробуйте изменить имя кабеля в атрибуте..
А далее плагин эти кабели не учитывает в работе. Так что достаточно перед выгрузкой или маркировкой вызвать функцию проверки кабелей на соответсвие и они автоматом далее не будут участвовать в работе плагина. Так же это произойдёт, если кабель перенести в другой чертёж.
Так что какая никакая, но защита есть.

[gomer]

намаешься ты с этим трешем

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

Сообщение от petro_f лезть в реестр по всякому поводу считаю глупой затеей

А тот факт, что в реестр лезет почти каждая программа, установленная на компе - это так, мелочь? Ну-ну...

----- добавлено через ~1 мин. -----

Сообщение от petro_f мне проще

Ключевое слово - "мне".
Ладно, оставлю критику - все равно времени на посмотреть у меня нет

[petro_f]

Сообщение от gomer намаешься ты с этим трешем

Ну я просто поделился. Кому понравится возьмёт и попользуется. А кому не по душе такая реализация, тот не будет пользоваться. Остальные, кто просто решил поболтать без аргументов, пускай отправляются в пешее эротическое путешествие, его ещё никто не отменял

А так уже как бы 5 больших проектов сделали и всё как часы работает. Так что не надо пессимизма

----- добавлено через ~2 мин. -----

Сообщение от Кулик Алексей aka kpblc Ключевое слово - "мне".

Художника обидеть может каждый
Каждый делает наверное всё же под себя. Так что тут любое решение приемлемо.

----- добавлено через ~4 мин. -----
Далее я не вижу смысла писать ответы не по теме.
Будут вопросы именно по реализации плагина - пишите.
Остальные сообщения я думаю есть смысл игнорировать.

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

1. Разница:
   
   Код:

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

    (if (< (pdkfkg-number-rounding-numbers g_pdkfkg_certain_length_cabel) 1)
                       1
                       (pdkfkg-number-rounding-numbers g_pdkfkg_certain_length_cabel)
                       )

   и
   Код:

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

    (min 1 (pdkfkg-number-rounding-numbers g_pdkfkg_certain_length_cabel))

   В первом случае функция вызывается дважды, во втором - только один раз.
2. Код:

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

    (if (= (pdkfkg-alert-question-answer
            "Ошибка заложенных параметров"
            "Длина \"упаковки\" кабеля превышает длину самого кабеля!\nИсправить?"
            (+ 4 48 4096)
            ) ;_ end of pdkfkg-alert-question-answer
          6
          ) ;_ end of =
       ;| предупреждаем, что длина кабеля меньше чем длина "упаковки" и предлагаем исправить |;
     (progn ;| если да, то продолжаем цикл и вызываем окно заново |;
       (setq pdkfkg_temp_work_permit_while t)
       )     ; end progn
     (progn ;| если нет, то разрешаем продолжить функцию |; (setq pdkfkg_temp_work_permit_while nil)) ; end progn
     ) ;_ end of if

   и
   Код:

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

    (setq pdkfkg_temp_work_permit_while
          (= (pdkfkg-alert-question-answer
               "Ошибка заложенных параметров"
               "Длина \"упаковки\" кабеля превышает длину самого кабеля!\nИсправить?"
               (+ 4 48 4096)
               ) ;_ end of pdkfkg-alert-question-answer
             6
             ) ;_ end of =
         ) ;_ end of setq

   Второй вариант более логичен, мне кажется.
3. Код:

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

    (+ (pdkfkg-number-rounding-numbers g_pdkfkg_in_lotok_cabel)
      (pdkfkg-number-rounding-numbers g_pdkfkg_in_gofra_cabel)
      (pdkfkg-number-rounding-numbers g_pdkfkg_in_metrukav_cabel)
      (pdkfkg-number-rounding-numbers g_pdkfkg_in_cabelkanal_cabel)
      (pdkfkg-number-rounding-numbers g_pdkfkg_in_pvx_cabel)
      (pdkfkg-number-rounding-numbers g_pdkfkg_in_truba_cabel)
      (pdkfkg-number-rounding-numbers g_pdkfkg_in_shtroba_cabel)
      ) ;_ end of +

   и
   Код:

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

    (apply '+
          (mapcar (function pdkfkg-number-rounding-numbers)
                  (list g_pdkfkg_in_lotok_cabel g_pdkfkg_in_gofra_cabel g_pdkfkg_in_metrukav_cabel g_pdkfkg_in_cabelkanal_cabel g_pdkfkg_in_pvx_cabel g_pdkfkg_in_truba_cabel g_pdkfkg_in_shtroba_cabel) ;_ end of list
                  ) ;_ end of mapcar
          ) ;_ end of apply

   Опять же, не лень было писать?
4. Вместо (nth ...) нередко можно использовать car, cadr, caddr etc.
5. Вызов конструкции типа
   Код:

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

    (if pdkfkg_temp_flag_name_ucs ;| если тут есть текст |;

   вернет t, если pdkfkg_temp_flag_name_ucs не nil. Тип данных именно здесь не контролируется.
6. Кстати, а зачем столько глобальных переменных? Не проще ли было бы создать одну глобальную переменную (если без нее не обойтись), куда загонять все данные, формируя соответствующий список?
7. В функции pdkfkg-create-block-of-cabel-in-layout меняется cmdecho, но в локальном *error* исходное значение не восстанавливается.
8. Попытка вызова
   Код:

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

    (vlax-put-property
                           (vlax-invoke-method pdkfkg_vla_id_dictionary_layer 'item pdkfkg_temp_count)
                           'freeze
                           :vlax-false
                           )

   для текущего слоя гарантированно вызовет ошибку. Свойство Freeze для текущего слоя не меняется.
9. Вместо
   Код:

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

    (pdkfkg-block-set-one-attributes
                          pdkfkg_list_selected_block_for_update
                          "LENGTH_CABEL"
                          (if (< (pdkfkg-number-rounding-numbers g_pdkfkg_certain_length_cabel) 1)
                            1
                            (pdkfkg-number-rounding-numbers g_pdkfkg_certain_length_cabel)
                            ) ;_ end of if
                          ) ; ìèíèìàëüíîå çíà÷åíèå 1 ìåòð             
                        (pdkfkg-block-set-one-attributes
                          pdkfkg_list_selected_block_for_update
                          "IN_LOTOK_CABEL"
                          (pdkfkg-number-rounding-numbers g_pdkfkg_in_lotok_cabel)
                          ) ;_ end of PDKFKG-block-set-one-attributes
                        (pdkfkg-block-set-one-attributes
                          pdkfkg_list_selected_block_for_update
                          "IN_GOFRA_CABEL"
                          (pdkfkg-number-rounding-numbers g_pdkfkg_in_gofra_cabel)
                          ) ;_ end of PDKFKG-block-set-one-attributes
                        (pdkfkg-block-set-one-attributes
                          pdkfkg_list_selected_block_for_update
                          "IN_METRUKAV_CABEL"
                          (pdkfkg-number-rounding-numbers g_pdkfkg_in_metrukav_cabel)
                          ) ;_ end of PDKFKG-block-set-one-attributes
                        (pdkfkg-block-set-one-attributes
                          pdkfkg_list_selected_block_for_update
                          "IN_CABELKANAL_CABEL"
                          (pdkfkg-number-rounding-numbers g_pdkfkg_in_cabelkanal_cabel)
                          ) ;_ end of PDKFKG-block-set-one-attributes
                        (pdkfkg-block-set-one-attributes
                          pdkfkg_list_selected_block_for_update
                          "IN_PVX_CABEL"
                          (pdkfkg-number-rounding-numbers g_pdkfkg_in_pvx_cabel)
                          ) ;_ end of PDKFKG-block-set-one-attributes
                        (pdkfkg-block-set-one-attributes
                          pdkfkg_list_selected_block_for_update
                          "IN_TRUBA_CABEL"
                          (pdkfkg-number-rounding-numbers g_pdkfkg_in_truba_cabel)
                          ) ;_ end of PDKFKG-block-set-one-attributes
                        (pdkfkg-block-set-one-attributes
                          pdkfkg_list_selected_block_for_update
                          "IN_SHTROBA_CABEL"
                          (pdkfkg-number-rounding-numbers g_pdkfkg_in_shtroba_cabel)
                          )

   можно запросто обойтись примерно таким:
   
   Код:

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

    (pdkfkg-block-set-one-attributes
     pdkfkg_list_selected_block_for_update
     "LENGTH_CABEL"
     (min 1 (pdkfkg-number-rounding-numbers g_pdkfkg_certain_length_cabel))
     ) ;_ end of pdkfkg-block-set-one-attributes
   (foreach item (list (cons "IN_LOTOK_CABEL" g_pdkfkg_in_lotok_cabel)
                       (cons "IN_METRUKAV_CABEL" g_pdkfkg_in_metrukav_cabel)
                       (cons "IN_CABELKANAL_CABEL" g_pdkfkg_in_cabelkanal_cabel)
                       (cons "IN_PVX_CABEL" g_pdkfkg_in_pvx_cabel)
                       (cons "IN_TRUBA_CABEL" g_pdkfkg_in_truba_cabel)
                       (cons "IN_SHTROBA_CABEL" g_pdkfkg_in_shtroba_cabel)
                       ) ;_ end of list
     (pdkfkg-block-set-one-attributes
       pdkfkg_list_selected_block_for_update
       (car item)
       (pdkfkg-number-rounding-numbers (cdr item))
       ) ;_ end of pdkfkg-block-set-one-attributes
     )

   Или вообще таким:
   Код:

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

    (foreach item (list (list "LENGTH_CABEL" 1 g_pdkfkg_certain_length_cabel)
                       (cons "IN_LOTOK_CABEL" g_pdkfkg_in_lotok_cabel)
                       (cons "IN_METRUKAV_CABEL" g_pdkfkg_in_metrukav_cabel)
                       (cons "IN_CABELKANAL_CABEL" g_pdkfkg_in_cabelkanal_cabel)
                       (cons "IN_PVX_CABEL" g_pdkfkg_in_pvx_cabel)
                       (cons "IN_TRUBA_CABEL" g_pdkfkg_in_truba_cabel)
                       (cons "IN_SHTROBA_CABEL" g_pdkfkg_in_shtroba_cabel)
                       ) ;_ end of list
     (pdkfkg-block-set-one-attributes
       pdkfkg_list_selected_block_for_update
       (car item)
       (if (not (listp (cdr item)))
         (pdkfkg-number-rounding-numbers (cdr item))
         (min (cadr item) (pdkfkg-number-rounding-numbers (caddr item)))
         ) ;_ end of if
       ) ;_ end of pdkfkg-block-set-one-attributes
     ) ;_ end of foreach

Ну и так далее. В код изменения не вносил, работоспособность не проверял.

----- добавлено через ~7 мин. -----

И заменить монстра

Код:

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

 (or ;| если полученный элемент является чем либо из перечисленных, тогда |;
  (wcmatch (cdr
             (assoc 0
                    (entget
                      (handent (vlax-get-property
                                 (vlax-invoke-method pdkfkg_temp_vla_name_description_block 'item pdkfkg_temp_two_count)
                                 'handle
                                 ) ;_ end of vlax-get-property
                               ) ;_ end of handent
                      ) ;_ end of entget
                    ) ;_ end of assoc
             ) ;_ end of cdr
           "*POLYLINE"
           ) ;_ end of wcmatch
  (wcmatch (cdr
             (assoc 0
                    (entget
                      (handent (vlax-get-property
                                 (vlax-invoke-method pdkfkg_temp_vla_name_description_block 'item pdkfkg_temp_two_count)
                                 'handle
                                 ) ;_ end of vlax-get-property
                               ) ;_ end of handent
                      ) ;_ end of entget
                    ) ;_ end of assoc
             ) ;_ end of cdr
           "LINE"
           ) ;_ end of wcmatch
  (wcmatch (cdr
             (assoc 0
                    (entget
                      (handent (vlax-get-property
                                 (vlax-invoke-method pdkfkg_temp_vla_name_description_block 'item pdkfkg_temp_two_count)
                                 'handle
                                 ) ;_ end of vlax-get-property
                               ) ;_ end of handent
                      ) ;_ end of entget
                    ) ;_ end of assoc
             ) ;_ end of cdr
           "ARC"
           ) ;_ end of wcmatch
  (wcmatch (cdr
             (assoc 0
                    (entget
                      (handent (vlax-get-property
                                 (vlax-invoke-method pdkfkg_temp_vla_name_description_block 'item pdkfkg_temp_two_count)
                                 'handle
                                 ) ;_ end of vlax-get-property
                               ) ;_ end of handent
                      ) ;_ end of entget
                    ) ;_ end of assoc
             ) ;_ end of cdr
           "ELLIPSE"
           ) ;_ end of wcmatch
  (wcmatch (cdr
             (assoc 0
                    (entget
                      (handent (vlax-get-property
                                 (vlax-invoke-method pdkfkg_temp_vla_name_description_block 'item pdkfkg_temp_two_count)
                                 'handle
                                 ) ;_ end of vlax-get-property
                               ) ;_ end of handent
                      ) ;_ end of entget
                    ) ;_ end of assoc
             ) ;_ end of cdr
           "SPLINE"
           ) ;_ end of wcmatch
  )

на вменяемые

Код:

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

 (or ;| если полученный элемент является чем либо из перечисленных, тогда |;
  (wcmatch (cdr
             (assoc 0
                    (entget
                      (handent (vlax-get-property
                                 (vlax-invoke-method pdkfkg_temp_vla_name_description_block 'item pdkfkg_temp_two_count)
                                 'handle
                                 ) ;_ end of vlax-get-property
                               ) ;_ end of handent
                      ) ;_ end of entget
                    ) ;_ end of assoc
             ) ;_ end of cdr
           "*POLYLINE,LINE,ARC,ELLIPSE,SPLINE"
           ) ;_ end of wcmatch
  ) ;_ end of or

----- добавлено через ~11 мин. -----
Ох, елки! Там код упрощать можно оооочень долго...
Уже под more прятать не буду

Код:

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

 (assoc "NAME_CABEL" pdkfkg_temp_all_data_attrib_one_block) ;| проверяем наличие всех атрибутов|;
                 (assoc "IN_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "OUT_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "TYPE_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "MOD_OF_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "LENGTH_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "NOTE_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "IN_LOTOK_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "IN_GOFRA_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "IN_METRUKAV_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "IN_CABELKANAL_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "IN_PVX_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "IN_TRUBA_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "IN_SHTROBA_CABEL" pdkfkg_temp_all_data_attrib_one_block)
                 (assoc "ADD_LENGTH_CABEL" pdkfkg_temp_all_data_attrib_one_block)

vs

Код:

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

 (apply 'and
       (mapcar (function (lambda (x) (cdr (assoc x pdkfkg_temp_all_data_attrib_one_block))))
               '("NAME_CABEL"           "IN_CABEL"             "OUT_CABEL"            "TYPE_CABEL"           "MOD_OF_CABEL"         "LENGTH_CABEL"         "NOTE_CABEL"
                 "IN_LOTOK_CABEL"       "IN_GOFRA_CABEL"       "IN_METRUKAV_CABEL"    "IN_CABELKANAL_CABEL"  "IN_PVX_CABEL"         "IN_TRUBA_CABEL"       "IN_SHTROBA_CABEL"
                 "ADD_LENGTH_CABEL"
                 )
               ) ;_ end of mapcar
       ) ;_ end of apply

[petro_f]

Ну докопаться и до столба можно, но:

Сообщение от Кулик Алексей aka kpblc По качеству кода

1. При единичном вызове функции не имеет никакой разницы...
2. Абсолютно нет, так как это немного логически разные операции с флагом. Сказать, что там всё не так и при этом не вдаваться в логику запроса, легко. Но не всегда очевидные пути логичны.
3. Невероятно, но не лень. По скорости обработки разница никакая, а по удобству при редактировании - колоссальна.
4. Откровенный бред. Не всегда nth можно заменить на caadr и им подобные. Такое мог бы написать школьник, но не Вы... nth возвращает единичное значение всегда. car..cadr и им подобные могут вернуть остаток списка, вместо единичного значения... т.е. мне всегда надо точно знать, что будет возвращено и иметь шанс хапнуть на вход не 1 параметр, а несколько. Зачем??? Цена вопроса применения (по скорости обработки) абсолютно одинакова. Так что это просто из серии доебаться лишь бы что то написать.
5. В процессе написания плагина логика поменялась, так что там контролируется наличие или отсутствие данных, а не их тип... Переделывать функцию не стал, а просто оставил такой.
6. Ну ту дело вкуса... Можно вообще битами флаги выставлять в реестре, ну если у тебя например микроконтроллер, а можно и осмысленные имена давать переменным и завести их ровно столько, сколько тебе требуется. Как бы одна переменная или 50 нет разницы, а вот шанс вписать в сводную переменную лишнюю инфу и порушить работу плагина - увеличится. Так что это так себе замечание.
7. Опять же замечание из серии я не разобрался и лишь бы что то написать. Просто опишу - момент работы (написания) плагина растянулся на несколько месяцев. В процессе работы некоторые функции переписывались, у некоторых расширялись возможности. Так уж получилось, что функция (PDKFKG-remember-layer) и функция ( PDKFKG-back-remembers-layer) а так же (PDKFKG-all-restore-settings) стали запоминать и восстанавливать более расширенный комплект переменных, включая и cmdecho. Позже, что бы не проверять и переписывать каждую функцию я просто оставил как есть. Так что данная переменная восстанавливается, а с ней и куча других. Код конечно же можно вылизать до идеала, но принцип работает - не лезь править, никто не отменял..
8. Ответ как и в пункте выше, про не разобравшись в логике работы. Имя текущего слоя в данный список не попадает...
9. Можно, но в определённый момент времени (я всё же не проф программист LISP) мне не нравилось направо и налево применять этот функционал (mapcar, foreach...). Сейчас бы я переписал это так, но с другой стороны это работает и читаемо, так что не вижу смысла переписывать.

Сообщение от Кулик Алексей aka kpblc Настоятельно советую изучить справку по wcmatch

Можно конечно переделать и так. И даже выиграть 18 наносекунд в скорости выполнения операции Но стоит ли оно того? Так мне на тот момент было удобней написать именно так.
Будет время - оптимизирую этот жутчайший косяк из за которого мне лучше пойти и удавиться, так как я точно не программист а полное г...о момент...

Сообщение от Кулик Алексей aka kpblc Ох, елки! Там код упрощать можно оооочень долго... Уже под more прятать не буду

Ну тут часть ответа под номером 9 и предыдущий коммент так же подойдёт...
Но по мне мой вариант читается намного внятней при отладке кода, чем предложенный вариант с "apply 'and mapcar"... Я всегда выступаю за то, что если читабельность кода глазами вызовет написание лишних 10-х строк - значит надо написать эти строки. Компу (компилятору) глубоко похфиг, а мне для отладки легче и удобней.
Так что последних несколько замечаний - это просто обычная вкусовщина..

Больше всего меня добила Ваша ремарка "Ну и так далее. В код изменения не вносил, работоспособность не проверял." - это вообще истинный подход профессионала... написать кучу замечаний, не разбираясь ни в логике работы, ни запуская прогу... Вы мне напомнили работу наших некоторых экспертов в доблестной экспертизе - которые тоже пишут замечания к проекту, не открывая его

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

petro_f, ок, ок, уговорил. Я дурень, влез куда не просили Умолкаю.

[Erbol2014]

Сообщение от petro_f Уважаемый где и что Вы там нашли? Всё что у меня загружено это взято тут, SelSim и GeomProps.

При открытии вашего файла Автокад выдаёт - см. картинку
У меня никогда такого не выдавало.
Вы в файле чего то мудрили с макросами, удалили, а следы остались.
Чтобы такого небыло создавайте новый файл и копируйте в него содержимое.

[Boxa]

Подтверждаю, в dwg файле имеется внедренный vba проект. Пустой.
Для удаления этого мусора:

Команда _vbaman нажать отмеченную кнопочку

А вообще в самом файле очень много мусора и прокси объектов, его бы почистить...

Хотя, я уже знаю что ответит автор... =о)

[petro_f]

Сообщение от Кулик Алексей aka kpblc petro_f, ок, ок, уговорил. Я дурень, влез куда не просили Умолкаю.

Алексей, ну не надо так демонстративно. Просто я ожидал бы замечания по делу. Согласен, что wcmatch просто затупил, а остальное по большому счёту не принципиально... каждый пишет так как ему удобно. И даже в таком варианте wcmatch работает.
Давайте без обид общаться. Ок?
Я всегда готов к конструктивному диалогу. Если где высказался резко, то это не со зла

Сообщение от Erbol2014 При открытии вашего файла Автокад выдаёт - см. картинку У меня никогда такого не выдавало. Вы в файле чего то мудрили с макросами, удалили, а следы остались. Чтобы такого небыло создавайте новый файл и копируйте в него содержимое.

Erbol2014 я этот файл просто приложил в последний момент. Если Вас прямо прёт, то можете смело нажать "не включать макросы".
P.S. Посмотрел я на то, что Вас там с макросами пугало ))) Видимо от АР наследие с пустым проектом VBA из подложки прилетело. Сейчас почищу и заменю файл. Так что можете его перекачать заново.

----- добавлено через ~34 мин. -----

Сообщение от Boxa Подтверждаю, в dwg файле имеется внедренный vba проект. Пустой. Для удаления этого мусора: Команда и картинка А вообще в самом файле очень много мусора и прокси объектов, его бы почистить... Хотя, я уже знаю что ответит автор... =о)

Воха Вы не поверите, но пока я писал ответ, и чистил файл :0 Вы успели свой ответ написать.
Выгрузил, от прокси объектов не стал чистить, так как это объекты СПДС и при весе в 900 кб файла, перерывать всю АР я не вижу смысла.
Данный файл был просто прилеплен для демонстрации, Так как с него писались гифки. Никто и никогда в нём работать то не будет. Смысл его чистить? Или Вас смущают стандартные СПДС объекты?

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

petro_f, без вникания - что такое кабельные линии, что такое разделы КИПиА, без понимания (хотя бы примерного) специфики работы, я так полагаю, электриков - по функционалу лично я сказать ничего не могу. По коду - да, но это максимум.

[AlexZh]

petro_f. Молодец! Хорошая программа. Видно человек старался! Кому надо, тот возьмет на вооружение.

Кулик Алексей aka kpblc, хорошие замечания по коду.

Некоторые остальные, да. Много необоснованной критики. Человек поделился своим творением. Заметьте, бесплатно. Не каждый на такое способен.

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

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

У РД есть капитальное ограничение в 16 кб. Этого объема нередко не хватает. Но дело хозяйское ))

[AlexZh]

извиняюсь, ошибся) я еще учащийся!)

я имел в виду X-записи.

[petro_f]

Сообщение от AlexZh petro_f. Молодец! Хорошая программа. Видно человек старался! Кому надо, тот возьмет на вооружение. Кулик Алексей aka kpblc, хорошие замечания по коду. Некоторые остальные, да. Много необоснованной критики. Человек поделился своим творением. Заметьте, бесплатно. Не каждый на такое способен. Я вот думаю, все эти свойства все-таки через расширенные данные пользовать. По моему, если кабелей будет много, как то не удобно будет пользоваться чертежом с большим количеством блоков. или уж в грубы объединять.

Ну у меня есть в работе файлы (планы) со средним количеством кабелей более 450 и всё нормально работает. Я тестил до 1500 кабелей на плане.
И всё работает.. создаётся, редактируется, выгружается.

P.S. Узнал что для большого (самого высокого) объекта в СПб моя знакомая в этом плагине делала более 2000 кабелей в одном файле. Так как схемы (КЖ) им пересылали в ворде, то она сначала КЖ импортировала из ворда в кад (табличку с 6 полями), а уже по ней создавала. Единственное ограничение (вернее рекомендация по ускорению) - отсутсвие лишних табличек с кабелями (уже заполненых) так как функция получения данных из ячейки таблички реализована в акаде методом сначала получения координат, а потом поиском ячейки во всех таблицах. Но тут уже не я виноват, а так работает кад. Ну и желательно таблички с данными по созданию кабелей делать не более 200-300 строк. Опять таки это всё требования для ускорения работы, не более. Т.е. объём таблички просто тупо влияет на время отклика плагина при считывании с неё (почти мгновенный отклик или задержка в 1.5 - 2 секунды).

[gomer]

Сообщение от AlexZh Много необоснованной критики. Человек поделился своим творением. Заметьте, бесплатно. Не каждый на такое способен.

поиск по файлу *error* - 275 штук, делим на 2, делим на 3...
поиск во файлу defun *error* - 168 штук, умножаем на 2...
вот такая простая арифметика твоих шарфов, я такое не то, что запускать, я такое смотреть брезгую...

[gomer]

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

[Сергей812]

Хватит ругаться - время покажет) Пока у темы почти полторы тысячи просмотров, и не одного положительного отзыва о применении - кроме автора самой программы. Достаточно много людей (и даже некоторые фирмы для продвижения своего оборудования) пишут свои "приблуды" для КЖ и спецификации, так как трудоемкая и нудная задача.

[petro_f]

Сообщение от Сергей812 Хватит ругаться - время покажет) Пока у темы почти полторы тысячи просмотров, и не одного положительного отзыва о применении - кроме автора самой программы. Достаточно много людей (и даже некоторые фирмы для продвижения своего оборудования) пишут свои "приблуды" для КЖ и спецификации, так как трудоемкая и нудная задача.

Странное послевкусие от чата осталось Плагин никто не попробовал, а мнение уже сформировано..

В общем и малом - частично поправил плагин по, как я считаю, реальным замечаниям. Далее уже кому интересно попробует.

[Сергей812]

понимаете, программа с подобными ограничениями по скорости работы

Сообщение от petro_f Ну и желательно таблички с данными по созданию кабелей делать не более 50-70 строк. Опять таки это всё требования для ускорения работы, не более.

в 2017 году выглядит, мягко говоря, странно) Понятно, что использование лиспа накладывает определенные ограничения на реализацию надстройки - но не настолько же.

[petro_f]

Сообщение от Сергей812 понимаете, программа с подобными ограничениями по скорости работы в 2017 году выглядит, мягко говоря, странно) Понятно, что использование лиспа накладывает определенные ограничения на реализацию надстройки - но не настолько же.

Хм.. это ограничение накладывает на Вас только то что отклик плагина при считывании будет мгновенным или (если больше строк) 1.2 секунды.
А так хоть 500 строк табличку.
P.S. Данное ограничение я написал исходя из расчёта, что комп совсем совсем "древний"... на более менее серьёзных машинах можно смело на 200-300 строк бить (а можно и не бить табличку).
P.P.S Да и строго говоря это ограничение идёт из функции определения ячейки таблицы по координатам. Я что-то не натыкался на другой вариант получения номера ячейки http://www.caduser.ru/forum/index.ph...D=23&TID=40802 как в посте #7. При большом количестве строк и таблиц эта функция и является основным тормозом. Если есть другой и более скорострельный вариант получения таких данных из точки клика, то покажите.

[Сергей812]

Сообщение от petro_f на более менее серьёзных машинах можно смело на 200-300 строк бить (а можно и не бить табличку).

Да не должен пользователь подстраиваться под возможности плагина)

Так же вызывает "удивление" использования для выносок группы кабелей - мультивыноску и таблицу. Мультивыноска самодостаточна для выполнения подобных задач, лишнее "утяжеление" чертежа, имхо.

Про использовании переопределения *ERROR* уже писали выше. В свое время, когда пробовал писать на лиспе: в первую очередь написал обертки с использование vl-catch- для тех же функций ввода пользователя, чтобы возвращали nil в случае отказа - а не вываливалась ошибка, которую еще надо перехватывать. Код стал гораздо читабельнее и понятнее.

----- добавлено через ~4 мин. -----

Сообщение от petro_f Если есть другой и более скорострельный вариант получения таких данных из точки клика, то покажите.

я на NetAPI давно пишу - там такие вещи проще вынести с уровня чертежа на логический уровень надстройки и использовать уже диалоги. В лиспе написать диалог - это уже подвиг)

[petro_f]

Сообщение от Сергей812 я на NetAPI давно пишу - там такие вещи проще вынести с уровня чертежа на логический уровень надстройки и использовать уже диалоги. В лиспе написать диалог - это уже подвиг)

Согласен. Мне самому C++ ближе к сердцу. Думаю, что надо посмотреть в сторону ARX Но в ARX есть одно плохое качество - плагин надо компилировать под почти каждую версию када, код с места не поправить в блокноте и прочее..
А LISP позволяет это сделать ))) И именно из-за этого я не компилю плагины, иначе потом поправить стороннему человеку нет возможности.

[Сергей812]

Сообщение от petro_f Согласен. Мне самому C++ ближе к сердцу. Думаю, что надо посмотреть в сторону ARX Но в ARX есть одно плохое качество - плагин надо компилировать под почти каждую версию када, код с места не поправить в блокноте и прочее.. А LISP позволяет это сделать ))) И именно из-за этого я не компилю плагины, иначе потом поправить стороннему человеку нет возможности.

если не собираетесь копать в ObjectARX в сторону создания своих примитивов или другие "низкоуровневые" вещи - то он избыточен. В .NET гораздо проще решать многие задачи. И если не использовать специфические вещи - зависимость от версии гораздо меньше. Править на месте - мелкие правки можно даже в бесплатном SharpDevelop сделать и заново откомпилировать. А стороннему человеку проще будет порою заново свое сделать, чем разбираться в мегабайтном файле лиспа)

[petro_f]

Сообщение от Сергей812 если не собираетесь копать в ObjectARX в сторону создания своих примитивов или другие "низкоуровневые" вещи - то он избыточен

Мне просто нормальные языки программирования ближе к сердцу

[Сергей812]

Сообщение от petro_f Мне просто нормальные языки программирования ближе к сердцу

С++ - это серьезный язык для задач с серьезными требованиями к быстродействию, экономии ресурсов, полному контролю над процессом и т.д..
C# - серьезный язык больше для прикладных программ, и для чего в С++ понадобиться использовать дополнительные библиотеки либо писать код -> в C# многое "зашито" во фреймворк. И без этого Фреймворка даже акад не встанет - т.е. он гарантировано присутствует в системе. В отличие от сторонних библиотек.

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

[petro_f]

Сообщение от Сергей812 С++ - это серьезный язык для задач с серьезными требованиями к быстродействию, экономии ресурсов, полному контролю над процессом и т.д.. C# - серьезный язык больше для прикладных программ, и для чего в С++ понадобиться использовать дополнительные библиотеки либо писать код -> в C# многое "зашито" во фреймворк. И без этого Фреймворка даже акад не встанет - т.е. он гарантировано присутствует в системе. В отличие от сторонних библиотек. ----- добавлено через ~8 мин. ----- Официальный сайт по программированию - сейчас с этим проще, несколько лет назад приходилось с англоязычных ресурсов учиться большей частью)

Да я как бы не маленькая девочка и все вот эти недоязыки типа .NET на дух не переношу. Фреймворки и всё остальное - они развращают
По этому, так как я изучал С++, буду на нём программировать.
P.S. За ссылку на профильный сайт - спасибо.

[gomer]

Сообщение от petro_f Странное послевкусие

Ты нарушил все заповеди, оставленные Админом для программистов и все заповеди, оставленные Программистом, для программистов на AutoLISP. И теперь у тебя послевкусие. Странный ты.

[petro_f]

Сообщение от gomer Ты нарушил все заповеди, оставленные Админом для программистов и все заповеди, оставленные Программистом, для программистов на AutoLISP. И теперь у тебя послевкусие. Странный ты.

gomer, что бы не покрывать тебя матом, просто пройди мимо этой темы

P.S. И не забудь потом, в известной тебе теме, показать свой супер код, после которого остальным программистам останется только идти в дворники.

[gomer]

Сообщение от petro_f в известной тебе теме

это какой?

[petro_f]

Сообщение от gomer это какой?

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

P.S. Далее gomer я думаю, что с Вами продолжать диалог нет смысла. От Вас сообщения я просто буду игнорировать. Если есть желание общаться можно писать в личку, что бы не засирать тему, глупыми замечаниями и претензиями типа -"А у тебя тут не так написано, как бы мне хотелось видеть!".

[gomer]

Сообщение от petro_f Тут а если точнее, то просто игнор этого текста и и этого и этого

"там" тонкие материи описаны, а у тебя индусский код, чуть менее, чем полностью, вредоносный и не работающий. Помогли тебе хорошие коды? Я вижу что нет. Ведь код как выглядит так и работает. А у тебя элементарно даже количество взаимообратных действий не совпадает. Следовательно ни в каком случае это поделие нельзя рекомендовать, а лучше маркировать его как вредоносное ПО. Тому же у тебя 60% мусора в файле, а то и больше. Это я еще только по верхам посмотрел твой код.

О чем говорить если ты даже не понимаешь что такое область видимости переменной? Ты даже коментариями не в состоянии пользоваться. так что игнорь и дальше, твое право

[Turpak]

petro_f, огромнейшее спасибо вам за такой колоссальный труд и за то, что поделились с нами! Искренне желаю вам и вашим близким добра и здоровья!!

[petro_f]

Сообщение от Turpak petro_f, огромнейшее спасибо вам за такой колоссальный труд и за то, что поделились с нами! Искренне желаю вам и вашим близким добра и здоровья!!

Спасибо.
Выложил свежую версию плагина. Я думал тема никому не интересна
Свежак лежит тут ну или в шапке.

P.S. Просто для статистики, на данный момент, этим плагином выполнена часть проектов башни (КНХ) и мфз (АОВ) стилобат (АОВ) (Лахта СПб). Часть разделов автоматики ПИК (Гатчина). Ну и куча мелких объектов...
Так что можно сказать в самых тяжёлых условиях его обкатали

[veb86]

Сообщение от petro_f Спасибо. Выложил свежую версию плагина. Я думал тема никому не интересна Свежак лежит тут ну или в шапке. P.S. Просто для статистики, на данный момент, этим плагином выполнена часть проектов башни (КНХ) и мфз (АОВ) стилобат (АОВ) (Лахта СПб). Часть разделов автоматики ПИК (Гатчина). Ну и куча мелких объектов... Так что можно сказать в самых тяжёлых условиях его обкатали

Судя по видюшка модуль классный, по мне так наверное один из самых проработанных в своем плане из бесплатных.
Попробовал подключить его к bricscad 14, что то стартонуло, получилось создать кабель и даже экспортировать, но по другим командам все плохо. Экспорт выполнился в офис 2007)))
Модуль вообще классный, был бы акад даже не думая начал его обкатывать.
Не которые подходы очень интересные, особенно заполнения кабелей беря строку из таблички. Я как понимаю, табличку вы сами руками быстро набросали что с чем надо соединить и поехали.
Продолжайте радовать дальше. Приятно что плагин с полностью открытым исходным кодом. Я в LISPе не бум бум, но на форуме есть несколько людей кто пытался решить эту же задачу на LISP, не много по другому. Вам бы усилия объединить.
С наступающим Новым Годом!

[petro_f]

Сообщение от veb86 Судя по видюшка модуль классный, по мне так наверное один из самых проработанных в своем плане из бесплатных. Попробовал подключить его к bricscad 14, что то стартонуло, получилось создать кабель и даже экспортировать, но по другим командам все плохо. Экспорт выполнился в офис 2007))) Модуль вообще классный, был бы акад даже не думая начал его обкатывать. Не которые подходы очень интересные, особенно заполнения кабелей беря строку из таблички. Я как понимаю, табличку вы сами руками быстро набросали что с чем надо соединить и поехали. Продолжайте радовать дальше. Приятно что плагин с полностью открытым исходным кодом. Я в LISPе не бум бум, но на форуме есть несколько людей кто пытался решить эту же задачу на LISP, не много по другому. Вам бы усилия объединить. С наступающим Новым Годом!

Ну плагин рассчитан на автокад. Брискад отличается названием переменных и команд, так что там работоспособность совсем не гарантирована.

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

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

По поводу объединиться - у каждого проектировщика своё видение проектирования и очень редко кто готов договариваться )))

Так же всех с наступающим Новым 2019 Годом!!!

[veb86]

Сообщение от petro_f Ну плагин рассчитан на автокад. Брискад отличается названием переменных и команд, так что там работоспособность совсем не гарантирована.

Про Брикскад я конечно догадывался что что то работать будет, но я к этому привычный.

Сообщение от petro_f Табличку я создаю из блоков кабелей на электросхеме и перекидываю в файл планов (см. прилагаемый файл). Но можно самому создать ручками или загрузить из кабельного журнала в формате word.

Посмотрел файл, чувствуется что подход у вас серьезный. Как все это Вы смогли сделать на лисп, даже не представляю. Удивили. Продолжайте так же...
А как вы храните базу приборов? Что она из себя представляет? Как вообще у Вас создается прибор и насколько сложно его создания? интересно, возможно почерпну идеи для своего модуля.

[petro_f]

Сообщение от veb86 А как вы храните базу приборов? Что она из себя представляет? Как вообще у Вас создается прибор и насколько сложно его создания? интересно, возможно почерпну идеи для своего модуля.

А причём тут приборы? Это плагин кабельных линий.
Если идёт речь о приборах в чертеже, то у меня они создаются 2-я способами:
1. если блок не динамический, то вставкой из исходного чертежа с преобразованием в блок.
2. если блок динамический, то копированием из исходника (базы) файлов.

Всё это работает из переделанной надстройки сбуго.
У меня то выглядит она уже по другому, много добавлено )))
если интересно, то посмотреть можно тут. Там же внутри лежит файл с описанием настройки. Скажу сразу на брискад не проверял.

[veb86]

Сообщение от petro_f А причём тут приборы? Это плагин кабельных линий.

С кабельными линиями все понятно что происходит. Всегда интересно понять подход к проектированию. Ваш подход оказался схожим с моими представлениями.

Сообщение от petro_f 2. если блок динамический, то копированием из исходника (базы) файлов.

Это понятно, он динамический и внутри него расставлены контакторы. это видно из файла.

Сообщение от petro_f 1. если блок не динамический, то вставкой из исходного чертежа с преобразованием в блок.

А это интересно, как первый раз получается блок прибора? Вы сначала создаете блок, как внутри блока определяются коннекторы, они определяются нахождением габаритами внутри блока прибора?
Еще удивило что вы адреса жил кабелей тоже программно получается. Что бы их получить надо не только программно видеть блок прибора, надо видеть коннектор? тоже территориально находите?
вообще интересный проект. Может реально ускорить и повысить качество

[petro_f]

Сообщение от veb86 А это интересно, как первый раз получается блок прибора? Вы сначала создаете блок, как внутри блока определяются коннекторы, они определяются нахождением габаритами внутри блока прибора?

Ну изначально конечно рисую блок в соответствии со "своими стандартами" и расставляю коннекторы как мне удобно. Далее прописываю его в плагине вставке (вернее наборе переделанных плагинов под названием "sbugo"), а уж из неё вставляю.
Часть блоков у меня жёстко заданные, часть сделаны как конструктора - наборные элементы в зависимости от поставленной задачи.

Сообщение от veb86 Еще удивило что вы адреса жил кабелей тоже программно получается. Что бы их получить надо не только программно видеть блок прибора, надо видеть коннектор? тоже территориально находите?

Что именно имеется ввиду? Просто у меня несколько разных плагинов под разные задачи.

Один из них из блока

делает таблицу соединений
.

[veb86]

Сообщение от petro_f делает таблицу соединений

Получается из схем блоков, то что вы дали в файле вы получаете таблицу соединений как на второй картинке.
Я представлял таблице соединений в виде таблице откуда и куда. А у Вас на второй картинке как будто такая же схема. Для каких целей требуется такая схема?

Сообщение от petro_f Просто у меня несколько разных плагинов под разные задачи.

Я как понял у Вас не несколько, а куча плагинов, каждый из которых решает узкую задачу, из которых выстраивается вся картинка.

Я говорил про адреса эти:
Как Вы их определяли? Просматривали то что записано в контакторах, к которым подключается проводник?

[petro_f]

Сообщение от veb86 Цитата: Сообщение от petro_f делает таблицу соединений Получается из схем блоков, то что вы дали в файле вы получаете таблицу соединений как на второй картинке. Я представлял таблице соединений в виде таблице откуда и куда. А у Вас на второй картинке как будто такая же схема. Для каких целей требуется такая схема?

Скажем так я забежал вперёд...Этот плагин для других целей. )) Просто как то Заказчик мне стал выедать мозг, что он не может понять схему в таком виде и что он понимает только схемы старого образца. Я тогда и сделал такой плагин. Эти таблицы соединений идут как приложением к файлу чертежа


Так то да из того блока плагин кабельных трасс делает таблицу из которой потом берётся инфа для кабеля на планах. Это к разговору о том, что я рисую схему электрическую, а потом с неё делаю выгрузку.

Сообщение от veb86 Я как понял у Вас не несколько, а куча плагинов, каждый из которых решает узкую задачу, из которых выстраивается вся картинка.

Ну ссылку на сборник моих плагинов я давал тут Там много чего полезного и кабельный плагин вшит в том числе Я периодически пролистываю сайт, загружаю плагинчики которые мне могут подойти или просто пишу плагины под свои задачи. Всё это добавляю в сборник sbugo и пользуюсь сам и своим коллегам отдаю.

Сообщение от veb86 Я говорил про адреса эти: Как Вы их определяли? Просматривали то что записано в контакторах, к которым подключается проводник?

У меня есть плагин который автоматом подставляет указанные поля (адреса) вместо текста. А тот блок, что выделен, там есть основное поле и остальные поля ссылаются на него. Удобно для создания ссылок.

[veb86]

Сообщение от petro_f Это к разговору о том, что я рисую схему электрическую, а потом с неё делаю выгрузку.

Все логично, пока не ясно как будет выглядеть управление чего рисовать то на плане. С начало схема затем план.

Сообщение от petro_f Ну изначально конечно рисую блок в соответствии со "своими стандартами" и расставляю коннекторы как мне удобно.

Не скромная просьба, а могли бы снять видео о том как происходит создание прибора с коннекторами, вообще ход проектирования, небольшой кусок. Ну скажем ТРМ232, по температурному датчику управляет задвижкой. И сказать что удобно в этом подходе, что хотелось бы поменять, что добавить, вообще дать оценку самому. Рано или поздно все равно встанет у меня или у коллеги такая задача, хотелось бы получить новый подход к решению задачи. Т.е. подходы которые я встречаю у гигантов EPlan, Компас-Электрик кажутся слишком сложным для реализации. Хотелось бы получить что то добротное, для решения скажем 95% задач. Я думаю Вы меня поняли.

[petro_f]

Сообщение от veb86 Не скромная просьба, а могли бы снять видео о том как происходит создание прибора с коннекторами, вообще ход проектирования, небольшой кусок. Ну скажем ТРМ232, по температурному датчику управляет задвижкой. И сказать что удобно в этом подходе, что хотелось бы поменять, что добавить, вообще дать оценку самому. Рано или поздно все равно встанет у меня или у коллеги такая задача, хотелось бы получить новый подход к решению задачи. Т.е. подходы которые я встречаю у гигантов EPlan, Компас-Электрик кажутся слишком сложным для реализации. Хотелось бы получить что то добротное, для решения скажем 95% задач. Я думаю Вы меня поняли.

Для этого в сбуге у меня есть набор (конструктор) блоков. Синие модули могут быть как контролером, так и элементами. Пользуйтесь ими и будет счастье )))

[petro_f]

Обновил плагин в шапке.

[Barmaley Bubusikin]

Offtop: 18400 строк! Лайк не глядя

----- добавлено через ~9 ч. -----
В последней версии, при создании блока кабеля, на новый слой переносится объект внутри блока, и получается жесткое задание цвета, веса и типа линии блока. Подскажите, пожалуйста, какие строки изменить, чтобы все было "послою".
И где изменить начальный масштаб, - при открытии файла он всегда сбрасывается на 1.
Дополню про масштаб. Создаю кабельную линию в масштабе М1:500 (полилиния 100 мм в М1:500 = 50 м) - коэффициент масштаба надо установить 0,002. Далее сразу же делаю копию на базе этого блока. Т.к. масштабный коэффициент сохранился, длина кабеля (копии) становится 50 м*500 = 25000 м. Это так задумано?

[petro_f]

Сообщение от Barmaley Bubusikin влено через ~9 ч. ----- В последней версии, при создании блока кабеля, на новый слой переносится объект внутри блока, и получается жесткое задание цвета, веса и типа линии блока. Подскажите, пожалуйста, какие строки изменить, чтобы все было "послою". И где изменить начальный масштаб, - при открытии файла он всегда сбрасывается на 1.

Изменить тяжело, так как ядро плагина строилось с условием, что эти настройки будут прописаны автоматом.
В начале плагина в файле "PDKFKG.lsp" в строках с 42 по 74 есть настройки слоя куда будут перемещаться линии.
Там же задаётся переменная масштаба.

Дополню про масштаб. Создаю кабельную линию в масштабе М1:500 (полилиния 100 мм в М1:500 = 50 м) - коэффициент масштаба надо установить 0,002. Далее сразу же делаю копию на базе этого блока. Т.к. масштабный коэффициент сохранился, длина кабеля (копии) становится 50 м*500 = 25000 м.

Немного не понял зачем в автокаде чертить в масштабе. Да, придётся масштаб вручную перебить на 1.0.

Это так задумано?

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

----- добавлено через 6 сек. -----

Сообщение от Barmaley Bubusikin Дополню про масштаб. Создаю кабельную линию в масштабе М1:500 (полилиния 100 мм в М1:500 = 50 м) - коэффициент масштаба надо установить 0,002. Далее сразу же делаю копию на базе этого блока. Т.к. масштабный коэффициент сохранился, длина кабеля (копии) становится 50 м*500 = 25000 м. Это так задумано?

Пофиксил функцию "PDKFKGCPY" в плагине версии 18.3.

В последней версии, при создании блока кабеля, на новый слой переносится объект внутри блока, и получается жесткое задание цвета, веса и типа линии блока. Подскажите, пожалуйста, какие строки изменить, чтобы все было "послою".

В новой версии плагина закомментируйте (символом ; в начале строки) строки с 6057 по 6064.
P.S. Но не гарантирую корректность работы далее

[petro_f]

Barmaley Bubusikin - проверили? Получилось?

[Barmaley Bubusikin]

Сообщение от petro_f В новой версии плагина закомментируйте (символом ; в начале строки) строки с 6057 по 6064.

Объекты внутри блока стали "послою", но на слой 0 не переносятся. Если рисовать на слое 0, то все ок.
И масштаб стал вести себя понятно. Спасибо.

[petro_f]

Сообщение от Barmaley Bubusikin Объекты внутри блока стали "послою", но на слой 0 не переносятся

На строке 43 задайте нужное имя слоя, например "0".
Затем раскоментируйте строки 6062 и 6064. Да будет Вам счастье )))

[mrsalikov]

Сообщение от petro_f На строке 43 задайте нужное имя слоя, например "0". Затем раскоментируйте строки 6062 и 6064. Да будет Вам счастье )))

Слой с таблицами сделан черным цветом, плюс сам стиль таблиц настроен с черными границами. Из-за этого если ставить цвет таблицы "по слою" при переносе на нужный слой, то требуется лезть в настройки таблицы и руками менять цвета. Где в коде плагина сменить свойства стиля создаваемых таблиц?

[petro_f]

Сообщение от mrsalikov Слой с таблицами сделан черным цветом, плюс сам стиль таблиц настроен с черными границами. Из-за этого если ставить цвет таблицы "по слою" при переносе на нужный слой, то требуется лезть в настройки таблицы и руками менять цвета. Где в коде плагина сменить свойства стиля создаваемых таблиц?

Ищите функцию "PDKFKG-create-style-table" (удобнее искать по словам "(defun PDKFKG-create-style-table". Там всё сможете настроить.

P.S. Для чего может понадобиться "красить" таблицу в отличный от чёрного цвет? Или Вы из секты "клоуны-проектировщики"? Есть такая секта, берешь после них файл и несколько часов его приходиться чистить и приводить у читабельному виду..

[mrsalikov]

Сообщение от petro_f Ищите функцию "PDKFKG-create-style-table" (удобнее искать по словам "(defun PDKFKG-create-style-table". Там всё сможете настроить. P.S. Для чего может понадобиться "красить" таблицу в отличный от чёрного цвет? Или Вы из секты "клоуны-проектировщики"? Есть такая секта, берешь после них файл и несколько часов его приходиться чистить и приводить у читабельному виду..

По нашему стандарту таблицы сводятся к цвету "по слою" дабы не возникало проблем при вставке на видовой экран листов. Плюс многие проектировщики работают с темным фоном када, дабы глазам проще было.

[petro_f]

Сообщение от mrsalikov Плюс многие проектировщики работают с темным фоном када, дабы глазам проще было.

И совсем не осознают, что остальным их разноцветное поделие выглядит как боль для глаз И очень любят применять "офигенные цвета" типа жёлтого и светло зелёного ))) что при печати или при просмотре PDF вызывает жуткое желание кое кого побить )))

P.S. Не берите на свой счёт, это просто крик души....

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

petro_f, а что, таблица стилей печати не используется?

[mrsalikov]

Сообщение от petro_f И совсем не осознают, что остальным их разноцветное поделие выглядит как боль для глаз И очень любят применять "офигенные цвета" типа жёлтого и светло зелёного ))) что при печати или при просмотре PDF вызывает жуткое желание кое кого побить ))) P.S. Не берите на свой счёт, это просто крик души....

А с чего вы взяли, что у нас используются вырвиглазные цвета? Как раз чтоб и не было вырвиглазных цветов их максимально и не трогаем (поэтому и спрашиваю про допилку плагина под наши нужды). Отдельный слой "Таблицы" скопированный с дефолтного нулевого слоя, все цветовые настройки поставлены "по слою".

[petro_f]

Сообщение от Кулик Алексей aka kpblc petro_f, а что, таблица стилей печати не используется?

Что именно Вы имели ввиду?
Если про таблицы, то создаю стиль с принудительными указаниями нужных мне параметров и далее его использую.

----- добавлено через ~2 мин. -----

Сообщение от mrsalikov А с чего вы взяли, что у нас используются вырвиглазные цвета? Как раз чтоб и не было вырвиглазных цветов их максимально и не трогаем (поэтому и спрашиваю про допилку плагина под наши нужды). Отдельный слой "Таблицы" скопированный с дефолтного нулевого слоя, все цветовые настройки поставлены "по слою".

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

----- добавлено через ~1 ч. -----

Сообщение от mrsalikov Ищите функцию "PDKFKG-create-style-table" (удобнее искать по словам "(defun PDKFKG-create-style-table". Там всё сможете настроить.

Получилось перенастроить?

[borisych.nnov]

petro_f, спасибо Вам огромное за ваш труд. Плагин крайне интересный и полезный. Подскажите пожалуйста, где можно скачать исходник? Насколько я понимаю, выложенная актуальная версия v_18.3 является обновлением.

[petro_f]

Сообщение от borisych.nnov petro_f, спасибо Вам огромное за ваш труд. Плагин крайне интересный и полезный. Подскажите пожалуйста, где можно скачать исходник? Насколько я понимаю, выложенная актуальная версия v_18.3 является обновлением.

Спасибо, что написали. Я по запарке удалил основной пак плагина.
Сейчас поправил и выложил в шапке темы. Файл называется "PDKFKG.zip"


А можете попробовать загрузить этот плагин в паке остальных плагинов. https://sbugo.ru/ файл sbugo.rar. распаковать и внутри есть инструкция по установке. Там не только есть кабельный плагин, но и куча дополнительных плагинов.

[Frigate]

Приветствую, коллега!

Когда-то я и сам разрабатывал тут такую надстройку. Но когда есть Еплан, многое становится ненужным.

По программе смотрел создание кабеля. А вы не думали добавить возможность автопостроения трассы кабеля, с указанием начальной и конечной точки? Не всегда такое возможно, но есть объекты, где это легко применимо и экономит тучу времени. Я такой реализовал у себя на ЛИСПе. Могу поделиться кодом и помочь.

[petro_f]

Сообщение от Frigate Но когда есть Еплан, многое становится ненужным.

Приветствую, коллега.
А подскажите, еплан у Вас полностью лицензионный?

Не во всех конторах руководство готово расстаться с овердофига (я помню нам выставляли счёт 650 т.р. за одно рабочее место) денег за еплан.

Сообщение от Frigate А вы не думали добавить возможность автопостроения трассы кабеля, с указанием начальной и конечной точки? Не всегда такое возможно, но есть объекты, где это легко применимо и экономит тучу времени. Я такой реализовал у себя на ЛИСПе. Могу поделиться кодом и помочь

Можно попробовать что то типа отдельного плагина автопостройщика подключить.
Если не жалко пришлите, будет время посижу, покумекаю.

[mrsalikov]

petro_f, у вас в атрибутах блоков есть дополнительные служебные поля на резерв. Хотелось бы, чтобы их задействовали, расширив номенклатуру возможных прокладок кабелей. Ибо летом в одном из проектов (релейная защита) возникла проблема (сейчас уже не вспомню какого именно варианта прокладки не хватило). И тут еще коллега жаловалась, что нет возможности расписать прокладку кабелей по эстакаде. Хотелось бы в будущих версиях добавить. Плюс может быть получится реализовать как-то редактор стилей таблиц/табличек подписей кабелей, дабы не лазить в сам код лиспа?

[petro_f]

Сообщение от mrsalikov petro_f, у вас в атрибутах блоков есть дополнительные служебные поля на резерв. Хотелось бы, чтобы их задействовали, расширив номенклатуру возможных прокладок кабелей. Ибо летом в одном из проектов (релейная защита) возникла проблема (сейчас уже не вспомню какого именно варианта прокладки не хватило). И тут еще коллега жаловалась, что нет возможности расписать прокладку кабелей по эстакаде.

Добрый день.
Всё возможно. Надо просто только определить какие именно прокладки могут понадобится. У меня 99.9% кабелей укладываются в данные прокладки. Сформируйте список и предложите его.
Просто увеличивать до бесконечности все поля тяжело, так как табличка выходит огромной, да и само окно плагина растёт ))

----- добавлено через ~2 мин. -----

Сообщение от mrsalikov Плюс может быть получится реализовать как-то редактор стилей таблиц/табличек подписей кабелей, дабы не лазить в сам код лиспа?

Не вижу смысла. Можно просто добавить возможность указать (и запомнить в реестре) используемый стиль для элементов. Но там есть подводные камни при создании таблиц. Может оказаться, что в стиле указаны поля (количество) другое и при вставке табличка выйдет корявой или вообще не зайдет. Именно из-за этого я и сделал стиль принудительно создаваемым.

[mrsalikov]

Сообщение от petro_f Добрый день. Всё возможно. Надо просто только определить какие именно прокладки могут понадобится. У меня 99.9% кабелей укладываются в данные прокладки. Сформируйте список и предложите его. Просто увеличивать до бесконечности все поля тяжело, так как табличка выходит огромной, да и само окно плагина растёт ))

Рост операций, выполняемых в плагине это палка о двух концах. Ибо с одной стороны больше возни с каждым кабелем, а с другой стороны резкое упрощение получения выходной документации, плюс уменьшение риска где-то в цифрах в таблицах накосячить.
Теперь к хотелкам
1)В сметных расценках отдельно считается прокладка кабеля по металлоконструкциям (эстакады, консоли и т.д), даже если на них крепятся КНС. Предлагаю снизу добавить строку "прокладка по конструкциям", которая не будет учитываться в данных по прокладке кабеля, но будет выводиться в таблице прокладок кабелей.
2)При прокладке одножильных кабелей длина трассы кабеля и монтажная длина различаются. Если мы кладем 3 одножильных кабеля, то их надо протащить по всем конструкциям 3 раза. А потребители бывают особо мощные, и там можно и 9 штук кидать параллельно. Соответственно монтажные длины надо учитывать. Соответственно предлагаю куда-нибудь возле чекбокса с силовым/контрольным кабелем добавить еще окошко, где можно будет вписать количество параллельно прокладываемых кабелей, дабы монтажные длины умножались на число этих кабелей.
P.S. Давно столкнулся со странным глюком плагина (и плагина ли?). Что в 2019 каде, что в 2020. При подключенном плагине автокад (пробовал как в голом, так и в Electrical) не сохраняет настроенные вкладки, при каждом запуске почему-то сбрасывается на дефолт.

[petro_f]

Сообщение от mrsalikov не сохраняет настроенные вкладки,

Что Вы имеете ввиду?

P.S. Надо остальным подумаю позже, может добавлю эстакады, надо только понять как это лучше сделать.

[mrsalikov]

Здравствуйте! Восхищен Вашим трудом, даже встречал документацию от сторонней организации, выполненной в Вашем плагине!

В файле частичной адаптации создал панель для быстрого доступа к функциям плагина, надеюсь, пригодится.



Ссылка на скриншот: https://yadi.sk/i/RNAMagPQZmOnbw
Ссылка на файл адаптации: https://yadi.sk/d/HvZoBZsOJUMPYg

Сообщение от petro_f Что Вы имеете ввиду?

У меня в каде настроены основные вкладки для работы (главная, вставка, аннотации, проект, схема, монтажная панель (это из Electrical уже) и т.д.). До подключения плагина автокад запоминает показанные вкладки и показывает их мне. После подключения плагина при каждом открытии чертежа состояние панели вкладок сбрасывается до дефолтного. В итоге каждый раз надо нужные вкладки открывать с нуля, что слегка бесит.

[Turpak]

Я, конечно, всё понимаю, но этот текст и файл адаптации - сделаны мной! Прошу модератора пофиксить данный косяк!

Здравствуйте! Восхищен Вашим трудом, даже встречал документацию от сторонней организации, выполненной в Вашем плагине! В файле частичной адаптации создал панель для быстрого доступа к функциям плагина, надеюсь, пригодится. Ссылка на скриншот: https://yadi.sk/i/RNAMagPQZmOnbw Ссылка на файл адаптации: https://yadi.sk/d/HvZoBZsOJUMPYg

[petro_f]

Сообщение от mrsalikov У меня в каде настроены основные вкладки для работы (главная, вставка, аннотации, проект, схема, монтажная панель (это из Electrical уже) и т.д.). До подключения плагина автокад запоминает показанные вкладки и показывает их мне. После подключения плагина при каждом открытии чертежа состояние панели вкладок сбрасывается до дефолтного. В итоге каждый раз надо нужные вкладки открывать с нуля, что слегка бесит.

Надо посмотреть - я вкладками не пользуюсь, как и лентой. Так что не обращал внимание. Можно принскрин до и после плагина.?

P.S. За ленту спасибо. Проверю на компе, если всё норм, то включу в комплект.

[petro_f]

Сообщение от Turpak Я, конечно, всё понимаю, но этот текст и файл адаптации - сделаны мной! Прошу модератора пофиксить данный косяк!

Ребята, не нервничайте
При загрузке файла адаптации 2018 кад ругается -

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

Offtop:

Сообщение от Turpak Я, конечно, всё понимаю, но этот текст и файл адаптации - сделаны мной! Прошу модератора пофиксить данный косяк!

А что еще модератору надо сделать?

----- добавлено через ~1 мин. -----

Сообщение от mrsalikov У меня в каде настроены основные вкладки для работы (главная, вставка, аннотации, проект, схема, монтажная панель (это из Electrical уже) и т.д.). До подключения плагина автокад запоминает показанные вкладки и показывает их мне. После подключения плагина при каждом открытии чертежа состояние панели вкладок сбрасывается до дефолтного. В итоге каждый раз надо нужные вкладки открывать с нуля, что слегка бесит.

wsautosave ?

[mrsalikov]

Сообщение от Кулик Алексей aka kpblc Offtop: А что еще модератору надо сделать? ----- добавлено через ~1 мин. ----- wsautosave ?

1)Убрать из моего сообщения часть про панель с иконками, ибо это реально не мое (и я про это даже не писал так-то и перенести в оообщение Turpak.
2)Век жЫви - век учись. Спасибо! petro_f, свой вопрос касаемо слетающих вкладок снимаю.

[Turpak]

Сообщение от petro_f Ребята, не нервничайте При загрузке файла адаптации 2018 кад ругается

Написал сообщение, а оно прикрепляется к сообщению другого человека... Весьма обидно.


Пересохранил, проверил работу на 14-ом, 19-ом и 20 каде.

Иконки зашиты в cuix файл.

Просто подгрузить файл, как показано на скриншоте.




Если надо подправить группировку кнопок или названия - пишите, буду рад помочь

UPDATE: Актуализировал ленту для версии [V 18.8] Команда "PDKFKGCHECK" на палени "Ревизия"
PDK_лента_v0.21.rar

[petro_f]

Сообщение от Turpak Просто подгрузить файл, как показано на скриншоте.

Вторая версия работает. Сейчас соберу в архив и положу в шапке темы.

[ie.spb]

Автору большое спасибо!
Есть вопрос: возможно ли добавлять другие марки кабельной продукции в базу данных?
И вопрос по команде PDKFKGMARK_GROUP, появляется просто мультивыноска без текста.
Результат на скриншоте.

И еще появилась ошибка:

Программа допустила ошибку в функции "PDKFKG-create-style-table". Ошибка Automation. Неверный вводnil

. Наверное что то не правильно делаю

[petro_f]

Сообщение от ie.spb возможно ли добавлять другие марки кабельной продукции в базу данных?

Конечно можно.
Есть два способа.

1. Не самый лучший способ. При создании кабеля внести данные своего кабеля и при выгрузке (при подсчёте необходимого сечения лотка) плагин попросит уточнить данные и предложит внести их в свою локальную базу данных кабелей. Минусы этого способа - данные будут только у Вас локально в файле ...\0_LISP\PDKFKG_user_cable_base_diameter.txt
2. Правильный способ. Открыть файл ...\0_LISP\PDKFKG_cable_base_diameter.txt и по образцу и подобию собрать данные на нужную серию кабельной продукции. Сохранить в файле и выложить сюда или мне прислать в личку. Я внесу эти данные в общую базу плагина и при обновлении этот кабель добавится всем.

Поля при создании кабеля указаны в шапке файла. При создании желательно использовать уже существующую строчку (скопировать её), что бы не вносить рассогласование (например 5x4 - x используется английский, а вместо "." используется "," , в скобках (А) русская и пр...

Так же прошу заполнить строчку комментариев к кабелю в таком виде
;; Кабель ВВГЭнг(А)-FRLS https://segmentenergo.ru/kabel/vvgjenga-frls/ ТУ 16.К71-337-2004 ТУ 16-705.496-2011 ООО «СегментЭНЕРГО»
;;
ВВГЭнг(А)-FRLS _###_ 1x1,5 _#!!#_ 6,1 _#--#_ 66 _#++#_

[petro_f]

Сообщение от ie.spb И вопрос по команде PDKFKGMARK_GROUP, появляется просто мультивыноска без текста.

Данная выноска берёт данные из поля "Принадлежность кабеля к группе" - оно у Вас заполнено?

Данное поле предусмотрено в основном для электриков (они любят по группам кабели делить) и для резерва, когда имя кабеля содержит "запрещённые символы" и тогда блок создаётся без них, а настоящее имя пишется туда.

----- добавлено через ~1 мин. -----

Сообщение от ie.spb еще появилась ошибка: Цитата: Программа допустила ошибку в функции "PDKFKG-create-style-table". Ошибка Automation. Неверный вводnil

Дайте более точное описание когда появляется ошибка, либо дайте файл с этой ошибкой, если она проявляется в файле.

[Turpak]

Сообщение от ie.spb И еще появилась ошибка: Цитата: Программа допустила ошибку в функции "PDKFKG-create-style-table". Ошибка Automation. Неверный вводnil

Здравствуйте! Опытным путём выяснил, что для корректной работы плагина необходимо, что бы на вкладке "Аннотация" был выбран не аннотативный размерный стиль, что-то в стиле ISO-25 или "Standart", если вы их не меняли. Думал, что это в связи с установкой у меня других аддонов. Скриншот из интернета, но суть, надеюсь, понятна.

[petro_f]

Сообщение от Turpak Здравствуйте! Опытным путём выяснил, что для корректной работы плагина необходимо, что бы на вкладке "Аннотация" был выбран не аннотативный размерный стиль, что-то в стиле ISO-25 или "Standart", если вы их не меняли. Думал, что это в связи с установкой у меня других аддонов. Скриншот из интернета, но суть, надеюсь, понятна. Вложение 222965

Странно посмотрю. я там вроде размеры вообще не захватываю...
Конкретно в одной функции ошибка или при любом варианте работы плагина. Так сказать надо понять где искать. Можно привести пример, когда точно идёт сработка?

[petro_f]

Сообщение от Turpak Здравствуйте! Опытным путём выяснил, что для корректной работы плагина необходимо, что бы на вкладке "Аннотация" был выбран не аннотативный размерный стиль, что-то в стиле ISO-25 или "Standart", если вы их не меняли. Думал, что это в связи с установкой у меня других аддонов. Скриншот из интернета, но суть, надеюсь, понятна.

Можно более точнее локализовать ошибку?
Специально создал "левый" анотативный стиль. удалил стандартный..
Всё ок, работает. Кабель, выноски, выгрузки создаются.

[Turpak]

На работе не было особо времени разбираться. Как понял, что дело в размерном стиле - переключил и продолжил работу... сроки...
Сейчас детально сравнил оба размерных стиля. На основе вашего размерного стиля создал новый. С ним всё работает.
Опять же, опытным путём выяснил, что если создавать аннотативный стиль на основе размерного стиля с dimscale=0, то потом в этом аннотативном стиле насильно прописать dimscale через командную строку на "1" невозомжно - Автокад не даёт. Если создавать размерный стиль на основе не_аннотативного с dimscale = 1 то и аннотативный стиль в себе будет иметь зашитую dimscale=1, которую, впрочем, тоже никак насильно не поменять. Ссылки на запись действий прилагаю.
https://recordit.co/LHNG20c2fQ
https://recordit.co/UL9t00Y6rA

[petro_f]

Сообщение от Turpak На работе не было особо времени разбираться. Как понял, что дело в размерном стиле - переключил и продолжил работу... сроки... Сейчас детально сравнил оба размерных стиля. На основе вашего размерного стиля создал новый. С ним всё работает. Опять же, опытным путём выяснил, что если создавать аннотативный стиль на основе размерного стиля с dimscale=0, то потом в этом аннотативном стиле насильно прописать dimscale через командную строку на "1" невозомжно - Автокад не даёт. Если создавать размерный стиль на основе не_аннотативного с dimscale = 1 то и аннотативный стиль в себе будет иметь зашитую dimscale=1, которую, впрочем, тоже никак насильно не поменять. Ссылки на запись действий прилагаю. https://recordit.co/LHNG20c2fQ https://recordit.co/UL9t00Y6rA

Косяк примерно понял. Я у себя в sbugo (там комплектно у меня лежат все плагины) не использую переменную dimscale, а использую переменную USERR1 и по этому то не сталкивался с данной проблемой.
Посмотрю, где я вызываю размерность и наверное поставлю защиту проверки на 0.

----- добавлено через 58 сек. -----

Сообщение от Turpak Опять же, опытным путём выяснил, что если создавать аннотативный стиль на основе размерного стиля с dimscale=0, то потом в этом аннотативном стиле насильно прописать dimscale через командную строку на "1" невозомжно - Автокад не даёт. Если создавать размерный стиль на основе не_аннотативного с dimscale = 1 то и аннотативный стиль в себе будет иметь зашитую dimscale=1, которую, впрочем, тоже никак насильно не поменять

Добавил защиту. Проверяйте.

[Turpak]

Сообщение от petro_f Добавил защиту. Проверяйте.

Проверил, работает без проблем! Спасибо!

[ie.spb]

Сообщение от petro_f Данная выноска берёт данные из поля "Принадлежность кабеля к группе" - оно у Вас заполнено?

Нет не заполнено. Теперь все понятно. Спасибо большое!

Сообщение от petro_f Конкретно в одной функции ошибка или при любом варианте работы плагина. Так сказать надо понять где искать. Можно привести пример, когда точно идёт сработка?

Конкретно ошибка была только в этой команде. Вылечилась, как не странно, после ._purge.

[ie.spb]

Добрый день!
Активно осваиваю плагин, очень удобно. Еще раз спасибо за проделанную работу!
Есть вопрос: возможно ли не изменять включение веса линий после каждой команды?

[petro_f]

Сообщение от ie.spb Добрый день! Активно осваиваю плагин, очень удобно. Еще раз спасибо за проделанную работу! Есть вопрос: возможно ли не изменять включение веса линий после каждой команды?

Поправлю. Надо посмотреть, где я его включаю (надо вспомнить в какой функции я это делаю)

----- добавлено через 50 сек. -----
Поправил. Проверяйте. Отображение толщин линий не должно меняться.

[petro_f]

Добавил в базу данных плагина кабель REDAK.

Сообщение от ie.spb Есть вопрос: возможно ли добавлять другие марки кабельной продукции в базу данных?

Будет от Вас инфа с кабелями или не ждать?

[ie.spb]

Сообщение от petro_f Будет от Вас инфа с кабелями или не ждать?

Добрый день!
Инженер в отпуске, так что временно, увы, не будет.
И еще, все равно включается вес линий, при выполнении любой команды

[petro_f]

Сообщение от ie.spb И еще, все равно включается вес линий, при выполнении любой команды

Какие команды точно можете показать? Перечень, и пример.
P.S. У Вас последняя версия плагина?

[ie.spb]

Сообщение от petro_f Какие команды точно можете показать? Перечень, и пример

Например команды: PDKFKG, PDKFKGCPY
Пример могу просто файл Autocad выложить с несколькими линиями. Алгоритм такой: запускаем PDKFKG, выбираем объект, заполняем все необходимые поля, ОК, и вес линий включается.
Новую версию только что скачал, заменил файлы у себя, данный момент остался прежним.

[petro_f]

Сообщение от ie.spb Новую версию только что скачал, заменил файлы у себя, данный момент остался прежним.

Заменил файлы и ПЕРЕЗАГРУЗИЛ лисп в автокад или сам автокад перезагрузил? Перед проверкой?

[ie.spb]

Сообщение от petro_f Заменил файлы и ПЕРЕЗАГРУЗИЛ лисп в автокад или сам автокад перезагрузил? Перед проверкой?

Да все по правилам. Перезагрузил Автокад, на всякий случай перезагрузил лисп.
Только вот начал я экспериментировать с SBUGO (например команда ECPDF)и этот же момент проявился опять. Так что, думаю, дело не в вашей программе.

[petro_f]

Сообщение от ie.spb Только вот начал я экспериментировать с SBUGO (например команда ECPDF)и этот же момент проявился опять

Так это тоже моя программа и там я не правил ))
Внесу и там правку.

P.S. Обновите SBUGO, я поправил там плагин ECPDF

[ie.spb]

Сообщение от petro_f Так это тоже моя программа и там я не правил )) Внесу и там правку. P.S. Обновите SBUGO, я поправил там плагин ECPDF

Обновил, теперь все работает! Спасибо за оперативность!

[petro_f]

Сообщение от ie.spb Обновил, теперь все работает! Спасибо за оперативность!

Так там правки на 2 минуты )))

[petro_f]

Обновил плагин. Добавил функционал. Подробности в шапке (в логах).

[petro_f]

Обновил плагин. Добавил функционал. Подробности в шапке (в логах).

[ie.spb]

Сообщение от petro_f Обновил плагин. Добавил функционал. Подробности в шапке (в логах).

А что обновилось? Если не секрет, конечно

[petro_f]

Сообщение от ie.spb А что обновилось? Если не секрет, конечно

В логах же в шапке пишу
19. В версии [>= V 18.7] Добавил возможность вместе с фильтрацией перечня кабелей в окне выбора кабелей, создавать список выгружаемых кабелей.

Команда PDKFKGSEL

Теперь можно собирать перечень кабелей, которые тебе необходимо найти на чертеже

[Turpak]

Сообщение от petro_f В логах же в шапке пишу 19. В версии [>= V 18.7] Добавил возможность вместе с фильтрацией перечня кабелей в окне выбора кабелей, создавать список выгружаемых кабелей. Команда PDKFKGSEL Теперь можно собирать перечень кабелей, которые тебе необходимо найти на чертеже

Как раз актуализировал план прокладки кабельных трасс из 820 кабелей. Как же вовремя!! Спасибо! Очень удобная функция и выбор по алфавиту! Спасибо!

[petro_f]

Сообщение от Turpak выбор по алфавиту

Там фильтр внизу ))) можно не только по алфавиту ))

[Turpak]

Сообщение от petro_f Там фильтр внизу ))) можно не только по алфавиту ))

Да, фильтр сразу оценил, очень сильно! А про "по алфавиту" - раньше было по порядку создания, сразу стало намного удобнее.

[petro_f]

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

[Kavalergrad]

Ссылки на GIF-ки заблокированы. Выложи в другом месте.

[petro_f]

Сообщение от Kavalergrad Ссылки на GIF-ки заблокированы. Выложи в другом месте.

У меня открывается с любого компа и браузера .
Разбирайтесь со своим провайдером..

[Kavalergrad]

Ок, понял. Спасибо

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

Offtop:

Сообщение от petro_f Разбирайтесь со своим провайдером..

И при чем здесь провайдер, если тот же антивирус может распознавать сайт как "неблагонадежный"? И добавь сюда еще РПН, станет совсем весело.
Уж сколько раз твердил, а все одно как об стенку горох - народ упорно выкладывает материалы черт-те куда, типа кнопки "Добавить вложение" еще (или уже) не существует.

[petro_f]

Сообщение от Кулик Алексей aka kpblc "Добавить вложение" еще (или уже) не существует.

Для начала разберитесь с фуфлыжными настройками этого сайта. 5 вложений да ещё с конскими ограничениями.... нафиг кому такое надо.
Как я прикреплю 10 гифок на 95 метров? куда??
Я понимаю сделали бы норм хранилище и хотя бы при создании темы не ограничивали, тогда бы было понятно возмущение, а так с Вашей стороны это как "в муку пёрнуть"лишь бы что то написать, не подумав (причём уже не первый раз так).

[petro_f]

Обновил шапку плагина новым файлом для оформления ленты. Файл с поста #80

[petro_f]

Обновил шапку плагина. Добавил кабели в базу кабелей и убрал задвоение кабелей ВБШвнг.... Файл в шапке.

[Barmaley Bubusikin]

Подскажите, пожалуйста, что изменить чтобы увеличить отступ по горизонтали в таблице выноски кабельных блоков. Если меняю строку 11005 (v18.8), то тогда текст не помещается в одну строку

[petro_f]

Сообщение от Barmaley Bubusikin Подскажите, пожалуйста, что изменить чтобы увеличить отступ по горизонтали в таблице выноски кабельных блоков. Если меняю строку 11005 (v18.8), то тогда текст не помещается в одну строку

Дайте пример что Вы хотите получить и что получается. Просто эта функция используется для многих вещей и иногда проще поправить уже готовую табличку.

[petro_f]

Походу то и не очень то хотелось

[Ager82]

Сообщение от petro_f А можете попробовать загрузить этот плагин в паке остальных плагинов. файл sbugo.rar. распаковать и внутри есть инструкция по установке. Там не только есть кабельный плагин, но и куча дополнительных плагинов.

Пользуюсь вашей комплектом плагинов уже давно. Большое спасибо за Ваш труд.
Но по ссылке ничего не находит.

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

Сообщение от Ager82 Пользуюсь вашей комплектом плагинов уже давно. Большое спасибо за Ваш труд. Но по ссылке ничего не находит.

Живая иллюстрация на тему Меня просят "перезалить" предоставленную документацию / серию / фото / ГОСТ в Dоwnlоad или приложить к посту. Почему?

[petro_f]

Сообщение от Ager82 Пользуюсь вашей комплектом плагинов уже давно. Большое спасибо за Ваш труд. Но по ссылке ничего не находит.

Так я специально даль коротко живучую ссылку. Так как переводил комплект на сайт в тот момент. Теперь новая ссылка sbugo.ru. Можно скачать инсталятор, установить его и запустить. Он и устанавливает и потом позволяет обновлять комплект. Либо вручную скачать архив, распаковать и там далее по инструкции.
В любом случае, рекомендуется после первой установки заглянуть в папку сбуго и по инструкции все сделать, что там написано (что понадобится). Это нужно только если хотите все комплект возможностей набора плагинов использовать.

P.S. От оригинальной sbugo этот комплект очень сильно отличается, скажем так оригинал там есть, но он уже убран глубоко в меню, а вот дополнения для комфортной работы там наоборот вынесены вперёд.

P.P.S. Кулик Алексей aka kpblc опять не разобравшись лезет со своими глупыми советами Для особо одарённых то сообщение было привязано к дате (начало года). Ясен пень, что человек сразу не воспользовался.... ссылка "сгорела". ЭтЗо было осознано ))

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

Сообщение от petro_f то сообщение было привязано к дате (начало года)

Нормальные люди вообще-то о подобном предупреждают. Ну да дело твое.

[petro_f]

Сообщение от Кулик Алексей aka kpblc Нормальные люди вообще-то о подобном предупреждают. Ну да дело твое.

Ну так и человек меня спросил... как бы...



Он не звал тебя спасителя на помощь...

[ie.spb]

Добрый день!
Можно высказать пожелание? Если есть возможность, об этом уже писали ранее, все таки исключить из кода принудительное переопределение стилей мультивыносок. Я его настрою под себя а при следующем сеансе происходит сброс настроек.

[petro_f]

Сообщение от ie.spb все таки исключить из кода принудительное переопределение стилей мультивыносок

Нет невозможно, так как я создаю стиль мвыносок для плагина. Зачем Вы перенастраиваете стиль мультивыноски (АИС_КАБЕЛЬ) которые создает плагин? Настройте свой стиль и оставьте в покое стиль плагина

[ie.spb]

Просто, например, команда PDKFKGMARK использует не тот стиль который установлен по умолчанию, а принудительно берет стиль АИС_КАБЕЛЬ.

[petro_f]

Сообщение от ie.spb Просто, например, команда PDKFKGMARK использует не тот стиль который установлен по умолчанию, а принудительно берет стиль АИС_КАБЕЛЬ.

Так и ДОЛЖНО БЫТЬ.
Плагин создаёт свой стиль и использует свой стиль, для того, что бы всегда все выноски созданные плагином были одинаковы...

[pensioner2007]

Добрый день. Кто может подсказать почему не работает панель выбора кабеля из базы данных? Висит ни на какие движения не реагирует, может настроить нужно?

[pensioner2007]

Товарищ petro_f, каким образом подключить базу данных кабелей?

[petro_f]

Сообщение от pensioner2007 Добрый день. Кто может подсказать почему не работает панель выбора кабеля из базы данных? Висит ни на какие движения не реагирует, может настроить нужно?

Что именно имеется ввиду под словом висит?

Сообщение от pensioner2007 Товарищ petro_f, каким образом подключить базу данных кабелей?

Проверьте, что в папке "0_LISP" рядом с плагином "PDKFKG.lsp" лежит файл "PDKFKG_cable_base_diameter.txt" .
Тогда и будет Вам счастье.

[pensioner2007]

Добрый день. Висит, это значит висит, ни подвинуть ни записать ничего ничего нельзя (пустой, никаких записей в нем нет), AutoCAD 2018 выключить нельзя, приходится выключать через диспетчер задач. Текстовый файл "PDKFKG_cable_base_diameter.txt" с кабелями лежит рядом в папке O_LISP рядом с плагином "PDKFKG.lsp" и все равно ничего не работает. Может что не так сделал ранее?

[petro_f]

А папка точно названа "0_LISP"? У Вас в начале стоит буква "О", а должна стоять цифра "0".

[pensioner2007]

Добрый день. Совершенно точно стоит 0 (ноль). Павда забыл уточнить, что AutoCAD 2019, это важно?

[petro_f]

Сообщение от pensioner2007 Добрый день. Совершенно точно стоит 0 (ноль). Павда забыл уточнить, что AutoCAD 2019, это важно?

Абсолютно не важно.
Попробуйте полностью "переустановить" плагин, по инструкции. Сначала базовую папку распаковать, а затем добавить в неё новые файлы.

[all1997]

Добрый день!
Подскажите пожалуйста, есть у кого нибудь скрипты LISP для расчет молнезащиты в AUTOCADe?
Или знаете как это сделать?
спасибо!!

[Петр-и-Алекс]

Как сделать, знают многие. Что сделать - только специалисты по молниезащите.

[ПавелВыс]

Я проектировщик электрик. Меня зовут Павел.
Совсем недавно я нашел в сети Вашу программу - PDKFKG.
Это гениально.
Так, как я проектирую мне часто приходится сталкиваться с подобной темой.
У меня уже некоторое время назад зародилась мысль прорисовывать кабельные линии на плане каким то образом этим линиям присваивать определенные данные (марку, массу, диаметр и.д.).
Собственно по этому я и нашел вашу программу...
Ваше решение и набор специальных инструментов идеально.
Скажите пожалуйста на сколько сложно было бы, например при выполнении сечения по определенной трассе получать например разрез лотка, либо кабеля в трубе, гофре, где бы прорисовывались кабели с их диаметрами?
При этом при задании некоторых дополнительных условий с учетом массы и диаметра кабелей, из определенной базы выбирался бы и тип самого лотка.
А также при использовании дополнительных инструментов на планах прорисовался бы сам лоток с углами поворота пересечения и отводов.
Скажу сразу, что лиспы отдельных функций у меня собраны (такие, как вставка блоков в полилинию, вставка блоков в вершину полилинии, вставка блока в пересечение двух полилиний) база кбеленесущих систем есть, база динамических блоков есть и сама логика более менее продумана.

[petro_f]

Сообщение от ПавелВыс Скажите пожалуйста на сколько сложно было бы, например при выполнении сечения по определенной трассе получать например разрез лотка, либо кабеля в трубе, гофре, где бы прорисовывались кабели с их диаметрами?

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

Сообщение от ПавелВыс При этом при задании некоторых дополнительных условий с учетом массы и диаметра кабелей, из определенной базы выбирался бы и тип самого лотка. А также при использовании дополнительных инструментов на планах прорисовался бы сам лоток с углами поворота пересечения и отводов.

Не вижу смысла в этом, так как для лотков есть отдельные готовые программы, которые в итоге кроме "красивых" лотков дадут ещё и готовую спецификацию на них. Забивать же базу ещё лотков, а тем более ещё и блоки, сопряжения лотков, это совсем утяжелит плагин.

P.S. Если интересно, то тут лежит комплект моих плагинов. Ставить можно через инсталятор (сначала инсталятор, потом запустить его и он поставит саму sbugo) либо просто скачать архив и распаковать его как там написано. Хоть это и называется sbugo, но от той сбуги, что лежит в инете набор отличается (лежащая в инете sbugo это малая часть комплекта указанного по ссылке)
В этом наборе sbugo куча плагинов и есть отдельный плагин для электриков (если заинтересует, то дам и сам файл схем однолинейных), который позволяет после отрисовке кабелей забивать получившуюся длину кабеля в однолинейную схему, перерасчитывать проверять сечение кабеля и если оно не подходит, то увеличивает сечение как в схеме, так и в кабелях (на плане). Если будет интересно, маякни.

[ПавелВыс]

Сообщение от petro_f На данный момент плагин умеет создавать расчётную табличку, где подсчитывается (для проектировщика ) какого сечения необходимо подобрать лоток. Так же там идёт расчёт веса кабельной продукции на погонный метр. Как пример смотрите картинку во вложении. Табличку видел-круто ----- добавлено через ~2 мин. ----- P.S. Если интересно, то тут лежит комплект моих плагинов. Ставить можно через инсталятор (сначала инсталятор, потом запустить его и он поставит саму sbugo) либо просто скачать архив и распаковать его как там написано. Хоть это и называется sbugo, но от той сбуги, что лежит в инете набор отличается (лежащая в инете sbugo это малая часть комплекта указанного по ссылке) В этом наборе sbugo куча плагинов и есть отдельный плагин для электриков (если заинтересует, то дам и сам файл схем однолинейных), который позволяет после отрисовке кабелей забивать получившуюся длину кабеля в однолинейную схему, перерасчитывать проверять сечение кабеля и если оно не подходит, то увеличивает сечение как в схеме, так и в кабелях (на плане). Если будет интересно, маякни.

SBUGO не устанавливается почему то...

----- добавлено через ~4 мин. -----
Если будет интересно, маякни.[/quote]

Интересно

[petro_f]

Сообщение от ПавелВыс SBUGO не устанавливается почему то...

Что именно не устанавливается - инсталятор_апдейтер или сам набор плагинов?

----- добавлено через ~23 мин. -----

Сообщение от ПавелВыс Если будет интересно, маякни. Интересно

Запросил у своих напарников (электриков) файл с образцом работы плагина.

[ПавелВыс]

[quote=petro_f;1940837]Что именно не устанавливается - инсталятор апдейтер или сам набор плагинов?


Прошу прощения - все пошло.

[petro_f]

Сообщение от ПавелВыс Прошу прощения - все пошло.

В файле "C:\sbugo\0_Как установить и настроить SBUGO.pdf" написано как донастроить.

[ПавелВыс]

Сообщение от petro_f В файле "C:\sbugo\0_Как установить и настроить SBUGO.pdf" написано как донастроить.

Благодарю разобрался. Огромная база полезных лиспов и программ. В ней жить надо...

А вот по команде создания слайдов вопрос. Это для пополнения базы блоков ?

[petro_f]

Сообщение от ПавелВыс А вот по команде создания слайдов вопрос. Это для пополнения базы блоков ?

Это для плагина который показывает при выборе как выгладят блоки (перед вставкой). Так же для самой сбуги, для визуального отображения картинок и блоков.

[ПавелВыс]

Здравствуйте ! Вы говорили, что у Вас есть файл схем однолинейных для электриков, который позволяет после отрисовки кабелей забивать получившуюся длину кабеля в однолинейную схему, пересчитывать проверять сечение кабеля и если оно не подходит, то увеличивает сечение как в схеме, так и в кабелях (на плане). А вы не могли бы дать посмотреть.

[petro_f]

Ответил в личку.

[ie.spb]

Добрый день!
Что то, наверное, не правильно делаю с чертежами.
Перестала работать команда PDKFKGUPDAT.

Программа допустила ошибку в функции "PDKFKGUPDATE". Ошибка Automation. Ключ не найден

.

[petro_f]

Сообщение от ie.spb Добрый день! Что то, наверное, не правильно делаю с чертежами. Перестала работать команда PDKFKGUPDAT. .

Пришлите образец. По такому сообщению не понять в чем проблемма. Так же версию када напишите.

----- добавлено через 40 сек. -----

Сообщение от ie.spb Добрый день! Что то, наверное, не правильно делаю с чертежами. Перестала работать команда PDKFKGUPDAT. .

А остальные команды плагина работают?

[ie.spb]

Прошу прощения. Понял причину. Необходимо чтобы кабельные блоки находились на слое __АИС_Кабели_блоком. Мною они случайно были перенесены на другой слой.
Программа просто огонь! Спасибо!

[ie.spb]

Доброго дня!
Так привык к Вашей программе, но вот опять сбоит (или, скорее я косячу).

PDKFKGALLMARK Значение должно быть положительным и ненулевым Программа допустила ошибку в функции "PDKFKG-get-export-table". Функция прервана

Или:

PDKFKGEXPTAB_ARRAY Значение должно быть положительным и ненулевым Программа допустила ошибку в функции "PDKFKG-get-export-table". Функция прервана

Остальные команды, например PDKFKG или PDKFKGEXPORT, работают без проблем.
Версия Autocad 2016. Файл прилагаю
Заранее спасибо

[petro_f]

Сообщение от ie.spb Доброго дня! Так привык к Вашей программе, но вот опять сбоит (или, скорее я косячу). Или: Остальные команды, например PDKFKG или PDKFKGEXPORT, работают без проблем. Версия Autocad 2016. Файл прилагаю Заранее спасибо

Здравствуйте.
Проверьте содержимое переменной "USERR1". У Вас там отрицательное значение, а масштабирование не может работать с отрицательным масштабом .
Команды проверки:
(getvar 'USERR1) считать значение
(setvar 'USERR1 1.0) установить значение.

Какую переменную для масштабирования использовать указывается в функции "PDKFKG-scaling-variable-for-plugin-work" в 61 строке плагина.

P.S А лучше поправьте переменную или выберите переменную, которая Вам больше подходит.


Обновил версию плагина в шапке. Текущая версия 18.11.

[ie.spb]

Спасибо, действительно, все теперь работает!

[Taridaks]

Автору спасибо за такой прекрасный плагин.
Вопрос, а можно ли сделать так что бы поля для внесения данных о том как проходит кабель "в лотке", "в штробе" и т.д. сделать настраиваемыми или переименовать ?

[petro_f]

Сообщение от Taridaks Вопрос, а можно ли сделать так что бы поля для внесения данных о том как проходит кабель "в лотке", "в штробе" и т.д. сделать настраиваемыми или переименовать ?

Можно попробовать сделать типа заменяемого значения (на свободном поле). Но это в планах на будущее, как будет время посмотрю, что можно сделать.

[Barmaley Bubusikin]

Подскажите, пожалуйста, какая логика работы с группами кабелей. А то, если выбрать несколько блоков, то в мультивыноске проставится имя только одной группы. Почему нельзя поставить мультивыноску с именами нескольких групп? Или я что-то не замечаю

[petro_f]

Сообщение от Barmaley Bubusikin Подскажите, пожалуйста, какая логика работы с группами кабелей. А то, если выбрать несколько блоков, то в мультивыноске проставится имя только одной группы. Почему нельзя поставить мультивыноску с именами нескольких групп? Или я что-то не замечаю

Ну может стоит лучше посмотреть плагин? Прочитать хелп к нему?
Вы ставите мультивыноску для одного кабеля. Логика выбора такова - ставится имя первого кабеля.
Попробуйте команды:

• Поставить таблицу с именами кабелей PDKFKGALLMARK
• Поставить мвыноску со ссылкой и таблицу с именами кабелей PDKFKGMARKALLMARK
• Поставить таблицу с именами кабелей с мультывыноской PDKFKGALLMARKM
• Поставить мультивыноску с табличкой PDKFKGALLMARKM2
• Поставить мультивыноску с табличкой с уточнением привязки PDKFKGALLMARKM2Q

попробуйте все команды и выберите себе нужную....

[Barmaley Bubusikin]

Сообщение от petro_f Ну может стоит лучше посмотреть плагин? Прочитать хелп к нему?

Не поверите, но так и сделал
Я про группы кабелей (атрибут GROUP_CABEL), а не про имена. Группа проставляется только одна, в отличие от имен

[petro_f]

Сообщение от Barmaley Bubusikin Я про группы кабелей (атрибут GROUP_CABEL), а не про имена. Группа проставляется только одна, в отличие от имен

Если про группы, то я это сделал как дополнение. Мне оно не понадобилось за всё это время, вот и не развил тему
Будет время, добавлю.

[petro_f]

Сообщение от Barmaley Bubusikin Не поверите, но так и сделал Я про группы кабелей (атрибут GROUP_CABEL), а не про имена. Группа проставляется только одна, в отличие от имен

Добавил функционал в версии плагина 18.12.

[Barmaley Bubusikin]

Сообщение от petro_f Добавил функционал в версии плагина 18.12

Спасибо!
Изменил отступы в ячейках в стиле таблицы, текст теперь не влезает А как увеличить ширину ячейки ума не хватило. Подскажите, пожалуйста.
Добавил новые команды в ленту, описания старых немного изменил. Слегка перетасовал пару панелей. Может кому зайдет

[petro_f]

Сообщение от Barmaley Bubusikin Изменил отступы в ячейках в стиле таблицы, текст теперь не влезает А как увеличить ширину ячейки ума не хватило. Подскажите, пожалуйста.

Что именно изменили и что подсказать?

----- добавлено через ~17 мин. -----

Сообщение от Barmaley Bubusikin Добавил новые команды в ленту, описания старых немного изменил. Слегка перетасовал пару панелей. Может кому зайдет

Спасибо. Добавил в файлы загрузки плагина.

[Barmaley Bubusikin]

Сообщение от petro_f Что именно изменили и что подсказать?

Изменил поля в ячейках:
(vla-put-HorzCellMargin PDKFKG_vla_object_id_style_table 0.5) ; устанавливаем горизонтальное поле ячеек отступы
(vla-put-VertCellMargin PDKFKG_vla_object_id_style_table 0.5) ; устанавливаем вертикальное поле ячеек
На скринах по порядку поля 0.2, 0.5 и 1.0 мм. Подскажите, пожалуйста, какой параметр изменить чтобы текст помещался с полями 0,5 мм
И кажется сортировка групп выполняется по номеру кб, на скринах хорошо видно

[petro_f]

Сообщение от Barmaley Bubusikin На скринах по порядку поля 0.2, 0.5 и 1.0 мм. Подскажите, пожалуйста, какой параметр изменить чтобы текст помещался с полями 0,5 мм

Найдите строку

Код:

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

 (setq PDKFKG_temp_size (fix(distance (car (textbox(entget (entlast)))) (cadr (textbox(entget (entlast)))))) ) ; получаем размер текста

строка 10473 для версии 18.12
и замените её на строку

Код:

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

 (setq PDKFKG_temp_size (+ (fix(distance (car (textbox(entget (entlast)))) (cadr (textbox(entget (entlast)))))) 1 ;| размер поля vla-put-HorzCellMargin PDKFKG_vla_object_id_style_table в мм умноженный на 2 |;)) ; получаем размер текста

Добавил комментарий, что бы было понятно.
Только не вижу смысла в этих полях. Места и так мало.

И кажется сортировка групп выполняется по номеру кб, на скринах хорошо видно

Ещё раз напоминаю, что группы это вторично. Во первых, из картинок не понятно какой кабель какую группу и обозначение содержит, и во вторых сортировка в каде это ад и рассчитывать на адекватность её не стоит. Можете отключить флаг принудительной сортировки и попробовать без неё ))) Я уже устал с ней биться...

[ie.spb]

Добрый день!
Не подскажете почему иногда отключаются все привязки? И не включаются потом. Команда PDKFKGALLMARKM2

[petro_f]

Сообщение от ie.spb Не подскажете почему иногда отключаются все привязки? И не включаются потом. Команда PDKFKGALLMARKM2

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

А привязки отключаются при установки новых элементов, если не отключить привязки, то нельзя гарантировать, что элемент окажется на указанном автокаду месте. Спорное решение программистов автодеска... Казалось бы я даю точные координаты места установки нового элемента, но если рядом будет элемент к которому автокад может привязаться, то .... новый элемент игнорирует указанные координаты и "прыгает" на другое место.

[Xamer78]

Сообщение от petro_f В версии [>= V 18.8] Добавил возможность сверить наличие кабелей на чертеже и в таблице. Таблица должна быть стандартной для этого плагина (8 столбцов), которую выгружает из схем плагин. Команда "PDKFKGCHECK".

Здравствуйте!
Скажите пожалуйста, нельзя ли таблицу "допилить" до ГОСТ-овского (ГОСТ 21.608.2014, Форма 6) кабельного журнала, ведь интерфейс создания кабелей позволяет заполнить все графы каб. журнала!?...
Тогда бы Ваша работа имела некий законченный вид.

А вобщем, весьма полезна.

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

Сообщение от petro_f А привязки отключаются при установки новых элементов, если не отключить привязки, то нельзя гарантировать, что элемент окажется на указанном автокаду месте. Спорное решение программистов автодеска... Казалось бы я даю точные координаты места установки нового элемента, но если рядом будет элемент к которому автокад может привязаться, то .... новый элемент игнорирует указанные координаты и "прыгает" на другое место.

Достаточно в команде вставки перед указанием точки добавить "_none", и все. Ну или устанавливать / вставлять / создавать не командными методами.

[petro_f]

Сообщение от Xamer78 Скажите пожалуйста, нельзя ли таблицу "допилить" до ГОСТ-овского (ГОСТ 21.608.2014, Форма 6) кабельного журнала, ведь интерфейс создания кабелей позволяет заполнить все графы каб. журнала!?...

Добрый день. Тут немного принципиальное решение... Дело в том, что в разделах автоматики нет кабельного журнала и этот гост к автоматчикам не имеет отношение. У нас есть таблицы внешних соединений. В ввиду этого принципиально не делают 100% совпадения с данной табличкой.
Электрики если хотят, то сами переделывают под этот гост, благо там чуть чуть допилить осталось.

----- добавлено через ~1 мин. -----

Сообщение от Кулик Алексей aka kpblc Ну или устанавливать / вставлять / создавать не командными методами.

А зачем тогда вообще плагин?

Достаточно в команде вставки перед указанием точки добавить "_none", и все.

Что то не помню что бы помогало. Надо посмотреть, может уже работать стало.

[Xamer78]

Сообщение от petro_f Добрый день. Тут немного принципиальное решение... Дело в том, что в разделах автоматики нет кабельного журнала и этот гост к автоматчикам не имеет отношение. У нас есть таблицы внешних соединений. В ввиду этого принципиально не делают 100% совпадения с данной табличкой. Электрики если хотят, то сами переделывают под этот гост, благо там чуть чуть допилить осталось.

Понимаю, что может быть Вам достаточно сделанного, есть другие дела, идеи и т.п.
На мой взгляд, ваш плагин был бы более востребован, если бы отчетные формы (таблицы) имели бы КОНКРЕНТНЫЕ ФОРМЫ. Да, для автоматики нет определенной формы, нет УГО и т.п., поэтому "рисуют" что кому понравится. Но это не совсем правильный подход.
И дело не в том, что мне удобнее использовать пресловутую форму 6, поэтому провоцирую вас...
Законченная форма отчета как раз и могла бы иметь вид формы 6, т.е. "пилить" дополнительно ничего бы и не требовалось.
Но все равно, благодарю за работу, частично буду использовать.
Успехов!

[petro_f]

Сообщение от Xamer78 На мой взгляд, ваш плагин был бы более востребован, если бы отчетные формы (таблицы) имели бы КОНКРЕНТНЫЕ ФОРМЫ. Да, для автоматики нет определенной формы, нет УГО и т.п., поэтому "рисуют" что кому понравится. Но это не совсем правильный подход.

Коллега, а чем Вам не нравится выдаваемый плагином кабельный журнал для прокладки методом трасс по форме 7 ГОСТ 21.613-2014? (команда PDKFKGEXPORT )

Чем он Вам не подходит то?

[ie.spb]

Добрый день.
В процессе активной эксплуатации Вашей программы, возникла еще одна проблема. Через некоторое время перестают работать контекстные меню. Причем все. Помогает только перезагрузка.

[petro_f]

Сообщение от ie.spb Добрый день. В процессе активной эксплуатации Вашей программы, возникла еще одна проблема. Через некоторое время перестают работать контекстные меню. Причем все. Помогает только перезагрузка.

А можно более точный пример привести, что перестаёт работать? (Гифку записать или видео). Просто ни у кого такого нет, интересно посмотреть....

[ie.spb]

Да, честно сказать, там записывать то и нечего. Просто они перестают работать

[petro_f]

Сообщение от ie.spb Да, честно сказать, там записывать то и нечего. Просто они перестают работать

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

P.S. "В процессе активной эксплуатации" это сколько часов подряд? Тут на днях "прокладывал" кабели порядка 85..90 шт. и такого эффекта не наблюдал. А так вроде часа 2 провозился, пока лотки и прочую лабуду оформлял.

[ie.spb]

Скорее всего все таки звезды. Если у всех работает нормально. Но на всякий случай помогает, понятное дело, перезагрузка автокада.

[AlexGRInj]

Доброго дня.Подскажите,когда ставлю выноску отображется высота текста не 200,а 2000 и получается выноска перекрывает весь план.Это мультивыноска с названем блока.Не понимаю как высоту выноски при вставке поменять

[petro_f]

Сообщение от AlexGRInj Доброго дня.Подскажите,когда ставлю выноску отображется высота текста не 200,а 2000 и получается выноска перекрывает весь план.Это мультивыноска с названем блока.Не понимаю как высоту выноски при вставке поменять

Добрый день.

При старте плагина меняются или проверяются следующие переменные:
USERR1 - проверяется что не равна 0.0 Отключить можно закомментировав или удалив строку 6 в файле PDKFKG.mnl по пути C:\PDKFKG
DIMSCALE - проверяется что не равна 0.0 Отключить можно закомментировав или удалив строку 7 в файле PDKFKG.mnl по пути C:\PDKFKG
CANNOSCALEVALUE - проверяется что не равно 0.0 Отключить можно закомментировав или удалив строку 8 в файле PDKFKG.mnl по пути C:\PDKFKG

[AlexGRInj]

Спасибо.Работает.Теперь проблема с загрузкой из базы перечня кабелей.Просто висит окно и автокад можно закрыть только через диспетчер задач

[AlexGRInj]

Спасибо.Теперь проблема в закрузке журнала кабелей ,просто висит как и писали ранее.Намертво.закрыть автокад получается только через диспетчер.Автокад2019

[petro_f]

Сообщение от AlexGRInj писали ранее.

Где и кто писал?
Офис установлен или журнал выгружается в Кад?

[AlexGRInj]

Сообщение от petro_f Где и кто писал? Офис установлен или журнал выгружается в Кад?

Офис активирован.А писал раньше чел,что у него виснет при подгрузке списка кабелей,журнала.Также и у меня в 2019 -м,загружает через панель-висит,загружаешь при создании блока-опять виснет.на 2017-м каде все работало.

[petro_f]

Сообщение от AlexGRInj Офис активирован.А писал раньше чел,что у него виснет при подгрузке списка кабелей,журнала.Также и у меня в 2019 -м,загружает через панель-висит,загружаешь при создании блока-опять виснет.на 2017-м каде все работало.

Там вроде бы выяснили в чём была причина. (вроде не в плагине) Почитайте сообщения или киньте ссылку на его посты.

[AlexGRInj]

Сообщение от petro_f Там вроде бы выяснили в чём была причина. (вроде не в плагине) Почитайте сообщения или киньте ссылку на его посты.

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

[petro_f]

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

Попробуйте удалить у себя файл "PDKFKG_user_cable_base_diameter.txt" в папке плагина. Может у Вас там кабель совпадает с новыми добавленными кабелями. Я не делал проверки на это.
Сейчас специально залил файлы версии 18.12 с сайта, загрузил и всё пашет.
Надо более точно понять что за ошибка (если она есть).
Попробуйте просто с нуля переустановить плагин. Стереть всю папку, установить по новой исходник и обновления. После загрузить и настроить плагин.

[AlexGRInj]

Доброго дня.Более менее разобрался со всем.Последняя просьба:можно добавить ли позицию "Кабеля в нише (м)".Мне как слаботочнику нужная эта позиция дополнительно.Заранее спасибо

[petro_f]

Сообщение от AlexGRInj Доброго дня.Более менее разобрался со всем.Последняя просьба:можно добавить ли позицию "Кабеля в нише (м)".Мне как слаботочнику нужная эта позиция дополнительно.Заранее спасибо

Что за вариант прокладки "Кабеля в нише (м)" - дайте на него ссылку по ПУЭ или СП. Кабель в нише всё равно не кладётся открыто. Он должен быть защищён чем либо.

"Более менее разобрался со всем" - что именно было? Напишите, буду знать как эти ошибки устранять.

[AlexGRInj]

Это хотелки белорусской экспертизы)просто иногда индивидам хочется видеть разделения во всем))я уже по "коду" понял,что потребует время ...а это потраченное в пустую.Ну а если по делу,то "снос" и переустановка по новой плагина не помог.Автокад2019 при подгрузке журнала кабелей виснет из версии 18.12.(т.е при замене основного файла "PDKFKG.lsp" из архива версии 18.12) на других версиях када не пробовал.

[petro_f]

Сообщение от AlexGRInj Это хотелки белорусской экспертизы)просто иногда индивидам хочется видеть разделения во всем))я уже по "коду" понял,что потребует время ...а это потраченное в пустую.Ну а если по делу,то "снос" и переустановка по новой плагина не помог.Автокад2019 при подгрузке журнала кабелей виснет из версии 18.12.(т.е при замене основного файла "PDKFKG.lsp" из архива версии 18.12) на других версиях када не пробовал.

Для загрузки плагина в AutoCAD необходимо распаковать архив PDKFKG.rar в корневую директорию диска C: (если Вы хотите распаковать в другую директорию, то не забудьте внести эти изменения в перечисленные выше файлы) и из получившейся папки C:\PDKFKG всего один раз загрузить файл загрузки плагина 0_PDKFKG_LOAD.lsp.

Кстати поправил плагин, теперь при отсутствии доступа в к файлу базы данных кабеля не будет зависать, а будет извещать и не открывать это окно выбора.

[petro_f]

Добавил кабели в базу плагина. отдельно не стал обновлять, так как позже будет обнова плагина и эти кабели там уже будут.
Кабели КПЭПнг(А)-HF и ParLan.

[petro_f]

Обновил плагин в шапке темы.

[Taridaks]

Пользуюсь вашим плагином как для зданий так и для открытых площадок. Если делать все в масштабе, то проблем особых не возникает. Но вот решил сделать проект в масштабе 1:1. Начались проблемы с маркировкой кабель, таблички очень маленькие и портативность на них не работает. Аннотативность не помогает, если менять размер стиля текста, то таблицы плывут.

[petro_f]

Сообщение от Taridaks Пользуюсь вашим плагином как для зданий так и для открытых площадок. Если делать все в масштабе, то проблем особых не возникает. Но вот решил сделать проект в масштабе 1:1. Начались проблемы с маркировкой кабель, таблички очень маленькие и портативность на них не работает. Аннотативность не помогает, если менять размер стиля текста, то таблицы плывут.

При старте плагина меняются или проверяются следующие переменные:
USERR1 - проверяется что не равна 0.0 Отключить можно закомментировав или удалив строку 6 в файле PDKFKG.mnl по пути C:\PDKFKG
DIMSCALE - проверяется что не равна 0.0 Отключить можно закомментировав или удалив строку 7 в файле PDKFKG.mnl по пути C:\PDKFKG
CANNOSCALEVALUE - проверяется что не равно 0.0 Отключить можно закомментировав или удалив строку 8 в файле PDKFKG.mnl по пути C:\PDKFKG
MENUBAR - переводится в 1 для отображения строки плагина. Отключить можно закомментировав или удалив строку 9 в файле PDKFKG.mnl по пути C:\PDKFKG

Выставьте переменную в нужный масштаб и всё будет ок.

[shartal]

Добрый день. В 2019 все работает, в 2011 есть проблемы. Команда Создание кабеля блоком дает ошибку:
Один объект перенесен на слой __АИС_Кабели_блоком (текущий слой).
Программа допустила ошибку в функции "PDKFKG-create-block-of-cabel-in-layout".
неверная функция: COMMAND-S; ошибка: В функции *error* возникла ошибка:неверная
функция: COMMAND-S"
Объект при этом на слой переносится.
Но в ком строке пропадает слово Комманда: Появляется только после перезагрузки акада.

И в каждом новом чертеже при вызове этой команды появляются окна ошибки.

[Сергей812]

Сообщение от shartal в 2011 есть проблемы

вроде только с 2014 акада появилась версия команды COMMAND-S.

[petro_f]

Сообщение от shartal Добрый день. В 2019 все работает, в 2011 есть проблемы.

Добрый день. Прочтите название темы до конца, внимательно.