|
|
Здравствуйте уважаемые форумчане!!! Есть вопрос по написанию сценариев: хотелось бы сделать систему оповещения наростающим образом. Сразу например коротким импульсом, ч/з 5секунд длиннее, потом ещё длиннее и т.д. до постоянного звучания 7 лет 1 месяц назад 
Шостак Александр Юрьевич 68Для добавления сообщений на форуме вам необходимо зарегистрироваться и указать мобильный телефон в своем профиле (зачем?) |
|
|
А если так попытаться с ПКУ: 7 лет 1 месяц назад
Олещенко Игорь Николаевич 2211Орион вроде как правов не имеет оповещением управлять:)
– Олещенко Игорь Николаевич 7 лет 1 месяц назад теоритически вроде должно получиться:)
Если что-то брать,то получилось уже практически. 4 релюшки СП1 в параллель и никаких сценариев.Каждая релюшка отрабатывает в своё время и с определённой задержкой. Последняя включается "до снятия". Вуаля. Только если всё-таки это "оповещение",то скорее всего это "пожарка".У меня бы инспектор ухохотался над таким (с позволения сказать) "оповещением". – Каргапольцев Артур Николаевич 7 лет 1 месяц назад Такой вариант возможен только если ветка оповещения одна и та не контролируемая, а если их несколько только сценарий спасет:)
– Олещенко Игорь Николаевич 7 лет 1 месяц назад Для добавления сообщений на форуме вам необходимо зарегистрироваться и указать мобильный телефон в своем профиле (зачем?) |
|
|
С параллельными реле кстати неплохая идея! Только реле не напасешся! 7 лет 1 месяц назад
Шостак Александр Юрьевич 68Александр Юрьевич, ты пробовал прямой подход, я предлагаю попытаться сделать через костыль:)
– Олещенко Игорь Николаевич 7 лет 1 месяц назад Я попытался и получил весьма неожиданный результат.
Что-бы не было написано в шагах сценария, выполняется только то действие которое записано в шаге 1. проверил с 3.02 и 3.03. Я шаги написал в обратном порядке 1-й шаг активируется последним исполнительным, крайний шаг первым, сделал 1-й шаг светить, 2-й моргать на время, каждое вновь сработавшее исполнительное должно запустить более приоритетный шаг сценария. Первое исполнительное запускает шаг 2 и соответственно должна отработать программа моргать а отрабатывает светить. Попытайся перепроверить если не лень:) – Олещенко Игорь Николаевич 7 лет 1 месяц назад Для добавления сообщений на форуме вам необходимо зарегистрироваться и указать мобильный телефон в своем профиле (зачем?) |
Перем Ядро1;
Перем Реле1;
Перем Компьютеры1;
Перем Компьютер1;
Перем РабочиеМеста1;
Перем РабочееМесто1;
НачалоСценария
Ядро1 = СоздатьОбъект( "Ядро" );
Компьютеры1 = СоздатьОбъект( "Компьютеры" );
Компьютер1 = Компьютеры1.ПолучитьПоИд( свой_ИД_сервера );
РабочиеМеста1 = Компьютер1.РабочиеМеста();
РабочееМесто1 = РабочиеМеста1.ПолучитьПоТипуСетевогоМеста("Ядро");
Реле1 = РабочееМесто1.Выходы().ПолучитьПоИД( свой_ИД_реле );
Реле1.ВключитьНаВремя( "0", "1" ); //длительность 1 секунда
Ядро1.Пауза( 5 ); //длительность 5 секунд
Реле1.ВключитьНаВремя( "0", "2" ); //длительность 2 секунды
Ядро1.Пауза( 5 ); //длительность 5 секунд
//и повторять эти два шага дальше, последний шаг включения реле длительностью 8196
КонецСценария
– Волков Андрей 7 лет 1 месяц назад
#ссылка