Обмениваемся своими макросами

[Arsie]

Складывайте сюда макросы, которыми решили поделиться

Не забываем о существовании "заводской" библиотеки макросов!


PS. Уважаемые клиенты. Все представленные макросы никакого отношения к фирме Segnetics не имеют и никак не тестировались нашими специалистами.

Не нужно нам задавать вопросы по их работе. Задавайте эти вопросы авторам макросов.

[WhiteM]

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

[Sergeevich_1]

Макрос генерирует последовательность псевдо-случчайных нормальнораспределенных величин.
Имеет три входа: u0 - числовой вход, нулевой член последовательности [0,65535], ^Next - по фронту сигнала осуществляется расчет значения очередного члена последовательности от предыдущего значения, ^Reset - по фронту сигнала генератор расчитывает значение очередного члена последовательности от значения u0.
Имеет один числовой выход Out со значением очередного члена последовательности.

Практически потребность в макросе может возникать при тестировании некоторых решений.

[Sergey Cherevko]

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

[max]

Макрос для работы с журналом
Можно вводить 6 различных сообщений и 30 разных аварий + звонок

Сообщение или авария всегда запишутся в память, даже если появились одновлеменно.

Возможно расширение количества аварий


N_av - номер аварии (к макросу журнал)
Готов (от макроса журнал)

[01zzz]

Макрос управления спаркой насосов. Смотрит за перепадом давления и минимальным давлением на входе.

[01zzz]

Следит за давлением на входе и за перепадом давления. авария перепад давления запоминается.
http://shrelec.narod.ru/RMK/pump.msl

[01zzz]

Постраничный вывод значения. У меня организован для вывода значений датчиков. Листание - клавиша вниз.

[01zzz]

