| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > План кабельных сетей - алгоритм автоматизации построения и программирование?

План кабельных сетей - алгоритм автоматизации построения и программирование?

Ответ
Поиск в этой теме
Непрочитано 20.09.2010, 11:59 4 |
План кабельных сетей - алгоритм автоматизации построения и программирование?
Frigate
 
КИП, АСУ ТП, слаботочка
 
Москва-Тюмень
Регистрация: 02.09.2010
Сообщений: 422

Добрый день, коллеги!


Программу ADV_Toolkit ver 1.1 вы можете скачать внизу этого сообщения.

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

ПЕРВОНАЧАЛЬНЫЙ МОЙ ПОСТ===============================
Занимаюсь КИП и решил постепенно автоматизировать рутинные процессы проектирования.
Нужно: автоматизировать некоторые моменты создания плана кабельных сетей.
Дано: план эстакад, который берем у электриков. Таким образом, графическое представление плана трасс есть. На плане есть много позиций (блок-боксы, здания, площадки технологические), от которых кидаем кабель. ТО, что внутри площадок и блок-боксов нас пока не интересует - это делаем отдельными комплектами, попозиционно.
Итак, к примеру, от позиции 1 надо проложить 5 кабелей с маркировкой С1-1-1...С1-1-5 по уже имеющимся эстакадам (линиям).

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

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


Была сначала такая идея:
по имеющемуся плану кабельных сетей мышкой прощелкать все узлы (повороты, начало и конец) трассы, например, от позиции 1 до позиции 15 (в позиции 15 будет операторная, где стоят шкафы АСУ). Автокад должен запомнить трассу (напр., по указанным узловым точкам построить полилинию и ассоциировать ее с определенным номером кабеля (напр., С1-1-1), т.е она должна будет обозначать трассировку кабеля на плане.
Сначала хотел создать блок, напр. cable-trace с атрибутом - номером кабеля. В этот блок программно включить полилинию, обозначающую трассу. Но потом уже дошло :-) что полилиния, обозначающая трассировку кабеля С1-1-1 включится во все вхождения блока, а это уже мягко говоря не то ))). Вот и сижу пока в тупике, пытаюсь придумать другие варианты.

Буду рад идеям знающих

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

КОНЕЦ ПЕРВОНАЧАЛЬНОГО ПОСТА=========================================

ОБНОВЛЕНИЯ:

===============================
Выкладываю релиз 1.05 ADV_CAD

Версия 1.05. Изменения:

1) При импорте БД в схему внешних выводить инфу о недостающих кабелях один раз списком/ (было – предупредительным сообщение АВТОКАДа).
2) Поменял методику расчета длины трассы при создании и редактировании добавил более понятные комментарии при трансляции баз данных и установки длин.
3) Добавил более понятные комментарии при трансляции баз данных и установке длин кабелей (вывод имен файлов, с которых была произведена трансляция, вывод имен всех файлов, с которых транслирована информация о кабелях.
4) Сделал по кнопке проверку транслированной информации – доступна из любого чертежа, не только из плана трасс.

ДОПОЛНЕНИЕ:

- исправил неверную работу программы "Редактирование трассы кабеля": при входе в программу, но досрочном выходе из нее(по указанию <Выход из программы>), изменений в базу не вносилось (так и должно быть), но сама трасса удалялась из базы данных!

необходимо заменить в скачанном архиве файл
adv-programme-cable-routings-edit-one.fas
на новый, который находится в архиве
adv-programme-cable-routings-edit-one.rar

Релиз 1.10

Все практически сделано с нуля. Так что нет особого смысла описывать изменения.
Теперь в папке с программой ЕСТЬ HELP.
Просто скопируйте к себе на комп и распакуйте архив в корневой каталог диска C:.
В HELP есть описание дальнейшей установки, которое сводится (в самом простом варианте) к загрузка fas-модуля, выполняющего настройку AutoCADа.


ADV_Toolkit ver. 1.1

