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
7.7 KiB

PROGRAM PAU
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LIES04H01_CO2_AVE:BS_Average;
PAU05E01_IN :FAU_IN;
PAU05E01_OUT:FAU_OUT;
PAU05E01_SyncControl:IJ_LSyncControl;
PAU05E01_FAU:IJ_FAU;
PAU05E01_ST_AVE :BS_Average;
PAU05E01_WVB_AVE:BS_Average;
PAU05E01_SLG :IJ_EAFGroup;
LPAU05E01_CO2S:ARRAY[0..10] OF REAL;
LPAU05E01_LC :ARRAY[0..10] OF BOOL;
PAU05F01_IN :FAU_IN;
PAU05F01_OUT:FAU_OUT;
PAU05F01_SyncControl:IJ_LSyncControl;
PAU05F01_FAU:IJ_FAU;
PAU05F01_ST_AVE :BS_Average;
PAU05F01_WVB_AVE:BS_Average;
PAU05F01_SLG :IJ_EAFGroup;
LPAU05F01_CO2S:ARRAY[0..10] OF REAL;
LPAU05F01_LC :ARRAY[0..10] OF BOOL;
END_VAR
LIES04H01_CO2_AVE(INPUT :=LIES04H01_CO2 );
LIES04H01_CO2S := BS_Scale(LIES04H01_CO2_AVE.Output , 2, 0, 2000, 0, 0.0);
(********************************************PAU05E01********************************************)
(**)
PAU05E01_WVB_AVE(INPUT:=LPAU05E01_WVB);
PAU05E01_ST_AVE (INPUT:=LPAU05E01_ST );
LPAU05E01_STS := BS_Scale(PAU05E01_ST_AVE.Output ,1,0,100,0,0.0);
LPAU05E01_WVBS:= BS_Scale(PAU05E01_WVB_AVE.Output,2,0,100,0,0.0);
LPAU05E01_WVC :=REAL_TO_INT(BS_Scale(LPAU05E01_WVCS ,4,0,100,0,0.0));
LPAU05E01_VFBS:=REAL_TO_INT(BS_Scale(LPAU05E01_VFB ,2,0,50 ,0,0.0));
LPAU05E01_VFC :=REAL_TO_INT(BS_Scale((LPAU05E01_VFCS*100) ,4,0,50 ,0,0.0));
(**)
PAU05E01_FAU(FAU_STRUCT_IN:=PAU05E01_IN | PAU05E01_OUT:=FAU_STRUCT_OUT);
(*FAU_INSTRUCT*)
PAU05E01_IN.SM :=LPAU05E01_SM ;
PAU05E01_IN.LM :=LPAU05E01_LM ;
PAU05E01_IN.Run :=LPAU05E01_R ;
PAU05E01_IN.Fault :=LPAU05E01_F ;
PAU05E01_IN.Auto :=LPAU05E01_A ;
PAU05E01_IN.ContRol:=LPAU05E01_PC ;
PAU05E01_IN.FDOB :=LPAU05E01_FDOB ;
PAU05E01_IN.FDSB :=LPAU05E01_FDSB ;
PAU05E01_IN.TSET :=LPAU05E01_TSET ;
PAU05E01_IN.WVMC :=LPAU05E01_WVMC ;
PAU05E01_IN.WVMV :=LPAU05E01_WVMV ;
PAU05E01_IN.VFMV :=LPAU05E01_VFMV ;
PAU05E01_IN.STS :=LPAU05E01_STS ;
PAU05E01_IN.RST :=LPAU05E01_RST ;
PAU05E01_IN.RSTV :=LPAU05E01_RSTV ;
PAU05E01_IN.FPS :=LPAU05E01_FPS ;
PAU05E01_IN.IPS :=LPAU05E01_IPS ;
PAU05E01_IN.AFS :=LPAU05E01_AFS ;
PAU05E01_IN.ISO1 :=LPAU05E01_ISO1 ;
PAU05E01_IN.ISO2 :=LPAU05E01_ISO2 ;
PAU05E01_IN.ISO3 :=LPAU05E01_ISO3 ;
PAU05E01_IN.VP :=LPAU05E01_VP ;
PAU05E01_IN.VI :=LPAU05E01_VI ;
PAU05E01_IN.FDELAY :=t#30s ;
PAU05E01_IN.VDELAY :=t#120s ;
(*FAU_OUTSTRUCT*)
LPAU05E01_WVCS :=PAU05E01_OUT.WVCS ;
LPAU05E01_VFCS :=PAU05E01_OUT.VFCS ;
LPAU05E01_FDOC :=PAU05E01_OUT.FDO ;
LPAU05E01_FDSC :=PAU05E01_OUT.FDS ;
LPAU05E01_C :=PAU05E01_OUT.ContRol;
LPAU05E01_RH :=PAU05E01_OUT.RH ;
LPAU05E01_SN :=PAU05E01_OUT.SN ;
(**)
PAU05E01_SyncContRol(CM:=RNIPAU00000_CM,RM:=LCMD00000_RM,
BOOL_IN0:=RNIPAU05X00_PC ,BOOL_IN1:=LPAU05E01_PC ,BOOL_IN2 :=RPAU05E01_PC ,BOOL_IN3:=LPAU05E01_TC,
REAL_IN0:=RNIPAU05X00_TSET,REAL_IN1:=LPAU05E01_TSET,REAL_IN2 :=RPAU05E01_TSET,
INT_IN0 :=RNIPAU05X00_SM ,INT_IN1 :=LPAU05E01_SM ,INT_IN2 :=RPAU05E01_SM |
LPAU05E01_PC :=BOOL_OUT1 ,RPAU05E01_PC :=BOOL_OUT2 ,
LPAU05E01_TSET:=REAL_OUT1 ,RPAU05E01_TSET:=REAL_OUT2 ,
LPAU05E01_SM :=INT_OUT1 ,RPAU05E01_SM :=INT_OUT2 );
(*CO2联动程序*)
LPAU05E01_TC:=LPAU05E01_LC[1];
LPAU05E01_CO2S[1]:=LIES04H01_CO2S;
PAU05E01_SLG(ENABLE:=LPAU05E01_TM,LINKAGEVALUE:=LPAU05E01_CO2S,DEAD_BAND:=10.0,MAXRANGE:=2000.0,MINRANGE:=10.0,
LINKAGESET:=LPAU05E01_CO2SET,HOLDDELAY:=t#60s,ENABLENUM:=4,SCH_STR:=LPAU05E01_TSTR,ALLDAY:=LPAU05E01_DM | LPAU05E01_LC:=LINKAGEOUT);
LPAU05E01_DM :=1;
(********************************************PAU05F01********************************************)
(**)
PAU05F01_WVB_AVE(INPUT:=LPAU05F01_WVB);
PAU05F01_ST_AVE (INPUT:=LPAU05F01_ST );
LPAU05F01_STS := BS_Scale(PAU05F01_ST_AVE.Output ,1,0,100,0,0.0);
LPAU05F01_WVBS:= BS_Scale(PAU05F01_WVB_AVE.Output,2,0,100,0,0.0);
LPAU05F01_WVC :=REAL_TO_INT(BS_Scale(LPAU05F01_WVCS ,4,0,100,0,0.0));
LPAU05F01_VFBS:=REAL_TO_INT(BS_Scale(LPAU05F01_VFB ,2,0,50 ,0,0.0));
LPAU05F01_VFC :=REAL_TO_INT(BS_Scale((LPAU05F01_VFCS*100) ,4,0,50 ,0,0.0));
(**)
PAU05F01_FAU(FAU_STRUCT_IN:=PAU05F01_IN | PAU05F01_OUT:=FAU_STRUCT_OUT);
(*FAU_INSTRUCT*)
PAU05F01_IN.SM :=LPAU05F01_SM ;
PAU05F01_IN.LM :=LPAU05F01_LM ;
PAU05F01_IN.Run :=LPAU05F01_R ;
PAU05F01_IN.Fault :=LPAU05F01_F ;
PAU05F01_IN.Auto :=LPAU05F01_A ;
PAU05F01_IN.ContRol:=LPAU05F01_PC ;
PAU05F01_IN.FDOB :=LPAU05F01_FDOB ;
PAU05F01_IN.FDSB :=LPAU05F01_FDSB ;
PAU05F01_IN.TSET :=LPAU05F01_TSET ;
PAU05F01_IN.WVMC :=LPAU05F01_WVMC ;
PAU05F01_IN.WVMV :=LPAU05F01_WVMV ;
PAU05F01_IN.VFMV :=LPAU05F01_VFMV ;
PAU05F01_IN.STS :=LPAU05F01_STS ;
PAU05F01_IN.RST :=LPAU05F01_RST ;
PAU05F01_IN.RSTV :=LPAU05F01_RSTV ;
PAU05F01_IN.FPS :=LPAU05F01_FPS ;
PAU05F01_IN.IPS :=LPAU05F01_IPS ;
PAU05F01_IN.AFS :=LPAU05F01_AFS ;
PAU05F01_IN.ISO1 :=LPAU05F01_ISO1 ;
PAU05F01_IN.ISO2 :=LPAU05F01_ISO2 ;
PAU05F01_IN.ISO3 :=LPAU05F01_ISO3 ;
PAU05F01_IN.VP :=LPAU05F01_VP ;
PAU05F01_IN.VI :=LPAU05F01_VI ;
PAU05F01_IN.FDELAY :=t#30s ;
PAU05F01_IN.VDELAY :=t#120s ;
(*FAU_OUTSTRUCT*)
LPAU05F01_WVCS :=PAU05F01_OUT.WVCS ;
LPAU05F01_VFCS :=PAU05F01_OUT.VFCS ;
LPAU05F01_FDOC :=PAU05F01_OUT.FDO ;
LPAU05F01_FDSC :=PAU05F01_OUT.FDS ;
LPAU05F01_C :=PAU05F01_OUT.ContRol;
LPAU05F01_RH :=PAU05F01_OUT.RH ;
LPAU05F01_SN :=PAU05F01_OUT.SN ;
(**)
PAU05F01_SyncContRol(CM:=RNIPAU00000_CM,RM:=LCMD00000_RM,
BOOL_IN0:=RNIPAU05X00_PC ,BOOL_IN1:=LPAU05F01_PC ,BOOL_IN2 :=RPAU05F01_PC ,BOOL_IN3:=LPAU05F01_TC,
REAL_IN0:=RNIPAU05X00_TSET,REAL_IN1:=LPAU05F01_TSET,REAL_IN2 :=RPAU05F01_TSET,
INT_IN0 :=RNIPAU05X00_SM ,INT_IN1 :=LPAU05F01_SM ,INT_IN2 :=RPAU05F01_SM |
LPAU05F01_PC :=BOOL_OUT1 ,RPAU05F01_PC :=BOOL_OUT2 ,
LPAU05F01_TSET:=REAL_OUT1 ,RPAU05F01_TSET:=REAL_OUT2 ,
LPAU05F01_SM :=INT_OUT1 ,RPAU05F01_SM :=INT_OUT2 );
(*CO2联动程序*)
LPAU05F01_TC:=LPAU05F01_LC[1];
LPAU05F01_CO2S[1]:=LIES04H01_CO2S;
PAU05F01_SLG(ENABLE:=LPAU05F01_TM,LINKAGEVALUE:=LPAU05F01_CO2S,DEAD_BAND:=10.0,MAXRANGE:=2000.0,MINRANGE:=10.0,
LINKAGESET:=LPAU05F01_CO2SET,HOLDDELAY:=t#60s,ENABLENUM:=4,SCH_STR:=LPAU05F01_TSTR,ALLDAY:=LPAU05F01_DM | LPAU05F01_LC:=LINKAGEOUT);
LPAU05F01_DM :=1;
END_PROGRAM