You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

70 lines
3.1 KiB

PROGRAM EAF
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LIESB1D01_CO_AVE:BS_Average;
LIESB1D02_CO_AVE:BS_Average;
LEAFB1D01_COS:ARRAY[0..10] OF REAL;
EAFB1D01_SyncControl:IJ_LSyncControl;
EAFB1D01_SLG:IJ_EAFGroup;
EAFB1D01_RunTime:BS_RunTime;
LEAFB1D01_LC :ARRAY[0..10] OF BOOL;
EAFB1D02_SyncControl:IJ_LSyncControl;
EAFB1D02_SLG:IJ_EAFGroup;
EAFB1D02_RunTime:BS_RunTime;
LEAFB1D02_LC :ARRAY[0..10] OF BOOL;
EAFB1D03_SyncControl:IJ_LSyncControl;
EAFB1D03_SLG:IJ_EAFGroup;
EAFB1D03_RunTime:BS_RunTime;
LEAFB1D03_LC :ARRAY[0..10] OF BOOL;
END_VAR
LIESB1D01_CO_AVE(INPUT :=LIESB1D01_CO );
LIESB1D01_COS := BS_Scale(LIESB1D01_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LIESB1D02_CO_AVE(INPUT :=LIESB1D02_CO );
LIESB1D02_COS := BS_Scale(LIESB1D02_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LEAFB1D01_COS[1]:=LIESB1D01_COS;
LEAFB1D01_COS[2]:=LIESB1D02_COS;
LEAFB1D01_TC :=LEAFB1D01_LC[1];
(**)
EAFB1D01_SLG(ENABLE :=LEAFB1D01_TM ,LINKAGEVALUE :=LEAFB1D01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB1D01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB1D01_TSTR ,ALLDAY :=LEAFB1D01_DM | LEAFB1D01_LC:= LINKAGEOUT);
(**)
EAFB1D01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB1X00_PC,BOOL_IN1:=LEAFB1D01_C,BOOL_IN2:=REAFB1D01_C,BOOL_IN3:=LEAFB1D01_TC | LEAFB1D01_C:= BOOL_OUT1,REAFB1D01_C:=BOOL_OUT2);
(**)
EAFB1D01_RunTime(RUN :=LEAFB1D01_R , RUNTIMESET :=LEAFB1D01_RSTV , RUNTIMERST :=LEAFB1D01_RST , RunTimeRec_In :=LEAFB1D01_RH | LEAFB1D01_RH:= RUNTIME);
LEAFB1D02_TC :=LEAFB1D02_LC[1];
(**)
EAFB1D02_SLG(ENABLE :=LEAFB1D02_TM ,LINKAGEVALUE :=LEAFB1D01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB1D02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB1D02_TSTR ,ALLDAY :=LEAFB1D02_DM | LEAFB1D02_LC:= LINKAGEOUT);
(**)
EAFB1D02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB1X00_PC,BOOL_IN1:=LEAFB1D02_C,BOOL_IN2:=REAFB1D02_C,BOOL_IN3:=LEAFB1D02_TC | LEAFB1D02_C:= BOOL_OUT1,REAFB1D02_C:=BOOL_OUT2);
(**)
EAFB1D02_RunTime(RUN :=LEAFB1D02_R , RUNTIMESET :=LEAFB1D02_RSTV , RUNTIMERST :=LEAFB1D02_RST , RunTimeRec_In :=LEAFB1D02_RH | LEAFB1D02_RH:= RUNTIME);
LEAFB1D03_TC :=LEAFB1D03_LC[1];
(**)
EAFB1D03_SLG(ENABLE :=LEAFB1D03_TM ,LINKAGEVALUE :=LEAFB1D01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB1D03_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB1D03_TSTR ,ALLDAY :=LEAFB1D03_DM | LEAFB1D03_LC:= LINKAGEOUT);
(**)
EAFB1D03_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB1X00_PC,BOOL_IN1:=LEAFB1D03_C,BOOL_IN2:=REAFB1D03_C,BOOL_IN3:=LEAFB1D03_TC | LEAFB1D03_C:= BOOL_OUT1,REAFB1D03_C:=BOOL_OUT2);
(**)
EAFB1D03_RunTime(RUN :=LEAFB1D03_R , RUNTIMESET :=LEAFB1D03_RSTV , RUNTIMERST :=LEAFB1D03_RST , RunTimeRec_In :=LEAFB1D03_RH | LEAFB1D03_RH:= RUNTIME);
END_PROGRAM