Изменений много.
Основное:
- автоматическая трассировка кабеля по указанным начальной и конечной точке. Более подробно - читайте в Хелпфайле в папке ADV_CAD_HELP (эту папку еще не переименовал, оказывается ). Важно: если у вас поменялась хоть как-нибудь трасса, то для корректной автотрассировки нужно нажать кнопку "Подготовить к трассировке" в диалоговом окне создания кабелей.
- создание кабелей при помощи диалогового окна. В будущем все программы будут переведены в режим диалога. Это преследовало целью уход от указания блоков кабеля на чертеже, а выбор из списка. ТОже немного подробнее читайте в хелпе.
- немного переделал блоки, теперь длина в блок кабеля вставляется сразу с суффиксом - ВНИМАНИЕ!!!
- на подкачке стоят программы из форума - перенумерация по renum, записная книжка - по NBOOK и NBOOK1 - вызов через комстроку.
- начал работу с БД изделий, пока сделал парочку кранов-вентилей (закладные конструкции) для КИПиА - по крайней мере там. где я работал, мы часто сами учитывали закладные, иногда - технологи.

Главное - хочется, чтобы вы потестили автотрассировку. Я ее гонял во всех режимах - было все ок. Но мало ли... Ну и сам диалог создания кабелей с кучей функций, сохранением настроек диалога на время сеанса - тоже стоило непало усилий.

В общем, жду конструктивной критики и пожеланий по тем моментам, что дополнил в программе

Дополнение - подредактировал программку создания трассы по аналогу. Скачайте лисп-файл и замените им такой же в папке с прогой. Теперь работает как надо! :-)

Дополнение от 21.04.2012:
добавил программку для массовой печати чертежей. Я о ней уже писал в теме, но сейчас выкладываю новую версию, где можно выбрать и самому указать стиль печати - монохром или акад (т.е. цветной) или свой стиль. Справка - в файле readme.txt

ПРограммка - в папке PRINT FORMATS, внутри папки ADV_Toolkit. Но - может работать без проги (сделана независимой).

Дополнение от 16.05.2013:

Прога печати (в архиве PRINT FORMTS_dyn.rar) теперь с динблоком моей новой рамки (саму рамку можно подгонять как вам угодно, лишь только оставьте имя блока и атрибут FORMAT, по которому прога определяет нужный формат листа печатающего устройства.

Вложения
Тип файла: rar ADV_Toolkit_ver.1.1.rar (2.39 Мб, 2585 просмотров)
Тип файла: lsp adv-programme-cable-routings-create-by-analogue.lsp (6.3 Кб, 1571 просмотров)
Тип файла: rar PRINT FORMATS.rar (6.1 Кб, 1157 просмотров)
Тип файла: rar PRINT FORMATS_dyn.rar (41.0 Кб, 816 просмотров)


Последний раз редактировалось Frigate, 16.05.2013 в 01:36.
Просмотров: 287960
 
Непрочитано 21.02.2014, 11:46
#561
WST


 
Регистрация: 21.04.2011
Сообщений: 135


Frigate,
Цитата:
Сообщение от Frigate Посмотреть сообщение
допустим, выделю отдельной командой. Нужно будет оставить возможность указания числа столбцов или строк перед вставкой перечня? Вообще этим кто-нибудь пользуется?
я все время этой возможностью пользуюсь, все зависит от места куда вставляем выноски, и в моем примере это видно.

Цитата:
Сообщение от Frigate Посмотреть сообщение
Проанализировал твой план. Вставка по уже имеющемуся алгоритму "поток" мне кажется наиболее верная для тебя - наглядность вставки полная. Кое-что добавлю в прогу для упрощения читаемости схемы при работе в электронном варианте (в акаде). Увидишь.
Я же просто предложил и не настаиваю на изменения алгоритма и я же писал если это только для меня то не теряй время займись чем то более важным для тебя.
WST вне форума  
 
Непрочитано 21.02.2014, 12:19
#562
Nikolay 2


 
Регистрация: 27.02.2008
Сообщений: 140


Цитата:
Сообщение от Frigate Посмотреть сообщение
Вообще этим кто-нибудь пользуется?
Этот функционал нужен, без него даже не представляю как вставить перечень, он бывает иногда очень солидный. Без разбивки на столбцы перед вставкой будет не удобно.
Nikolay 2 вне форума  
 
Автор темы   Непрочитано 25.02.2014, 15:19
#563
Frigate

КИП, АСУ ТП, слаботочка
 
Регистрация: 02.09.2010
Москва-Тюмень
Сообщений: 422


WST,

лови файлик.

Там подкорректированная прога автотрассировки. Учтены дуги. И еще допфункция для осчета дуг.
В общем, подгрузи этот файл .fas (Приложение-Загрузить) и попробуй автоматом проложить кабель от нач. до конечн. точки. Не забудь, что дуга должна быть тоже в слое adv_trace_layer.

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

Думаю, у тебя тоже заработает.
Изображения
Тип файла: jpg трасса с дугами.JPG (135.1 Кб, 1021 просмотров)
Вложения
Тип файла: rar автотрассировка с отрезками и дугами.rar (1.9 Кб, 113 просмотров)
Frigate вне форума  
 
Непрочитано 25.02.2014, 15:49
#564
WST


 
Регистрация: 21.04.2011
Сообщений: 135


Frigate, что то не работает вот что пишет
Трасса создается для кабелей:
"H2-1"
Выберите начальную точку трассы <Выход>:
Начальная точка указана.
Выберите конечную точку трассы <Выход>:
Конечная точка указана.
Трасса не может быть создана - нет связи между начальной и конечной точками
трассы.
Изображения
Тип файла: jpg 1.JPG (83.5 Кб, 991 просмотров)
WST вне форума  
 
Автор темы   Непрочитано 25.02.2014, 15:52
#565
Frigate

КИП, АСУ ТП, слаботочка
 
Регистрация: 02.09.2010
Москва-Тюмень
Сообщений: 422


построй самый простой вариант - отрезок-дуга-отрезок. И от начала до конца соедини. Так проверишь работает ли с дугой.

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

Последний раз редактировалось Frigate, 25.02.2014 в 16:06.
Frigate вне форума  
 
Непрочитано 25.02.2014, 15:56
#566
WST


 
Регистрация: 21.04.2011
Сообщений: 135


Frigate, пробовал тоже самое пишет
WST вне форума  
 
Автор темы   Непрочитано 25.02.2014, 16:10
#567
Frigate

КИП, АСУ ТП, слаботочка
 
Регистрация: 02.09.2010
Москва-Тюмень
Сообщений: 422


работает только тогда, когда ты после первой попытки автотрассировки еще раз подгружаешь новые мои файлы

----- добавлено через ~7 мин. -----
если не будет получаться - кидай мне свой файл

----- добавлено через ~10 мин. -----
у тебя так пишет, потому что новый файл загружается раньше, а потом подгружается вновь - заменяется старым.
ПОпробуй после неудачной автотрассировки загрузить новый файл .fas. Затем еще раз попробуй в самом простейшем варианте. Если не сработает - кидай мне файл.
Frigate вне форума  
 
Непрочитано 25.02.2014, 16:21
#568
WST


 
Регистрация: 21.04.2011
Сообщений: 135


Вот

Command: (if (null C:adv-programme-cable-routings-create-cables)(load
"adv-programme-cable-routings-create-cables"))
nil

Command: adv-programme-cable-routings-create-cables

Масштабный коэффициент: 100. Умножающий коэффициент: 1.06
Трасса создается для кабелей:
"H2-1"
Выберите начальную точку трассы <Выход>:
Начальная точка указана.
Выберите конечную точку трассы <Выход>:
Конечная точка указана.
Трасса не может быть создана - нет связи между начальной и конечной точками
трассы.

Command:
Command:
ADV-PROGRAMME-CABLE-ROUTINGS-CREATE-CABLES
Масштабный коэффициент: 100. Умножающий коэффициент: 1.06
Вы вышли из программы.

Command:
Command:
Command:
Command: _appload автотрассировка с отрезками и дугами.FAS successfully loaded.


Command:
Command:
Command:
Command:
Command: (if (null C:adv-programme-cable-routings-create-cables)(load
"adv-programme-cable-routings-create-cables"))
nil

Command: adv-programme-cable-routings-create-cables

Масштабный коэффициент: 100. Умножающий коэффициент: 1.06
Трасса создается для кабелей:
"H2-1"
Выберите начальную точку трассы <Выход>:
Начальная точка указана.
Выберите конечную точку трассы <Выход>:
Конечная точка указана.
Трасса не может быть создана - нет связи между начальной и конечной точками
трассы.

Command:
Command:
ADV-PROGRAMME-CABLE-ROUTINGS-CREATE-CABLES
Масштабный коэффициент: 100. Умножающий коэффициент: 1.06
Трасса создается для кабелей:
"H2-1"
Выберите начальную точку трассы <Выход>:
Начальная точка указана.
Выберите конечную точку трассы <Выход>:
Конечная точка указана.
Трасса не может быть создана - нет связи между начальной и конечной точками
трассы.

файл отправил
WST вне форума  
 
Автор темы   Непрочитано 25.02.2014, 16:26
#569
Frigate

КИП, АСУ ТП, слаботочка
 
Регистрация: 02.09.2010
Москва-Тюмень
Сообщений: 422


дома гляну тогда со старой версией, как работает

----- добавлено через ~2 мин. -----
наскоком не получилось, нужно потестить в старой версии. В новой работает без траблов.

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

----- добавлено через ~6 мин. -----
да, все, понял - надо старуюб версию смотреть. У тебя не пропечатываются фразы из новой функции. Возможно, ее вообще раньше не было... Уже не помню.
Frigate вне форума  
 
Автор темы   Непрочитано 27.02.2014, 18:55
#570
Frigate

КИП, АСУ ТП, слаботочка
 
Регистрация: 02.09.2010
Москва-Тюмень
Сообщений: 422


WST,

ПОдгружай мою доп. прогу после открытия файла. Попробуй все то же самое, но с ТОЛЬКО ЧТО открытым файлом или нажми при создании кабеля на кнопку "подготовить к автотрассировке".
Для проверки можешь набрать в ком строке
Код:
[Выделить все]
!*vertices_pts*
. Если значение этой глобальной переменной nil, тогда при автотрассировке у тебя в текстовом окне команд будет фраза
Цитата:
Подготовка к автотрассировке завершена
Только в этом случае прога работает. Еще буду в текстовом окне фразы:
Цитата:
Укажи участки кабельной трассы на плане для автотрассировки:
и
Цитата:
Число участков по новой проге:
Это свяфзано с тем, что я поменял лишь одну функцию, которая собирает в матрицу все точки на трассе. Чтобы запустить эту функцию, нужно нажать кнопку "ПОдготовить к автотрассировке".
Все должно работать. Это совершенно точно!
Frigate вне форума  
 
Непрочитано 03.03.2014, 12:14
#571
WST


 
Регистрация: 21.04.2011
Сообщений: 135


Frigate, прошу прощения уезжал и небыла доступа к компьютеру с твоей программой. Все заработала! спасибо тебе огромное. Эта же сколько я теперь времени сэкономлю!
WST вне форума  
 
Автор темы   Непрочитано 03.03.2014, 13:46
#572
Frigate

КИП, АСУ ТП, слаботочка
 
Регистрация: 02.09.2010
Москва-Тюмень
Сообщений: 422


WST,

рад помочь
Frigate вне форума  
 
Непрочитано 12.03.2015, 09:33
#573
firefigher


 
Регистрация: 22.03.2013
Сообщений: 8


Frigate, День добрый!
возникли трудности с Вашим детищем в AutoCad 2015. не удается установить
Команда: _.CUIUNLOAD
Введите имя группы адаптации для выгрузки:adv_toolkit
Неизвестная группа адаптации: adv_toolkit
Команда: _.CUIUNLOAD
Введите имя группы адаптации для выгрузки:adv_cad
Неизвестная группа адаптации: adv_cad
Команда: _.CUILOAD
Введите имя файла адаптации, который необходимо загрузить: adv_toolkit
Введите имя файла адаптации, который необходимо загрузить:
ADV_Toolkit успешно загружен и настроен.
Введите имя файла адаптации, который необходимо загрузить:
Команда: _.-WSSAVE
Введите имя файла адаптации, который необходимо загрузить: Имя файла не может быть пустым
Введите имя файла адаптации, который необходимо загрузить: _y
Введите имя файла адаптации, который необходимо загрузить: _.CUIUNLOAD
Введите имя файла адаптации, который необходимо загрузить: adv_toolkit
Введите имя файла адаптации, который необходимо загрузить: _.CUIUNLOAD
Введите имя файла адаптации, который необходимо загрузить: adv_cad
Введите имя файла адаптации, который необходимо загрузить: _.CUILOAD
Введите имя файла адаптации, который необходимо загрузить: adv_toolkit
Введите имя файла адаптации, который необходимо загрузить:
ADV_Toolkit успешно загружен и настроен.
Введите имя файла адаптации, который необходимо загрузить:
Команда:
Введите имя файла адаптации, который необходимо загрузить: *Прервано*

а я уже так привык к хорошему что уже сложновато без ADV_Toolkit.
firefigher вне форума  
 
Автор темы   Непрочитано 12.03.2015, 18:04
#574
Frigate

КИП, АСУ ТП, слаботочка
 
Регистрация: 02.09.2010
Москва-Тюмень
Сообщений: 422


приветствую!

Могу посоветовать использовать программу _.CUILOAD в командной строке. Или через диалог "Адаптация интерфейса пользователя" загрузить файл частичной адаптации adv_toolkit.cuix.
Если получилось, то нужно самостоятельно добавить папку ADV_Toolkit на диске C: в пути вспомогательных файлов при помощи диалогового окна Настроек.

Хотя может в 2015 есть свои тонкости в использовании доп. меню. Такого акада нет, проверить не смогу.


Интересно - какие функции программы используете в основном, каким образом?
Frigate вне форума  
 
Непрочитано 13.03.2015, 07:28
#575
firefigher


 
Регистрация: 22.03.2013
Сообщений: 8


Спасибо!!!
в ручном режиме
много много раз нажал что я доверяю данному продукту, и все заработало))

