(****** QuickLD compiler *******************************)
(****** Copyright Rockwell Automation Canada, Ltd ******)
(****** ST *********************************************)

(*************** Rung **********************************)
(*TEMPERATURA TRUNION DE ENTRADA*)
__STEPPRAGMA
0,1
__ENDSTEPPRAGMA
(*Label :*)(**)
__EDTB1 := TRUE ;
IF __EDTB1 THEN
RTD_1320_1001_REAL := ANY_TO_REAL(_IO_X1_AI_00) ;
END_IF ;
__MO_ANY_TO_REAL_1 := __EDTB1 ;
__EDTB2 := __EDTB1 ;
IF __EDTB2 THEN
(* FB call: SCALER *)
SCALER_2(RTD_1320_1001_REAL, 0.0, 3150.0, 0.0, 100.0) ;
_1320_TE_1001 := SCALER_2.Output ;
END_IF ;
__MO_SCALER_1 := __EDTB2 ;

(*************** Code for the end of Rung **************)
__GL __LG0001 ;


(*************** Rung **********************************)
(*TEMPERATURA TRUNION DE SALIDA*)
__STEPPRAGMA
0,8
__ENDSTEPPRAGMA
(*Label :*)(**)
__EDTB3 := TRUE ;
IF __EDTB3 THEN
RTD_1320_1002_REAL := ANY_TO_REAL(_IO_X1_AI_01) ;
END_IF ;
__MO_ANY_TO_REAL_2 := __EDTB3 ;
__EDTB4 := __EDTB3 ;
IF __EDTB4 THEN
(* FB call: SCALER *)
SCALER_3(RTD_1320_1002_REAL, 0.0, 3150.0, 0.0, 100.0) ;
_1320_TE_1002 := SCALER_3.Output ;
END_IF ;
__MO_SCALER_2 := __EDTB4 ;

(*************** Code for the end of Rung **************)
__GL __LG0002 ;


(*************** Rung **********************************)
(*TEMPERATURA CHUMACERA LADO MOLINO*)
__STEPPRAGMA
0,15
__ENDSTEPPRAGMA
(*Label :*)(**)
__EDTB5 := TRUE ;
IF __EDTB5 THEN
RTD_1320_1003_REAL := ANY_TO_REAL(_IO_X1_AI_02) ;
END_IF ;
__MO_ANY_TO_REAL_3 := __EDTB5 ;
__EDTB6 := __EDTB5 ;
IF __EDTB6 THEN
(* FB call: SCALER *)
SCALER_4(RTD_1320_1003_REAL, 0.0, 3150.0, 0.0, 120.0) ;
_1320_TE_1003 := SCALER_4.Output ;
END_IF ;
__MO_SCALER_3 := __EDTB6 ;

(*************** Code for the end of Rung **************)
__GL __LG0003 ;


(*************** Rung **********************************)
(*TEMPERATURA CHUMACERA LADO MOTOR*)
__STEPPRAGMA
0,22
__ENDSTEPPRAGMA
(*Label :*)(**)
__EDTB7 := TRUE ;
IF __EDTB7 THEN
RTD_1320_1004_REAL := ANY_TO_REAL(_IO_X1_AI_03) ;
END_IF ;
__MO_ANY_TO_REAL_4 := __EDTB7 ;
__EDTB8 := __EDTB7 ;
IF __EDTB8 THEN
(* FB call: SCALER *)
SCALER_1(RTD_1320_1004_REAL, 0.0, 3150.0, 0.0, 100.0) ;
_1320_TE_1004 := SCALER_1.Output ;
END_IF ;
__MO_SCALER_4 := __EDTB8 ;

(*************** Code for the end of Rung **************)
__GL __LG0004 ;


(*************** Code for the end of File **************)
__GL __LG0000 ;



(*************** Local Symbols table *******************)
(* __EDTB1 *)
(* __EDTB2 *)
(* __EDTB3 *)
(* __EDTB4 *)
(* __EDTB5 *)
(* __EDTB6 *)
(* __EDTB7 *)
(* __EDTB8 *)