Управление двумя котлами
при поступлении команды пуск, запускается один котел,
с него поступает сигнал работа, если он не снимается в течении времени Т,
то считаем, что мощности одного котла не хватает (у нас неттемпературы обратной воды для анализа,
и в работу включается второй котел. Аварии котлов не запоминаем.
Входы
pusk - команда запуска
pumpready1 - готовность котлового насоса 1 (если нет, то на входе поставьте 1)
pumpready2 - готовность котлового насоса 2 (если нет, то на входе поставьте 1)
av_pump1 - авария насоса 1 (например макрос pump, если не путаю, я через "или" еще подавал сигнал "сухой ход")
av_pump2 - авария насоса 2
gor1 - горелка 1 в работу
gor2 - горелка 2 в работу
av_gor1 - ав.горелки 1
av_gor2 - ав.горелки 2
klick - импульс смены рабочего котла
time - (тики) время поистечении которого елси котел не согрелся
(не пропал сигнал работа, учитывайте особенности своего котла, может работать не корректно, )
то врубаем оба котла
tdelay - задержка выключения котловых насосов
оба в работу - дёт сигнал на включение на обе горелки сразу (например полезно в режиме наладки
да и вообще, если катавасии с чередованием не нужно, а нужно тупо врубать в работу оба котла)

Выходы
gor1 - горелка 1 в работе
gor2 - горелка 2 в работе
av_gor1 - ав.горелки 1
av_gor2 - ав.горелки 2
pusk_pump1 - пуск насоса котла1
pusk_pump2 - пуск насоса котла2
Насосы выключаются с задержкой. Выход этого макроса я посылал на макрос pump (выложен ранее)

[01zzz]

График температуры (tграф=f(tнар)
Прямая Y=kx+a
Входы
T1 при -20 на улице
Т2 при +15 на улице
Тstreet - воздух на улице

Выход
Tgraf

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

[Sergey Cherevko]

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

[ViS]

Макрос меню состояния входов/выходов Пикселя.

[ViS]

И еще раз входы/выходы Пикселя.
Альтернативная замена "конструкторскому" меню, вызываемому по F3 для Пикселя. (Живет в блоке "Основной экран" под именем "%")
Показывает состояние входов/выходов.

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

[Sergey Cherevko]

В дополнение темы "Управление пикселем через интернет".
Чтобы кто попало по известному IP-адресу не изменял уставки в контроллере, они блокируются кодом доступа. Код-запрос постоянно меняется, код-ответ вычисляется клиентским приложением как полином запроса. Для кулхацкеров защита более чем достаточная.
В прицепе:
- проект SMLogix для Пикселя;
- экспортированная из SMLogix карта modbus-переменных проекта;
- файл конфигурации для Lectus OPC/DDE сервера;
- демо-клиент на основе таблички Excel.
Для наглядности полином рассчитывается и в Лектусе в составной переменной Code_calc, и в Экселе на листе "Вычисления".
Пользуйтесь на здоровье...

[Сергей_М]

Всё просто. Управление подсветкой дисплея 2G.

[Arsie]

Цитата:

Сообщение от Сергей_М

Всё просто. Управление подсветкой дисплея 2G.

У вас так сделано, что после активирования внешнего запуска подсветка никогда не погаснет.

[coverart]

Цитата:

Сообщение от Arsie

После активирования внешнего запуска подсветка никогда не погаснет.


PS. Нафига её вообще гасить-то? Ладно бы от батареек работали

Энергосбережение епт (а скоро и соцнорма)
Но по любому нужная фича

[1exan]

Еще один график, на четыре точки, можно урезать до линейного (выкинуть блок выбора диапазона).

[Max2114]

Макрос - копия макроса "2->^1" который нахдится внутри макроса SCADA(IN). Позволяет организовать штатый режим запуска и останова в дистанционном режиме, если надо удалить макрос SCADA(IN) а возможность запуска по интерфейсу в "дистанционном" режиме оставить. Актуально для тех, кто оптимизирует программу для заталкивания её в 12-ый пиксель (к примеру мне пришлось это делать потому, что пиксель был мастером для панели, и программа не входила в контроллер).

[ujin]

Цитата

Сообщение от max

Макрос для работы с журналом

Макрос для работы с журналом.
Генерирует 96 номеров сообщений при появлении аварий с 1 по 96.
Генерирует 96 номеров сообщений при снятии аварий со 101 по 196 (+100 к номеру аварии)
При одновременном появлении аварий и одновременном пропадании других обрабатываются последовательно все события. Сначала появившиеся аварии, затем снятые аварии. Все паузы и порядок работы сохранены от заводского.
Любое событие (появление, снятие аварии) обрабатывается за один такт.
Количество тактов на все события, пришедшие одновременно = N*2 (с учетом обязательной паузы с выдачей 0 после события).
Занимает 55 блоков.
Можно расширить. Каждые 32 аварии + 15 блоков.
Не работает на PIXEL12 и SMH2010. При желании можно переделать
Протестирован не долгое время, поэтому при ошибках просьба сообщить.

[ujin]

Работа с unix_time
unix_time - запаковка текущего времени контроллера в юникс время. 11 блоков
unix_to_curr_time - распаковка юникс времени. 53 блока
Недостаток - при переходе с декабря на январь месяц и день недели пересчитываются 12 тактов. Тщательно не тестировал, но в работе давно. Ошибок пока не выявлено.

[ujin]

Кусочно-линейные функции на 10 и 20 участков.
Размер 21 блок.
Выполняется за 1 такт.
Все то же, только добавлен блок выбора диапазона
Поскольку использованы недокументированные возможности контроллеров (открытые в конструкторе ИТП), блоки запаролены.

[ujin]

Определяет текущий порядковый номер оборудования в зависимости от наработки, т.е. сортировка.
Оборудование с наибольшей наработкой получает наименьший текущий порядковый номер.
Из оборудования с одинаковой наработкой наименьший текущий порядковый номер получает оборудование с наименьшим станционным номером.
Сортировка пузырьковая. Реализация других методов сортировки на FBD при количестве менее 6 бессмысленна. Сортировка производится как правило не чаще 1 раза в сутки, поэтому время сортировки 10 или 40 циклов до выдачи результата не имеет значения. Напротив размер кода значение имеет.
Недостатки - при включении питания выдает неправильный результат и требуется первичная сортировка через время инициализации контроллера.

[ujin]

Работа с защитами.
Введение, выведение защит. Проверка защит на работающем, на остановленном оборудовании.
Описание внутри.
Все открыто, можно переделать под себя.

[младшой]

Цитата:

Сообщение от ujin

...
unix_to_curr_time - распаковка юникс времени. 53 блока
Недостаток - при переходе с декабря на январь месяц и день недели пересчитываются 12 тактов. Тщательно не тестировал, но в работе давно. Ошибок пока не выявлено.

С 31.03.2017 по 31.12.2017 имеется сдвиг на сутки вперед.
Может быть, на каких-то других интервалах тоже.

Выкладываю свой аналогичный макрос.
Ошибочных вычислений вроде нет, надо еще проверять.
Вычисление даты производится за 1 такт.
42 блока.
Выполняется раза в 1,5 быстрее.

ДатыВремя и таймштампы проверял вот по этому онлайн-конвертеру:
http://www.cy-pr.com/tools/time/

[ujin]

Цитата

Сообщение от младшой

С 31.03.2017 по 31.12.2017 имеется сдвиг на сутки вперед.
Может быть, на каких-то других интервалах тоже.

Выкладываю свой аналогичный макрос.
Ошибочных вычислений вроде нет, надо еще проверять.
Вычисление даты производится за 1 такт.
42 блока.
Выполняется раза в 1,5 быстрее.

ДатыВремя и таймштампы проверял вот по этому онлайн-конвертеру:
http://www.cy-pr.com/tools/time/

Спасибо. Работать будет. Немного попроверял.
Мне надо было искать по MJD или Julian day.
http://en.wikipedia.org/wiki/Julian_day

[ujin]

Подсчет количества бит в 16 (32) разрядном числе.
В макросе журнал есть один существенный недостаток - не видно активные аварии. Приходится постоянно сбрасывать журнал, что нежелательно. Подсчет количества активных сообщений поможет в данном вопросе.
Источник http://www.rsdn.ru/forum/alg/269194.flat

[Arsie]

Цитата:

Сообщение от ujin

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

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

Что касается о нежелательности сброса при ПНР, то память контроллера гарантированно выдержит около 30 тысяч таких сбросов. Поэтому наличие проблемы несколько преувеличено.

[ujin]

Цитата:

Сообщение от Arsie

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

Что касается о нежелательности сброса при ПНР, то память контроллера гарантированно выдержит около 30 тысяч таких сбросов. Поэтому наличие проблемы несколько преувеличено.

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

[Arsie]

Цитата:

Сообщение от ujin

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

Зачем журнал-то стирать при этом? Появляется надпись "* сброс аварии" и затем список активных аварий.

При ПНР история не актуальна. А при эксплуатации это единичные аварии.