в основном использую ВСЕ. кроме трубной арматуры)))
очень облегчает подсчет кабельной продукции!!!

----- добавлено через ~2 мин. -----
обнаружил одно неудобство данного метода установки

При новом открытии автокада приходится по новой прошелкивать кнопочку что я доверяю данной программе

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

Вся проблема установки ADV_Toolkit заключается в системе безопасности автокада2015. причина внедрения этой системы это вредоносное ПО

Принцип установки.
отключить системе безопасности автокада 2015. команда SECURELOAD и меняем 1 на 0.
далее устанавливаем как обычно.

Последний раз редактировалось firefigher, 13.03.2015 в 10:03.
firefigher вне форума  
 
Непрочитано 13.03.2015, 08:42
#576
trushev


 
Регистрация: 12.01.2015
Сообщений: 261


Цитата:
Сообщение от firefigher Посмотреть сообщение
отключить системе безопасности автокада 2015. команда SECURELOD и меняем 1 на 0.
Или влючить в "Доверенное местоположение". (Настройки-Файлы).
trushev вне форума  
 
Непрочитано 13.03.2015, 08:49
#577
firefigher


 
Регистрация: 22.03.2013
Сообщений: 8


Цитата:
Сообщение от trushev Посмотреть сообщение
Или влючить в "Доверенное местоположение". (Настройки-Файлы).
пробовал. у меня не получилось. при каждом запуске акада выподает окно " Загрузка файлов-предупреждение системы безопасности"
firefigher вне форума  
 
