PROGRAM FAU VAR_EXTERNAL END_VAR VAR_GLOBAL END_VAR VAR FAUYYD01_IN :FAU_IN; FAUYYD01_OUT:FAU_OUT; FAUYYD01_SyncControl:IJ_LSyncControl; FAUYYD01_FAU:IJ_FAU; FAUYYD01_ST_AVE :BS_Average; FAUYYD01_WVB_AVE:BS_Average; LFAUYYD01_LC :ARRAY[0..10] OF BOOL; END_VAR (*Automatically declared*) VAR_EXTERNAL LFAUYYD01_TSET : REAL; LFAUYYD01_FDSC : BOOL; LFAUYYD01_FPS : BOOL; LFAUYYD01_VFMV : INT; LFAUYYD01_STS : REAL; LFAUYYD01_IPS : BOOL; LFAUYYD01_WVMV : REAL; LFAUYYD01_WVMC : BOOL; LFAUYYD01_VI : REAL; LFAUYYD01_VP : REAL; LFAUYYD01_FDOC : BOOL; LFAUYYD01_F : BOOL; LFAUYYD01_ISO3 : BOOL; LFAUYYD01_PC : BOOL; LFAUYYD01_ISO2 : BOOL; LFAUYYD01_ISO1 : BOOL; LFAUYYD01_A : BOOL; LFAUYYD01_R : BOOL; LFAUYYD01_SM : INT; LFAUYYD01_ST : INT; LFAUYYD01_WVCS : INT; LFAUYYD01_WVC : INT; LFAUYYD01_VFBS : INT; LFAUYYD01_RSTV : REAL; LFAUYYD01_RST : BOOL; LFAUYYD01_WVBS : REAL; LFAUYYD01_VFB : INT; LFAUYYD01_WVB : INT; LFAUYYD01_LM : BOOL; LFAUYYD01_VFCS : INT; LFAUYYD01_VFC : INT; LFAUYYD01_AFS : BOOL; END_VAR (** **) (** {********************************************FAUYYD01********************************************} **) (** {*输入,类型,示值上限,示值下限,基准补偿,输出补偿*} **) (** FAUYYD01_WVB_AVE(INPUT:=LFAUYYD01_WVB); **) (* call - Stmt *) CAL FAUYYD01_WVB_AVE ( INPUT := LFAUYYD01_WVB ) (** FAUYYD01_ST_AVE (INPUT:=LFAUYYD01_ST ); **) (* call - Stmt *) CAL FAUYYD01_ST_AVE ( INPUT := LFAUYYD01_ST ) (** LFAUYYD01_STS := BS_Scale(FAUYYD01_ST_AVE.Output ,1,0,100,0,0.0); **) (* assign - Stmt *) LD FAUYYD01_ST_AVE.Output BS_Scale 1, 0, 100, 0, 0.0 ST LFAUYYD01_STS (** LFAUYYD01_WVBS:= BS_Scale(FAUYYD01_WVB_AVE.Output,2,0,100,0,0.0); **) (* assign - Stmt *) LD FAUYYD01_WVB_AVE.Output BS_Scale 2, 0, 100, 0, 0.0 ST LFAUYYD01_WVBS (** LFAUYYD01_WVC :=REAL_TO_INT(BS_Scale(LFAUYYD01_WVCS ,4,0,100,0,0.0)); **) (* assign - Stmt *) LD LFAUYYD01_WVCS BS_Scale 4, 0, 100, 0, 0.0 REAL_TO_INT ST LFAUYYD01_WVC (** LFAUYYD01_VFBS:=REAL_TO_INT(BS_Scale(LFAUYYD01_VFB ,2,0,50 ,0,0.0)); **) (* assign - Stmt *) LD LFAUYYD01_VFB BS_Scale 2, 0, 50, 0, 0.0 REAL_TO_INT ST LFAUYYD01_VFBS (** LFAUYYD01_VFC :=REAL_TO_INT(BS_Scale((LFAUYYD01_VFCS*100) ,4,0,50 ,0,0.0)); **) (* assign - Stmt *) LD LFAUYYD01_VFCS MUL 100 BS_Scale 4, 0, 50, 0, 0.0 REAL_TO_INT ST LFAUYYD01_VFC (** {*主程序*} **) (** FAUYYD01_FAU(FAU_STRUCT_IN:=FAUYYD01_IN | FAUYYD01_OUT:=FAU_STRUCT_OUT); **) (* call - Stmt *) CAL FAUYYD01_FAU ( FAU_STRUCT_IN := FAUYYD01_IN | FAUYYD01_OUT := FAU_STRUCT_OUT ) (** {*FAU_INSTRUCT*} **) (** FAUYYD01_IN.SM :=LFAUYYD01_SM ; **) (* assign - Stmt *) LD LFAUYYD01_SM ST FAUYYD01_IN.SM (** FAUYYD01_IN.LM :=LFAUYYD01_LM ; **) (* assign - Stmt *) LD LFAUYYD01_LM ST FAUYYD01_IN.LM (** FAUYYD01_IN.Run :=LFAUYYD01_R ; **) (* assign - Stmt *) LD LFAUYYD01_R ST FAUYYD01_IN.Run (** FAUYYD01_IN.Fault :=LFAUYYD01_F ; **) (* assign - Stmt *) LD LFAUYYD01_F ST FAUYYD01_IN.Fault (** FAUYYD01_IN.Auto :=LFAUYYD01_A ; **) (* assign - Stmt *) LD LFAUYYD01_A ST FAUYYD01_IN.Auto (** FAUYYD01_IN.ContRol:=LFAUYYD01_PC ; **) (* assign - Stmt *) LD LFAUYYD01_PC ST FAUYYD01_IN.ContRol (** FAUYYD01_IN.FDOB :=LFAUYYD01_FDOC ; **) (* assign - Stmt *) LD LFAUYYD01_FDOC ST FAUYYD01_IN.FDOB (** FAUYYD01_IN.FDSB :=LFAUYYD01_FDSC ; **) (* assign - Stmt *) LD LFAUYYD01_FDSC ST FAUYYD01_IN.FDSB (** FAUYYD01_IN.TSET :=LFAUYYD01_TSET ; **) (* assign - Stmt *) LD LFAUYYD01_TSET ST FAUYYD01_IN.TSET (** FAUYYD01_IN.WVMC :=LFAUYYD01_WVMC ; **) (* assign - Stmt *) LD LFAUYYD01_WVMC ST FAUYYD01_IN.WVMC (** FAUYYD01_IN.WVMV :=LFAUYYD01_WVMV ; **) (* assign - Stmt *) LD LFAUYYD01_WVMV ST FAUYYD01_IN.WVMV (** FAUYYD01_IN.VFMV :=LFAUYYD01_VFMV ; **) (* assign - Stmt *) LD LFAUYYD01_VFMV ST FAUYYD01_IN.VFMV (** FAUYYD01_IN.STS :=LFAUYYD01_STS ; **) (* assign - Stmt *) LD LFAUYYD01_STS ST FAUYYD01_IN.STS (** FAUYYD01_IN.RST :=LFAUYYD01_RST ; **) (* assign - Stmt *) LD LFAUYYD01_RST ST FAUYYD01_IN.RST (** FAUYYD01_IN.RSTV :=LFAUYYD01_RSTV ; **) (* assign - Stmt *) LD LFAUYYD01_RSTV ST FAUYYD01_IN.RSTV (** FAUYYD01_IN.FPS :=LFAUYYD01_FPS ; **) (* assign - Stmt *) LD LFAUYYD01_FPS ST FAUYYD01_IN.FPS (** FAUYYD01_IN.IPS :=LFAUYYD01_IPS ; **) (* assign - Stmt *) LD LFAUYYD01_IPS ST FAUYYD01_IN.IPS (** FAUYYD01_IN.AFS :=LFAUYYD01_AFS ; **) (* assign - Stmt *) LD LFAUYYD01_AFS ST FAUYYD01_IN.AFS (** FAUYYD01_IN.ISO1 :=LFAUYYD01_ISO1 ; **) (* assign - Stmt *) LD LFAUYYD01_ISO1 ST FAUYYD01_IN.ISO1 (** FAUYYD01_IN.ISO2 :=LFAUYYD01_ISO2 ; **) (* assign - Stmt *) LD LFAUYYD01_ISO2 ST FAUYYD01_IN.ISO2 (** FAUYYD01_IN.ISO3 :=LFAUYYD01_ISO3 ; **) (* assign - Stmt *) LD LFAUYYD01_ISO3 ST FAUYYD01_IN.ISO3 (** FAUYYD01_IN.VP :=LFAUYYD01_VP ; **) (* assign - Stmt *) LD LFAUYYD01_VP ST FAUYYD01_IN.VP (** FAUYYD01_IN.VI :=LFAUYYD01_VI ; **) (* assign - Stmt *) LD LFAUYYD01_VI ST FAUYYD01_IN.VI (** FAUYYD01_IN.FDELAY :=t#30s ; **) (* assign - Stmt *) LD t#30s ST FAUYYD01_IN.FDELAY (** FAUYYD01_IN.VDELAY :=t#120s ; **) (* assign - Stmt *) LD t#120s ST FAUYYD01_IN.VDELAY (** **) END_PROGRAM