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.
 
 
 
 
 
 

164 lines
8.0 KiB

PROGRAM EAF
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LEAFB2G01_COS:ARRAY[0..10] OF REAL;
LIESB2G01_CO_AVE:BS_Average;
LIESB2G02_CO_AVE:BS_Average;
LIESB2G03_CO_AVE:BS_Average;
EAFB2G01_SyncControl:IJ_LSyncControl;
EAFB2G01_SLG:IJ_EAFGroup;
EAFB2G01_RunTime:BS_RunTime;
LEAFB2G01_LC :ARRAY[0..10] OF BOOL;
EAFB2G02_SyncControl:IJ_LSyncControl;
EAFB2G02_SLG:IJ_EAFGroup;
EAFB2G02_RunTime:BS_RunTime;
LEAFB2G02_LC :ARRAY[0..10] OF BOOL;
LEAFB2C01_COS:ARRAY[0..10] OF REAL;
LIESB2C01_CO_AVE:BS_Average;
LIESB2C02_CO_AVE:BS_Average;
LIESB2C03_CO_AVE:BS_Average;
LIESB2C04_CO_AVE:BS_Average;
LIESB2C05_CO_AVE:BS_Average;
LIESB2C06_CO_AVE:BS_Average;
LIESB2C07_CO_AVE:BS_Average;
EAFB2C01_SyncControl:IJ_LSyncControl;
EAFB2C01_SLG:IJ_EAFGroup;
EAFB2C01_RunTime:BS_RunTime;
LEAFB2C01_LC :ARRAY[0..10] OF BOOL;
EAFB2C02_SyncControl:IJ_LSyncControl;
EAFB2C02_SLG:IJ_EAFGroup;
EAFB2C02_RunTime:BS_RunTime;
LEAFB2C02_LC :ARRAY[0..10] OF BOOL;
LEAFB2F01_COS:ARRAY[0..10] OF REAL;
LIESB2F01_CO_AVE:BS_Average;
LIESB2F02_CO_AVE:BS_Average;
LIESB2F03_CO_AVE:BS_Average;
EAFB2F01_SyncControl:IJ_LSyncControl;
EAFB2F01_SLG:IJ_EAFGroup;
EAFB2F01_RunTime:BS_RunTime;
LEAFB2F01_LC :ARRAY[0..10] OF BOOL;
EAFB2F02_SyncControl:IJ_LSyncControl;
EAFB2F02_SLG:IJ_EAFGroup;
EAFB2F02_RunTime:BS_RunTime;
LEAFB2F02_LC :ARRAY[0..10] OF BOOL;
END_VAR
LIESB2G01_CO_AVE(INPUT :=LIESB2G01_CO );
LIESB2G01_COS := BS_Scale(LIESB2G01_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LIESB2G02_CO_AVE(INPUT :=LIESB2G02_CO );
LIESB2G02_COS := BS_Scale(LIESB2G02_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LIESB2G03_CO_AVE(INPUT :=LIESB2G03_CO );
LIESB2G03_COS := BS_Scale(LIESB2G03_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LEAFB2G01_COS[1]:=LIESB2G01_COS;
LEAFB2G01_COS[2]:=LIESB2G02_COS;
LEAFB2G01_COS[3]:=LIESB2G03_COS;
LEAFB2G01_TC :=LEAFB2G01_LC[1];
(**)
EAFB2G01_SLG(ENABLE :=LEAFB2G01_TM ,LINKAGEVALUE :=LEAFB2G01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2G01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2G01_TSTR ,ALLDAY :=LEAFB2G01_DM | LEAFB2G01_LC:= LINKAGEOUT);
(**)
EAFB2G01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2G01_C,BOOL_IN2:=REAFB2G01_C,BOOL_IN3:=LEAFB2G01_TC | LEAFB2G01_C:= BOOL_OUT1,REAFB2G01_C:=BOOL_OUT2);
(**)
EAFB2G01_RunTime(RUN :=LEAFB2G01_R , RUNTIMESET :=LEAFB2G01_RSTV , RUNTIMERST :=LEAFB2G01_RST , RunTimeRec_In :=LEAFB2G01_RH | LEAFB2G01_RH:= RUNTIME);
LEAFB2G02_TC :=LEAFB2G02_LC[1];
(**)
EAFB2G02_SLG(ENABLE :=LEAFB2G02_TM ,LINKAGEVALUE :=LEAFB2G01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2G02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2G02_TSTR ,ALLDAY :=LEAFB2G02_DM | LEAFB2G02_LC:= LINKAGEOUT);
(**)
EAFB2G02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2G02_C,BOOL_IN2:=REAFB2G02_C,BOOL_IN3:=LEAFB2G02_TC | LEAFB2G02_C:= BOOL_OUT1,REAFB2G02_C:=BOOL_OUT2);
(**)
EAFB2G02_RunTime(RUN :=LEAFB2G02_R , RUNTIMESET :=LEAFB2G02_RSTV , RUNTIMERST :=LEAFB2G02_RST , RunTimeRec_In :=LEAFB2G02_RH | LEAFB2G02_RH:= RUNTIME);
LIESB2C01_CO_AVE(INPUT :=LIESB2C01_CO );
LIESB2C01_COS := BS_Scale(LIESB2C01_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LIESB2C02_CO_AVE(INPUT :=LIESB2C02_CO );
LIESB2C02_COS := BS_Scale(LIESB2C02_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LIESB2C03_CO_AVE(INPUT :=LIESB2C03_CO );
LIESB2C03_COS := BS_Scale(LIESB2C03_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LIESB2C04_CO_AVE(INPUT :=LIESB2C04_CO );
LIESB2C04_COS := BS_Scale(LIESB2C04_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LIESB2C05_CO_AVE(INPUT :=LIESB2C05_CO );
LIESB2C05_COS := BS_Scale(LIESB2C05_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LIESB2C06_CO_AVE(INPUT :=LIESB2C06_CO );
LIESB2C06_COS := BS_Scale(LIESB2C06_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LIESB2C07_CO_AVE(INPUT :=LIESB2C07_CO );
LIESB2C07_COS := BS_Scale(LIESB2C07_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LEAFB2C01_COS[1]:=LIESB2C01_COS;
LEAFB2C01_COS[2]:=LIESB2C02_COS;
LEAFB2C01_COS[3]:=LIESB2C03_COS;
LEAFB2C01_COS[4]:=LIESB2C04_COS;
LEAFB2C01_COS[5]:=LIESB2C05_COS;
LEAFB2C01_COS[6]:=LIESB2C06_COS;
LEAFB2C01_COS[7]:=LIESB2C07_COS;
LEAFB2C01_TC :=LEAFB2C01_LC[1];
(**)
EAFB2C01_SLG(ENABLE :=LEAFB2C01_TM ,LINKAGEVALUE :=LEAFB2C01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2C01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2C01_TSTR ,ALLDAY :=LEAFB2C01_DM | LEAFB2C01_LC:= LINKAGEOUT);
(**)
EAFB2C01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2C01_C,BOOL_IN2:=REAFB2C01_C,BOOL_IN3:=LEAFB2C01_TC | LEAFB2C01_C:= BOOL_OUT1,REAFB2C01_C:=BOOL_OUT2);
(**)
EAFB2C01_RunTime(RUN :=LEAFB2C01_R , RUNTIMESET :=LEAFB2C01_RSTV , RUNTIMERST :=LEAFB2C01_RST , RunTimeRec_In :=LEAFB2C01_RH | LEAFB2C01_RH:= RUNTIME);
LEAFB2C02_TC :=LEAFB2C02_LC[1];
(**)
EAFB2C02_SLG(ENABLE :=LEAFB2C02_TM ,LINKAGEVALUE :=LEAFB2C01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2C02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2C02_TSTR ,ALLDAY :=LEAFB2C02_DM | LEAFB2C02_LC:= LINKAGEOUT);
(**)
EAFB2C02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2C02_C,BOOL_IN2:=REAFB2C02_C,BOOL_IN3:=LEAFB2C02_TC | LEAFB2C02_C:= BOOL_OUT1,REAFB2C02_C:=BOOL_OUT2);
(**)
EAFB2C02_RunTime(RUN :=LEAFB2C02_R , RUNTIMESET :=LEAFB2C02_RSTV , RUNTIMERST :=LEAFB2C02_RST , RunTimeRec_In :=LEAFB2C02_RH | LEAFB2C02_RH:= RUNTIME);
LIESB2F01_CO_AVE(INPUT :=LIESB2F01_CO );
LIESB2F01_COS := BS_Scale(LIESB2F01_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LIESB2F02_CO_AVE(INPUT :=LIESB2F02_CO );
LIESB2F02_COS := BS_Scale(LIESB2F02_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LIESB2F03_CO_AVE(INPUT :=LIESB2F03_CO );
LIESB2F03_COS := BS_Scale(LIESB2F03_CO_AVE.Output , 3, 0, 1000, 0, 0.0);
LEAFB2F01_COS[1]:=LIESB2F01_COS;
LEAFB2F01_COS[2]:=LIESB2F02_COS;
LEAFB2F01_COS[3]:=LIESB2F03_COS;
LEAFB2F01_TC :=LEAFB2F01_LC[1];
(**)
EAFB2F01_SLG(ENABLE :=LEAFB2F01_TM ,LINKAGEVALUE :=LEAFB2F01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2F01_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2F01_TSTR ,ALLDAY :=LEAFB2F01_DM | LEAFB2F01_LC:= LINKAGEOUT);
(**)
EAFB2F01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2F01_C,BOOL_IN2:=REAFB2F01_C,BOOL_IN3:=LEAFB2F01_TC | LEAFB2F01_C:= BOOL_OUT1,REAFB2F01_C:=BOOL_OUT2);
(**)
EAFB2F01_RunTime(RUN :=LEAFB2F01_R , RUNTIMESET :=LEAFB2F01_RSTV , RUNTIMERST :=LEAFB2F01_RST , RunTimeRec_In :=LEAFB2F01_RH | LEAFB2F01_RH:= RUNTIME);
LEAFB2F02_TC :=LEAFB2F02_LC[1];
(**)
EAFB2F02_SLG(ENABLE :=LEAFB2F02_TM ,LINKAGEVALUE :=LEAFB2F01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2F02_COSET , HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB2F02_TSTR ,ALLDAY :=LEAFB2F02_DM | LEAFB2F02_LC:= LINKAGEOUT);
(**)
EAFB2F02_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB2F02_C,BOOL_IN2:=REAFB2F02_C,BOOL_IN3:=LEAFB2F02_TC | LEAFB2F02_C:= BOOL_OUT1,REAFB2F02_C:=BOOL_OUT2);
(**)
EAFB2F02_RunTime(RUN :=LEAFB2F02_R , RUNTIMESET :=LEAFB2F02_RSTV , RUNTIMERST :=LEAFB2F02_RST , RunTimeRec_In :=LEAFB2F02_RH | LEAFB2F02_RH:= RUNTIME);
END_PROGRAM