Непрочитано 13.03.2015, 09:46
#578
trushev


 
Регистрация: 12.01.2015
Сообщений: 261


Цитата:
Сообщение от firefigher Посмотреть сообщение
у меня не получилось.
Путь с именем папки, где размещена программа, завершить флешем с троеточием - \...
trushev вне форума  
 
Непрочитано 13.03.2015, 09:46
#579
gomer

строю, ломаю
 
Регистрация: 03.04.2008
Украина
Сообщений: 5,515


Цитата:
Сообщение от firefigher Посмотреть сообщение
команда SECURELOD и меняем 1 на 0.
SECURELOAD если быть точным
gomer вне форума  
 
Непрочитано 13.03.2015, 10:02
#580
firefigher


 
Регистрация: 22.03.2013
Сообщений: 8


Цитата:
Сообщение от trushev Посмотреть сообщение
Путь с именем папки, где размещена программа, завершить флешем с троеточием - \...
спасибо так работает

----- добавлено через 58 сек. -----
[quote=gomer;1380958]SECURELOAD если быть точным[/QU

----- добавлено через ~2 мин. -----
Цитата:
Сообщение от gomer Посмотреть сообщение
SECURELOAD если быть точным
точно

поправил
firefigher вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > План кабельных сетей - алгоритм автоматизации построения и программирование?

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Посоветуйте программу для построения профилей наружных сетей? dextron3 Вертикальные решения на базе AutoCAD 18 11.03.2012 16:37
Сводный план сетей proekt_mep Инженерные сети 42 16.06.2011 23:09
Ищу книгу "Проектирование кабельных сетей и проводок" под редакцией Г.Е.Храпченко 1980 Инзиля Поиск литературы, чертежей, моделей и прочих материалов 8 03.02.2009 14:47