Вопрос по верхнему уровню.

[Ramzai]

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

[KIgor]

Здравствуйте.
Не указанно какой "верхний уровень", т.е. какой WinCC.
На вскидку можно сказать, что необходимо привязать к свойству цвета(например, Background Color) скрипт(С или VBS) в котором анализировать уровни, давления, температуры и все что Вам угодно.
Для более конкретного решения, необходимо детализировать вопрос.

[Ramzai]

Wincc 7.4 имеется несколько тегов точнее около 10 нужно что бы при срабатывание одного из них то есть если один из тэгов больше или равен 1 происходила смена цвета на красный или мигание загвоздка в написание глобал скрипта как правильно его написать?

[KIgor]

Добрый день.
У меня нет под рукой 7.4, но думаю разница будет небольшой...
В свойствах графического объекта, к свойству Background Color привязываем VBS-Action примерно следующего содержания:

Код: Выделить всё

Dim tagSet
	Set tagSet = HMIRuntime.Tags.CreateTagSet()				
	tagSet.Add("Tag1")
	tagSet.Add("Tag2")
	tagSet.Add("Tag3")	
	'и так далее... (Tag1-3 - заменить на реальные имена тэгов)
	tagSet.Read()
	
	If (tagSet("Tag1").Value > 1) Then
		BackColor_Trigger = RGB(255,0,0)'Красный
	Elseif (tagSet("Tag2").Value > 1) Then
		BackColor_Trigger = RGB(0,255,0)'Зеленый
	Elseif (tagSet("Tag3").Value > 1) Then
		BackColor_Trigger = RGB(0,0,255)'Синий
	Else
		BackColor_Trigger = RGB(128,128,128)'Серый
	End If

В качестве тригеров устанавливаем Ваши тэги.
Если Вам более удобен C, пишите С-Action.
Если данная функция будет вызываться для нескольких объектов, действительно логичнее запихнуть ее в глобал скрипт.

[Ramzai]

Спасибо большое.)