Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (*ФОРМИРОВАНИЕ ШКАЛЫ НАГРУЗКИ 0..4000 мм.вд.ст..*)
- Shcala_Gaz(
- IN:=rGazVxod, (*Сигнал от датчика 4..20 мА.*)
- IN_MIN:= 3.8,
- IN_MAX:=20.2 ,
- OUT_MIN:=-50,
- OUT_MAX:= 4050,
- OUT=>rGaz, (*Давление газа перед горелкой 0..4000 мм.вд.ст..*)
- ERROR=> xOshibkaDatGaz); (*Ошибка датчика давления газа перед горелкой.*)
- rGazAwey := rGazVxod; (*Значение давления нагрузки на выходе ПЛК
- для подключения к регистратору.*)
- iNagruzka := REAL_TO_INT (rGaz); (*Значение нагрузки для пересчёта режимных карт.*)
- wDS1 :=REAL_TO_WORD (rGaz); (*Значение нагрузки для панели.*)
- Reguljtor_Nagruzki(); (* Объявление программы регулятора нагрузки. *)
- (*ФОРМИРОВАНИЕ ШКАЛЫ ДАВЛЕНИЯ ВОЗДУХА ПЕРЕД ГОРЕЛКОЙ 0..2500 Ра.*)
- Shcala_Vozdux(
- IN:=rVozduxVxod , (*Сигнал от датчика 4..20 мА.*)
- IN_MIN:=3.8 ,
- IN_MAX:=20.2 ,
- OUT_MIN:=-30 ,
- OUT_MAX:=2530 ,
- OUT=>rVozdux, (*Давление воздуха перед горелкой 0..2500 Ра.*)
- ERROR=>xOshibkaDatVozdux );
- rVozduxAwey := rVozduxVxod; (*Значение давления воздуха перед горелкой на выходе ПЛК
- для подключения к регистратору.*)
- wDS4 := REAL_TO_WORD (rVozdux); (*Значение воздуха для панели.*)
- iVozduxDatchik := REAL_TO_INT (rVozdux);
- (*ФОРМИРОВАНИЕ ШКАЛЫ СОДЕРЖАНИЯ СО В УХОДЯЩИХ ГАЗАХ.*)
- Shcala_CO(
- IN:= rCOVxod, (*Сигнал от датчика 4..20 мА.*)
- IN_MIN:=3.8 ,
- IN_MAX:= 20.2,
- OUT_MIN:=-12.48 ,
- OUT_MAX:= 1012.34,
- OUT=>rCo , (*Содержание СО в уходящих газах 0..1000 ppm.*)
- ERROR=>xOshibkaDatCo );
- wDS3 := REAL_TO_WORD (rCo); (*Значение СО для панели.*)
- Reguljtor_Vozduxa(); (*Объявление программы регулятора воздуха*)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement