rusavtomatika.com

pkl58 писал(а):Поделитесь!

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

//периодичность 100*100
macro_command main()
short i
float device1[4],kzr,obratka
bool leto, alarm
GetData(leto, "Local HMI", LB, 50, 1)
alarm = 0
for i= 0 to 8
GetDataEx(device1[0], "TRM", 3x_MAX1W, 151+i#204, 4) //Считать 4 флоата подряд
GetDataEx(kzr, "TRM", 3x, 151+i#82, 1)// Мощность КЗР
SetDataEx(device1[0], "Local HMI", LW, i*30, 4) // Распихать 4 флоата по ячейкам подряд
kzr=kzr*100
SetDataEx(kzr, "Local HMI", LW, 10+i*30, 1)
GetData(obratka, "Local HMI", LW, 4+i*30, 1)
if leto == false and obratka < 34 then
alarm = 1
SetData(alarm, "Local HMI", LB, 51+i, 1)
end if
kzr=0
obratka=0
alarm = 0
next

end macro_command

KPashik1988 писал(а):Добрый день! Подскажите, пожалуйста, через час работы, если его е трогать, гаснет экран, как это отключить чтоб он работал постоянно?

pkl58 писал(а):Попробуйте шрифты в панель загрузить.

evgeni85 писал(а):Еще подскажите как в одном и том же окне выводить и латиницу и кириллицу в юникоде?