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.
 
 
 
 
 
 

140 lines
6.6 KiB

PROGRAM PAU
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
PAU05B01_IN :FAU_IN;
PAU05B01_OUT:FAU_OUT;
PAU05B01_SyncControl:IJ_LSyncControl;
PAU05B01_FAU:IJ_FAU;
PAU05B01_ST_AVE :BS_Average;
PAU05B01_WVB_AVE:BS_Average;
PAU05B01_SLG :IJ_EAFGroup;
LPAU05B01_CO2S:ARRAY[0..10] OF REAL;
LPAU05B01_LC :ARRAY[0..10] OF BOOL;
PAU05B02_IN :FAU_IN;
PAU05B02_OUT:FAU_OUT;
PAU05B02_SyncControl:IJ_LSyncControl;
PAU05B02_FAU:IJ_FAU;
PAU05B02_ST_AVE :BS_Average;
PAU05B02_WVB_AVE:BS_Average;
PAU05B02_SLG :IJ_EAFGroup;
LPAU05B02_CO2S:ARRAY[0..10] OF REAL;
LPAU05B02_LC :ARRAY[0..10] OF BOOL;
END_VAR
(********************************************PAU05B01********************************************)
(**)
PAU05B01_WVB_AVE(INPUT:=LPAU05B01_WVB);
PAU05B01_ST_AVE (INPUT:=LPAU05B01_ST );
LPAU05B01_STS := BS_Scale(PAU05B01_ST_AVE.Output ,1,0,100,0,0.0);
LPAU05B01_WVBS:= BS_Scale(PAU05B01_WVB_AVE.Output,2,0,100,0,0.0);
LPAU05B01_WVC :=REAL_TO_INT(BS_Scale(LPAU05B01_WVCS ,4,0,100,0,0.0));
LPAU05B01_VFBS:=REAL_TO_INT(BS_Scale(LPAU05B01_VFB ,2,0,50 ,0,0.0));
LPAU05B01_VFC :=REAL_TO_INT(BS_Scale((LPAU05B01_VFCS*100) ,4,0,50 ,0,0.0));
(**)
PAU05B01_FAU(FAU_STRUCT_IN:=PAU05B01_IN | PAU05B01_OUT:=FAU_STRUCT_OUT);
(*FAU_INSTRUCT*)
PAU05B01_IN.SM :=LPAU05B01_SM ;
PAU05B01_IN.LM :=LPAU05B01_LM ;
PAU05B01_IN.Run :=LPAU05B01_R ;
PAU05B01_IN.Fault :=LPAU05B01_F ;
PAU05B01_IN.Auto :=LPAU05B01_A ;
PAU05B01_IN.ContRol:=LPAU05B01_PC ;
PAU05B01_IN.FDOB :=LPAU05B01_FDOB ;
PAU05B01_IN.FDSB :=LPAU05B01_FDSB ;
PAU05B01_IN.TSET :=LPAU05B01_TSET ;
PAU05B01_IN.WVMC :=LPAU05B01_WVMC ;
PAU05B01_IN.WVMV :=LPAU05B01_WVMV ;
PAU05B01_IN.VFMV :=LPAU05B01_VFMV ;
PAU05B01_IN.STS :=LPAU05B01_STS ;
PAU05B01_IN.RST :=LPAU05B01_RST ;
PAU05B01_IN.RSTV :=LPAU05B01_RSTV ;
PAU05B01_IN.FPS :=LPAU05B01_FPS ;
PAU05B01_IN.IPS :=LPAU05B01_IPS ;
PAU05B01_IN.AFS :=LPAU05B01_AFS ;
PAU05B01_IN.ISO1 :=LPAU05B01_ISO1 ;
PAU05B01_IN.ISO2 :=LPAU05B01_ISO2 ;
PAU05B01_IN.ISO3 :=LPAU05B01_ISO3 ;
PAU05B01_IN.VP :=LPAU05B01_VP ;
PAU05B01_IN.VI :=LPAU05B01_VI ;
PAU05B01_IN.FDELAY :=t#30s ;
PAU05B01_IN.VDELAY :=t#120s ;
(*FAU_OUTSTRUCT*)
LPAU05B01_WVCS :=PAU05B01_OUT.WVCS ;
LPAU05B01_VFCS :=PAU05B01_OUT.VFCS ;
LPAU05B01_FDOC :=PAU05B01_OUT.FDO ;
LPAU05B01_FDSC :=PAU05B01_OUT.FDS ;
LPAU05B01_C :=PAU05B01_OUT.ContRol;
LPAU05B01_RH :=PAU05B01_OUT.RH ;
LPAU05B01_SN :=PAU05B01_OUT.SN ;
(**)
PAU05B01_SyncContRol(CM:=RNIPAU00000_CM,RM:=LCMD00000_RM,
BOOL_IN0:=RNIPAU05X00_PC ,BOOL_IN1:=LPAU05B01_PC ,BOOL_IN2 :=RPAU05B01_PC ,BOOL_IN3:=LPAU05B01_TC,
REAL_IN0:=RNIPAU05X00_TSET,REAL_IN1:=LPAU05B01_TSET,REAL_IN2 :=RPAU05B01_TSET,
INT_IN0 :=RNIPAU05X00_SM ,INT_IN1 :=LPAU05B01_SM ,INT_IN2 :=RPAU05B01_SM |
LPAU05B01_PC :=BOOL_OUT1 ,RPAU05B01_PC :=BOOL_OUT2 ,
LPAU05B01_TSET:=REAL_OUT1 ,RPAU05B01_TSET:=REAL_OUT2 ,
LPAU05B01_SM :=INT_OUT1 ,RPAU05B01_SM :=INT_OUT2 );
(********************************************PAU05B02********************************************)
(**)
PAU05B02_WVB_AVE(INPUT:=LPAU05B02_WVB);
PAU05B02_ST_AVE (INPUT:=LPAU05B02_ST );
LPAU05B02_STS := BS_Scale(PAU05B02_ST_AVE.Output ,1,0,100,0,0.0);
LPAU05B02_WVBS:= BS_Scale(PAU05B02_WVB_AVE.Output,2,0,100,0,0.0);
LPAU05B02_WVC :=REAL_TO_INT(BS_Scale(LPAU05B02_WVCS ,4,0,100,0,0.0));
LPAU05B02_VFBS:=REAL_TO_INT(BS_Scale(LPAU05B02_VFB ,2,0,50 ,0,0.0));
LPAU05B02_VFC :=REAL_TO_INT(BS_Scale((LPAU05B02_VFCS*100) ,4,0,50 ,0,0.0));
(**)
PAU05B02_FAU(FAU_STRUCT_IN:=PAU05B02_IN | PAU05B02_OUT:=FAU_STRUCT_OUT);
(*FAU_INSTRUCT*)
PAU05B02_IN.SM :=LPAU05B02_SM ;
PAU05B02_IN.LM :=LPAU05B02_LM ;
PAU05B02_IN.Run :=LPAU05B02_R ;
PAU05B02_IN.Fault :=LPAU05B02_F ;
PAU05B02_IN.Auto :=LPAU05B02_A ;
PAU05B02_IN.ContRol:=LPAU05B02_PC ;
PAU05B02_IN.FDOB :=LPAU05B02_FDOB ;
PAU05B02_IN.FDSB :=LPAU05B02_FDSB ;
PAU05B02_IN.TSET :=LPAU05B02_TSET ;
PAU05B02_IN.WVMC :=LPAU05B02_WVMC ;
PAU05B02_IN.WVMV :=LPAU05B02_WVMV ;
PAU05B02_IN.VFMV :=LPAU05B02_VFMV ;
PAU05B02_IN.STS :=LPAU05B02_STS ;
PAU05B02_IN.RST :=LPAU05B02_RST ;
PAU05B02_IN.RSTV :=LPAU05B02_RSTV ;
PAU05B02_IN.FPS :=LPAU05B02_FPS ;
PAU05B02_IN.IPS :=LPAU05B02_IPS ;
PAU05B02_IN.AFS :=LPAU05B02_AFS ;
PAU05B02_IN.ISO1 :=LPAU05B02_ISO1 ;
PAU05B02_IN.ISO2 :=LPAU05B02_ISO2 ;
PAU05B02_IN.ISO3 :=LPAU05B02_ISO3 ;
PAU05B02_IN.VP :=LPAU05B02_VP ;
PAU05B02_IN.VI :=LPAU05B02_VI ;
PAU05B02_IN.FDELAY :=t#30s ;
PAU05B02_IN.VDELAY :=t#120s ;
(*FAU_OUTSTRUCT*)
LPAU05B02_WVCS :=PAU05B02_OUT.WVCS ;
LPAU05B02_VFCS :=PAU05B02_OUT.VFCS ;
LPAU05B02_FDOC :=PAU05B02_OUT.FDO ;
LPAU05B02_FDSC :=PAU05B02_OUT.FDS ;
LPAU05B02_C :=PAU05B02_OUT.ContRol;
LPAU05B02_RH :=PAU05B02_OUT.RH ;
LPAU05B02_SN :=PAU05B02_OUT.SN ;
(**)
PAU05B02_SyncContRol(CM:=RNIPAU00000_CM,RM:=LCMD00000_RM,
BOOL_IN0:=RNIPAU05X00_PC ,BOOL_IN1:=LPAU05B02_PC ,BOOL_IN2 :=RPAU05B02_PC ,BOOL_IN3:=LPAU05B02_TC,
REAL_IN0:=RNIPAU05X00_TSET,REAL_IN1:=LPAU05B02_TSET,REAL_IN2 :=RPAU05B02_TSET,
INT_IN0 :=RNIPAU05X00_SM ,INT_IN1 :=LPAU05B02_SM ,INT_IN2 :=RPAU05B02_SM |
LPAU05B02_PC :=BOOL_OUT1 ,RPAU05B02_PC :=BOOL_OUT2 ,
LPAU05B02_TSET:=REAL_OUT1 ,RPAU05B02_TSET:=REAL_OUT2 ,
LPAU05B02_SM :=INT_OUT1 ,RPAU05B02_SM :=INT_OUT2 );
END_PROGRAM