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.
 
 
 
 
 
 

159 lines
7.5 KiB

PROGRAM PAU
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LIES04F01_CO2_AVE:BS_Average;
PAU05A01_IN :FAU_IN;
PAU05A01_OUT:FAU_OUT;
PAU05A01_SyncControl:IJ_LSyncControl;
PAU05A01_FAU:IJ_FAU;
PAU05A01_ST_AVE :BS_Average;
PAU05A01_WVB_AVE:BS_Average;
PAU05A01_SLG :IJ_EAFGroup;
LPAU05A01_CO2S:ARRAY[0..10] OF REAL;
LPAU05A01_LC :ARRAY[0..10] OF BOOL;
PAU06A01_IN :FAU_IN;
PAU06A01_OUT:FAU_OUT;
PAU06A01_SyncControl:IJ_LSyncControl;
PAU06A01_FAU:IJ_FAU;
PAU06A01_ST_AVE :BS_Average;
PAU06A01_WVB_AVE:BS_Average;
PAU06A01_SLG :IJ_EAFGroup;
LPAU06A01_CO2S:ARRAY[0..10] OF REAL;
LPAU06A01_LC :ARRAY[0..10] OF BOOL;
END_VAR
LIES04F01_CO2_AVE(INPUT :=LIES04F01_CO2 );
LIES04F01_CO2S := BS_Scale(LIES04F01_CO2_AVE.Output , 2, 0, 2000, 0, 0.0);
(********************************************PAU05A01********************************************)
(**)
PAU05A01_WVB_AVE(INPUT:=LPAU05A01_WVB);
PAU05A01_ST_AVE (INPUT:=LPAU05A01_ST );
LPAU05A01_STS := BS_Scale(PAU05A01_ST_AVE.Output ,1,0,100,0,0.0);
LPAU05A01_WVBS:= BS_Scale(PAU05A01_WVB_AVE.Output,2,0,100,0,0.0);
LPAU05A01_WVC :=REAL_TO_INT(BS_Scale(LPAU05A01_WVCS ,4,0,100,0,0.0));
LPAU05A01_VFBS:=REAL_TO_INT(BS_Scale(LPAU05A01_VFB ,2,0,50 ,0,0.0));
LPAU05A01_VFC :=REAL_TO_INT(BS_Scale((LPAU05A01_VFCS*100) ,4,0,50 ,0,0.0));
(**)
PAU05A01_FAU(FAU_STRUCT_IN:=PAU05A01_IN | PAU05A01_OUT:=FAU_STRUCT_OUT);
(*FAU_INSTRUCT*)
PAU05A01_IN.SM :=LPAU05A01_SM ;
PAU05A01_IN.LM :=LPAU05A01_LM ;
PAU05A01_IN.Run :=LPAU05A01_R ;
PAU05A01_IN.Fault :=LPAU05A01_F ;
PAU05A01_IN.Auto :=LPAU05A01_A ;
PAU05A01_IN.ContRol:=LPAU05A01_PC ;
PAU05A01_IN.FDOB :=LPAU05A01_FDOB ;
PAU05A01_IN.FDSB :=LPAU05A01_FDSB ;
PAU05A01_IN.TSET :=LPAU05A01_TSET ;
PAU05A01_IN.WVMC :=LPAU05A01_WVMC ;
PAU05A01_IN.WVMV :=LPAU05A01_WVMV ;
PAU05A01_IN.VFMV :=LPAU05A01_VFMV ;
PAU05A01_IN.STS :=LPAU05A01_STS ;
PAU05A01_IN.RST :=LPAU05A01_RST ;
PAU05A01_IN.RSTV :=LPAU05A01_RSTV ;
PAU05A01_IN.FPS :=LPAU05A01_FPS ;
PAU05A01_IN.IPS :=LPAU05A01_IPS ;
PAU05A01_IN.AFS :=LPAU05A01_AFS ;
PAU05A01_IN.ISO1 :=LPAU05A01_ISO1 ;
PAU05A01_IN.ISO2 :=LPAU05A01_ISO2 ;
PAU05A01_IN.ISO3 :=LPAU05A01_ISO3 ;
PAU05A01_IN.VP :=LPAU05A01_VP ;
PAU05A01_IN.VI :=LPAU05A01_VI ;
PAU05A01_IN.FDELAY :=t#30s ;
PAU05A01_IN.VDELAY :=t#120s ;
(*FAU_OUTSTRUCT*)
LPAU05A01_WVCS :=PAU05A01_OUT.WVCS ;
LPAU05A01_VFCS :=PAU05A01_OUT.VFCS ;
LPAU05A01_FDOC :=PAU05A01_OUT.FDO ;
LPAU05A01_FDSC :=PAU05A01_OUT.FDS ;
LPAU05A01_C :=PAU05A01_OUT.ContRol;
LPAU05A01_RH :=PAU05A01_OUT.RH ;
LPAU05A01_SN :=PAU05A01_OUT.SN ;
(**)
PAU05A01_SyncContRol(CM:=RNIPAU00000_CM,RM:=LCMD00000_RM,
BOOL_IN0:=RNIPAU05X00_PC ,BOOL_IN1:=LPAU05A01_PC ,BOOL_IN2 :=RPAU05A01_PC ,BOOL_IN3:=LPAU05A01_TC,
REAL_IN0:=RNIPAU05X00_TSET,REAL_IN1:=LPAU05A01_TSET,REAL_IN2 :=RPAU05A01_TSET,
INT_IN0 :=RNIPAU05X00_SM ,INT_IN1 :=LPAU05A01_SM ,INT_IN2 :=RPAU05A01_SM |
LPAU05A01_PC :=BOOL_OUT1 ,RPAU05A01_PC :=BOOL_OUT2 ,
LPAU05A01_TSET:=REAL_OUT1 ,RPAU05A01_TSET:=REAL_OUT2 ,
LPAU05A01_SM :=INT_OUT1 ,RPAU05A01_SM :=INT_OUT2 );
(*CO2联动程序*)
LPAU05A01_TC:=LPAU05A01_LC[1];
LPAU05A01_CO2S[1]:=LIES04F01_CO2S;
PAU05A01_SLG(ENABLE:=LPAU05A01_TM,LINKAGEVALUE:=LPAU05A01_CO2S,DEAD_BAND:=10.0,MAXRANGE:=2000.0,MINRANGE:=10.0,
LINKAGESET:=LPAU05A01_CO2SET,HOLDDELAY:=t#60s,ENABLENUM:=4,SCH_STR:=LPAU05A01_TSTR,ALLDAY:=LPAU05A01_DM | LPAU05A01_LC:=LINKAGEOUT);
(********************************************PAU06A01********************************************)
(**)
PAU06A01_WVB_AVE(INPUT:=LPAU06A01_WVB);
PAU06A01_ST_AVE (INPUT:=LPAU06A01_ST );
LPAU06A01_STS := BS_Scale(PAU06A01_ST_AVE.Output ,1,0,100,0,0.0);
LPAU06A01_WVBS:= BS_Scale(PAU06A01_WVB_AVE.Output,2,0,100,0,0.0);
LPAU06A01_WVC :=REAL_TO_INT(BS_Scale(LPAU06A01_WVCS ,4,0,100,0,0.0));
LPAU06A01_VFBS:=REAL_TO_INT(BS_Scale(LPAU06A01_VFB ,2,0,50 ,0,0.0));
LPAU06A01_VFC :=REAL_TO_INT(BS_Scale((LPAU06A01_VFCS*100) ,4,0,50 ,0,0.0));
(**)
PAU06A01_FAU(FAU_STRUCT_IN:=PAU06A01_IN | PAU06A01_OUT:=FAU_STRUCT_OUT);
(*FAU_INSTRUCT*)
PAU06A01_IN.SM :=LPAU06A01_SM ;
PAU06A01_IN.LM :=LPAU06A01_LM ;
PAU06A01_IN.Run :=LPAU06A01_R ;
PAU06A01_IN.Fault :=LPAU06A01_F ;
PAU06A01_IN.Auto :=LPAU06A01_A ;
PAU06A01_IN.ContRol:=LPAU06A01_PC ;
PAU06A01_IN.FDOB :=LPAU06A01_FDOB ;
PAU06A01_IN.FDSB :=LPAU06A01_FDSB ;
PAU06A01_IN.TSET :=LPAU06A01_TSET ;
PAU06A01_IN.WVMC :=LPAU06A01_WVMC ;
PAU06A01_IN.WVMV :=LPAU06A01_WVMV ;
PAU06A01_IN.VFMV :=LPAU06A01_VFMV ;
PAU06A01_IN.STS :=LPAU06A01_STS ;
PAU06A01_IN.RST :=LPAU06A01_RST ;
PAU06A01_IN.RSTV :=LPAU06A01_RSTV ;
PAU06A01_IN.FPS :=LPAU06A01_FPS ;
PAU06A01_IN.IPS :=LPAU06A01_IPS ;
PAU06A01_IN.AFS :=LPAU06A01_AFS ;
PAU06A01_IN.ISO1 :=LPAU06A01_ISO1 ;
PAU06A01_IN.ISO2 :=LPAU06A01_ISO2 ;
PAU06A01_IN.ISO3 :=LPAU06A01_ISO3 ;
PAU06A01_IN.VP :=LPAU06A01_VP ;
PAU06A01_IN.VI :=LPAU06A01_VI ;
PAU06A01_IN.FDELAY :=t#30s ;
PAU06A01_IN.VDELAY :=t#120s ;
(*FAU_OUTSTRUCT*)
LPAU06A01_WVCS :=PAU06A01_OUT.WVCS ;
LPAU06A01_VFCS :=PAU06A01_OUT.VFCS ;
LPAU06A01_FDOC :=PAU06A01_OUT.FDO ;
LPAU06A01_FDSC :=PAU06A01_OUT.FDS ;
LPAU06A01_C :=PAU06A01_OUT.ContRol;
LPAU06A01_RH :=PAU06A01_OUT.RH ;
LPAU06A01_SN :=PAU06A01_OUT.SN ;
(**)
PAU06A01_SyncContRol(CM:=RNIPAU00000_CM,RM:=LCMD00000_RM,
BOOL_IN0:=RNIPAU06X00_PC ,BOOL_IN1:=LPAU06A01_PC ,BOOL_IN2 :=RPAU06A01_PC ,BOOL_IN3:=LPAU06A01_TC,
REAL_IN0:=RNIPAU06X00_TSET,REAL_IN1:=LPAU06A01_TSET,REAL_IN2 :=RPAU06A01_TSET,
INT_IN0 :=RNIPAU06X00_SM ,INT_IN1 :=LPAU06A01_SM ,INT_IN2 :=RPAU06A01_SM |
LPAU06A01_PC :=BOOL_OUT1 ,RPAU06A01_PC :=BOOL_OUT2 ,
LPAU06A01_TSET:=REAL_OUT1 ,RPAU06A01_TSET:=REAL_OUT2 ,
LPAU06A01_SM :=INT_OUT1 ,RPAU06A01_SM :=INT_OUT2 );
(*CO2联动程序*)
LPAU06A01_TC:=LPAU06A01_LC[1];
LPAU06A01_CO2S[1]:=LIES04F01_CO2S;
PAU06A01_SLG(ENABLE:=LPAU06A01_TM,LINKAGEVALUE:=LPAU06A01_CO2S,DEAD_BAND:=10.0,MAXRANGE:=2000.0,MINRANGE:=10.0,
LINKAGESET:=LPAU06A01_CO2SET,HOLDDELAY:=t#60s,ENABLENUM:=4,SCH_STR:=LPAU06A01_TSTR,ALLDAY:=LPAU06A01_DM | LPAU06A01_LC:=LINKAGEOUT);
END_PROGRAM