/
George_Smith
/
RuSTy
Обзор
Документация
Войти
/
George_Smith
/
RuSTy
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
CI/CD
Аналитика
Безопасность
Peter
VSsection.ResourceProject.st
13 строк
1 KB
Peter Korobeynikov
FB-CALL TESTING
25 янв 2026, 17:25
25 янв 2026, 17:25
feb4daa
Код
Авторство
О чём код?
PROGRAM VSsection VAR TON_Temp: ARRAY[1..5] OF TON; TON_Press: ARRAY[1..5] OF TON; TON_TempOil: ARRAY[1..5] OF TON; END_VAR TON_Press[1](IN := (DIn[150] AND OIPState[10].2),PT := LREAL_TO_TIME(OtherUst[1]*1000));(* Насос емкости ЕП камеры приема, № 024.02. Время на набор давления *) TON_TempOil[1](IN := OIPState[13].10,PT := LREAL_TO_TIME(OtherUst[2]*1000)); (* Насос емкости ЕП камеры приема, № 024.02. Время до сработки "Макс. темп. Н/НП" *) TON_Temp[1](IN := OIPState[14].10,PT := LREAL_TO_TIME(OtherUst[3]*1000)); (* Насос емкости ЕП камеры приема, № 024.02. Время до сработки "Макс. темп. подшипника насоса" *) (* Команда Отключить насос емкости ЕП камеры приема, № 024.02 *) DOut[14] := TON_Press[1].Q OR TON_TempOil[1].Q OR TON_Temp[1].Q; END_PROGRAM