FUNCTION_BLOCK BS_CMFCU VAR_EXTERNAL END_VAR VAR_INPUT FAU_STRUCT_IN :FAU_IN; END_VAR VAR_OUTPUT FAU_STRUCT_OUT :FAU_OUT; END_VAR VAR FAU_SPID :BS_PID; FAU_WPID :BS_PID; FAU_RunTime :BS_Runtime; FAU_WVCTEMP :REAL; RunTon1 :TON; RunTon2 :TON; RunTon3 :TON; RunTon5 :TON; FanTon1 :TON; FanTon2 :TON; FanTon2q :BOOL; RunTof1 :TOF; RunTof2 :TOF; RunTof3 :TOF; DevCheck1_time :TIME :=t#15s; (*设备运行状态反馈*) DevCheck2_time :TIME :=t#15s; (*设备运行状态反馈*) AFSDelay_time :TIME :=t#10s; Status0 :INT; Status1 :INT; Status2 :INT; Status3 :INT; FAU_SPID_VP :REAL; FAU_SPID_VI :REAL; FAU_WPID_VP :REAL; FAU_WPID_VI :REAL; PID_in :BOOL; PID_timer :TON; AFSM :BOOL; FDSM :BOOL; FDOM :BOOL; FDOTon :TON; FDSTon :TON; FAU_FEC :BS_FEC; FAU_CM :BOOL; FAU_VFCSM :INT; ini :BOOL; VFMVM :INT; AFSON :BOOL; AFSOF :BOOL; AFSTON :TON; AFSTOF :TOF; FVCS :REAL; END_VAR (*Automatically declared*) VAR_EXTERNAL END_VAR (** {* **) (** **) (** ʱ 䣺20201028 **) (** 1.1 **) (** ߣҦ **) (** ƣʡƵյܿ **) (** ˵ **) (** **) (** FAU_STRUCT_IN. **) (** SM :INT ; ģʽ 0ļ 1 2 **) (** LM :LM ; ģʽ 0 1 **) (** Run :BOOL; ״̬ **) (** Fault :BOOL; ״̬ **) (** Auto :BOOL; Զ״̬ **) (** Control :BOOL; **) (** FVMC :BOOL; 緧ֶ **) (** FVMV :REAL; 緧ֵֶ **) (** FVOCT :TIME; 緧ʱ趨OpenCycleTime **) (** FVOST :TIME; 緧ȶʱ趨OpenStableTime **) (** TSET :REAL; ¶趨 **) (** WVMC :BOOL; ˮֶ **) (** WVMV :REAL; ˮֵֶ **) (** VFMC :BOOL; Ƶֶ **) (** VFMV :INT; Ƶ趨ֵ **) (** STS :REAL; ͷ¶ **) (** RST :BOOL; ʱۼ **) (** RSTV :REAL; ʱۼֵ **) (** FPS :BOOL; ѹ **) (** IPS :BOOL; ѹ **) (** AFS :BOOL; ¶· **) (** ISO1 :BOOL; йϷ **) (** ISO2 :BOOL; ѹ **) (** ISO3 :BOOL; ¶· **) (** VFBS :INT; Ƶ **) (** VP :REAL; PI趨ֵP **) (** VI :REAL; PI趨ֵI **) (** FDELAY :TIME; ʱ **) (** VDELAY :TIME; 緧źгʱ **) (** **) (** FAU_STRUCT_OUT. **) (** WVCS :INT ; ˮתֵŴ100 **) (** VFCS :INT ; Ƶ (35~50) **) (** FVCS :INT ; 緧 (50~100) **) (** Control :BOOL; ͣ **) (** RH :REAL; Сʱ **) (** SN :INT ; 豸״̬ **) (** **) (** ¼㹦 **) (** 1.йϻؼ,ϴ룬ֹ֧ϱ **) (** 2.ˮPID/ֶ **) (** 3.ʱۼ **) (** 4. **) (** 5.緧Ĭ50%ȣOSTȶ100%һʱ䣬ÿ趨ʱOCTԤ4Сʱٿ100%ȶʱOST **) (** 7.ͣ **) (** 8.Ƶ **) (** **) (** ע **) (** 飺 **) (** BS_PID; **) (** BS_Runtime; **) (** **) (** *}{* **) (** if ini=0 then **) (** FAU_STRUCT_IN.VFMV:=40; **) (** ini:=1; **) (** end_if;*} **) (** **) (** **) (** **) (** **) (** **) (** **) (** {******************************************************CO2******************************************************* **) (** ܿ **) (** if FAU_STRUCT_IN.LM=0 then **) (** if FAU_STRUCT_IN.Control=1 then **) (** FAU_CM:=1; **) (** else FAU_CM:=0; **) (** end_if; **) (** end_if; **) (** **) (** if FAU_STRUCT_IN.LM=1 then **) (** FAU_FEC(RUN :=FAU_STRUCT_IN.CM , SET :=FAU_STRUCT_IN.CO2SET , FB :=FAU_STRUCT_IN.CO2S , DEAD_BAND :=10.0 , DELAY :=t#20s | FAU_CM:= DevC); **) (** end_if; **) (** *} **) (** **) (** {******************************************************·ͣ********************************************************} **) (** **) (** if AFSM=0 then{*ʼ*} **) (* if - Cond *) LD AFSM EQ 0 JMPCN ODK_SKIP_000000000000001_000000000000001 (* then - Stmts *) (** **) (** {*緧*} **) (** if FAU_STRUCT_IN.Control=1 then **) (* if - Cond *) LD FAU_STRUCT_IN.Control EQ 1 JMPCN ODK_SKIP_000000000000002_000000000000001 (* then - Stmts *) (** FanTon1 ( IN:=FanTon2q , PT:=FAU_STRUCT_IN.FVOCT ); **) (* call - Stmt *) CAL FanTon1 ( IN := FanTon2q, PT := FAU_STRUCT_IN.FVOCT ) (** FanTon2 ( IN:=FanTon1.q , PT:=FAU_STRUCT_IN.FVOST ); **) (* call - Stmt *) CAL FanTon2 ( IN := FanTon1.q, PT := FAU_STRUCT_IN.FVOST ) (** FanTon2q:=not FanTon2.q; **) (* assign - Stmt *) LD FanTon2.q NOT ST FanTon2q (** if FAU_STRUCT_IN.FVMC=0 then **) (* if - Cond *) LD FAU_STRUCT_IN.FVMC EQ 0 JMPCN ODK_SKIP_000000000000003_000000000000001 (* then - Stmts *) (** if FanTon1.q=1 and FanTon2.q=0 then **) (* if - Cond *) LD FanTon1.q EQ 1 AND ( FanTon2.q EQ 0 ) JMPCN ODK_SKIP_000000000000004_000000000000001 (* then - Stmts *) (** FAU_STRUCT_OUT.FVCS:=50; **) (* assign - Stmt *) LD 50 ST FAU_STRUCT_OUT.FVCS JMP ODK_END_IF_000000000000004 (** else **) (* else *) ODK_SKIP_000000000000004_000000000000001: (* else - Stmts *) (** FAU_STRUCT_OUT.FVCS:=100; **) (* assign - Stmt *) LD 100 ST FAU_STRUCT_OUT.FVCS (** end_if; **) (* if - End *) ODK_END_IF_000000000000004: JMP ODK_END_IF_000000000000003 (** else **) (* else *) ODK_SKIP_000000000000003_000000000000001: (* else - Stmts *) (** FAU_STRUCT_OUT.FVCS:=FAU_STRUCT_IN.FVMV; **) (* assign - Stmt *) LD FAU_STRUCT_IN.FVMV ST FAU_STRUCT_OUT.FVCS (** end_if; **) (* if - End *) ODK_END_IF_000000000000003: JMP ODK_END_IF_000000000000002 (** end_if; **) (* if - End *) ODK_SKIP_000000000000002_000000000000001: ODK_END_IF_000000000000002: (** **) (** {***************************************ʱ**********************************************} **) (** **) (** RunTon3 ( IN:=FAU_STRUCT_IN.Control , PT:=FAU_STRUCT_IN.FDELAY | FAU_STRUCT_OUT.Control:=q ); **) (* call - Stmt *) CAL RunTon3 ( IN := FAU_STRUCT_IN.Control, PT := FAU_STRUCT_IN.FDELAY | FAU_STRUCT_OUT.Control := q ) (** **) (** **) (** if FAU_STRUCT_IN.Run=1 then **) (* if - Cond *) LD FAU_STRUCT_IN.Run EQ 1 JMPCN ODK_SKIP_000000000000005_000000000000001 (* then - Stmts *) (** {*Ƶֵ*} **) (** if FAU_STRUCT_IN.VFMC =1 then **) (* if - Cond *) LD FAU_STRUCT_IN.VFMC EQ 1 JMPCN ODK_SKIP_000000000000006_000000000000001 (* then - Stmts *) (** if FAU_STRUCT_IN.VFMV<=50 and FAU_STRUCT_IN.VFMV>=35 then **) (* if - Cond *) LD FAU_STRUCT_IN.VFMV LE 50 AND ( FAU_STRUCT_IN.VFMV GE 35 ) JMPCN ODK_SKIP_000000000000007_000000000000001 (* then - Stmts *) (** FAU_STRUCT_OUT.VFCS:=FAU_STRUCT_IN.VFMV; **) (* assign - Stmt *) LD FAU_STRUCT_IN.VFMV ST FAU_STRUCT_OUT.VFCS JMP ODK_END_IF_000000000000007 (** end_if; **) (* if - End *) ODK_SKIP_000000000000007_000000000000001: ODK_END_IF_000000000000007: (** if FAU_STRUCT_IN.VFMV>50 then **) (* if - Cond *) LD FAU_STRUCT_IN.VFMV GT 50 JMPCN ODK_SKIP_000000000000008_000000000000001 (* then - Stmts *) (** FAU_STRUCT_OUT.VFCS:=50; **) (* assign - Stmt *) LD 50 ST FAU_STRUCT_OUT.VFCS JMP ODK_END_IF_000000000000008 (** end_if; **) (* if - End *) ODK_SKIP_000000000000008_000000000000001: ODK_END_IF_000000000000008: (** if FAU_STRUCT_IN.VFMV<35 then **) (* if - Cond *) LD FAU_STRUCT_IN.VFMV LT 35 JMPCN ODK_SKIP_000000000000009_000000000000001 (* then - Stmts *) (** FAU_STRUCT_OUT.VFCS:=35; **) (* assign - Stmt *) LD 35 ST FAU_STRUCT_OUT.VFCS JMP ODK_END_IF_000000000000009 (** end_if; **) (* if - End *) ODK_SKIP_000000000000009_000000000000001: ODK_END_IF_000000000000009: JMP ODK_END_IF_000000000000006 (** else **) (* else *) ODK_SKIP_000000000000006_000000000000001: (* else - Stmts *) (** FAU_STRUCT_OUT.VFCS:=50; **) (* assign - Stmt *) LD 50 ST FAU_STRUCT_OUT.VFCS (** end_if; **) (* if - End *) ODK_END_IF_000000000000006: JMP ODK_END_IF_000000000000005 (** else **) (* else *) ODK_SKIP_000000000000005_000000000000001: (* else - Stmts *) (** FAU_STRUCT_OUT.VFCS:=0; **) (* assign - Stmt *) LD 0 ST FAU_STRUCT_OUT.VFCS (** end_if; **) (* if - End *) ODK_END_IF_000000000000005: (** **) (** **) (** {******************************************************ˮ******************************************************} **) (** **) (** PID_in:= not PID_timer.q; **) (* assign - Stmt *) LD PID_timer.q NOT ST PID_in (** PID_timer(in:=PID_in, pt:=t#1s );{*PIDʱ*} **) (* call - Stmt *) CAL PID_timer ( IN := PID_in, PT := t#1s ) (** **) (** if FAU_STRUCT_IN.WVMC=0 then **) (* if - Cond *) LD FAU_STRUCT_IN.WVMC EQ 0 JMPCN ODK_SKIP_00000000000000A_000000000000001 (* then - Stmts *) (** if FAU_STRUCT_IN.Run=1 then **) (* if - Cond *) LD FAU_STRUCT_IN.Run EQ 1 JMPCN ODK_SKIP_00000000000000B_000000000000001 (* then - Stmts *) (** if FAU_STRUCT_IN.VP<>0.0 and FAU_STRUCT_IN.VI<>0.0 then **) (* if - Cond *) LD FAU_STRUCT_IN.VP NE 0.0 AND ( FAU_STRUCT_IN.VI NE 0.0 ) JMPCN ODK_SKIP_00000000000000C_000000000000001 (* then - Stmts *) (** FAU_SPID_VP:=-FAU_STRUCT_IN.VP; **) (* assign - Stmt *) LD FAU_STRUCT_IN.VP NEG ST FAU_SPID_VP (** FAU_SPID_VI:=-FAU_STRUCT_IN.VI; **) (* assign - Stmt *) LD FAU_STRUCT_IN.VI NEG ST FAU_SPID_VI (** FAU_WPID_VP:=FAU_STRUCT_IN.VP; **) (* assign - Stmt *) LD FAU_STRUCT_IN.VP ST FAU_WPID_VP (** FAU_WPID_VI:=FAU_STRUCT_IN.VI; **) (* assign - Stmt *) LD FAU_STRUCT_IN.VI ST FAU_WPID_VI JMP ODK_END_IF_00000000000000C (** else **) (* else *) ODK_SKIP_00000000000000C_000000000000001: (* else - Stmts *) (** FAU_SPID_VP:=-30.0; **) (* assign - Stmt *) LD -30.0 ST FAU_SPID_VP (** FAU_SPID_VI:=-150.0; **) (* assign - Stmt *) LD -150.0 ST FAU_SPID_VI (** FAU_WPID_VP:=30.0; **) (* assign - Stmt *) LD 30.0 ST FAU_WPID_VP (** FAU_WPID_VI:=150.0; **) (* assign - Stmt *) LD 150.0 ST FAU_WPID_VI (** end_if; **) (* if - End *) ODK_END_IF_00000000000000C: (** {*伾*} **) (** if FAU_STRUCT_IN.SM=0 then **) (* if - Cond *) LD FAU_STRUCT_IN.SM EQ 0 JMPCN ODK_SKIP_00000000000000D_000000000000001 (* then - Stmts *) (** if FAU_STRUCT_IN.STS-FAU_STRUCT_IN.TSET>=3.0 then **) (* if - Cond *) LD FAU_STRUCT_IN.STS SUB FAU_STRUCT_IN.TSET GE 3.0 JMPCN ODK_SKIP_00000000000000E_000000000000001 (* then - Stmts *) (** FAU_WVCTEMP:=100.0; **) (* assign - Stmt *) LD 100.0 ST FAU_WVCTEMP JMP ODK_END_IF_00000000000000E (** end_if; **) (* if - End *) ODK_SKIP_00000000000000E_000000000000001: ODK_END_IF_00000000000000E: (** if PID_timer.q then **) (* if - Cond *) LD PID_timer.q JMPCN ODK_SKIP_00000000000000F_000000000000001 (* then - Stmts *) (** FAU_SPID(RUN:= FAU_STRUCT_IN.RUN,STOP_D:=1,STOP_I:=0,SET:=FAU_STRUCT_IN.TSET,FB:=FAU_STRUCT_IN.STS,KFB:=1.0,KP:=FAU_SPID_VP,TI:=FAU_SPID_VI,TD:=-1.0,DEAD_BAND:=0.2,YMAX:=100.0,YMIN:=0.0 | FAU_WVCTEMP:=OUT); **) (* call - Stmt *) CAL FAU_SPID ( Run := FAU_STRUCT_IN.Run, STOP_D := 1, STOP_I := 0, SET := FAU_STRUCT_IN.TSET, FB := FAU_STRUCT_IN.STS, KFB := 1.0, KP := FAU_SPID_VP, TI := FAU_SPID_VI, TD := -1.0, DEAD_BAND := 0.2, YMAX := 100.0, YMIN := 0.0 | FAU_WVCTEMP := OUT ) JMP ODK_END_IF_00000000000000F (** end_if; **) (* if - End *) ODK_SKIP_00000000000000F_000000000000001: ODK_END_IF_00000000000000F: JMP ODK_END_IF_00000000000000D (** end_if; **) (* if - End *) ODK_SKIP_00000000000000D_000000000000001: ODK_END_IF_00000000000000D: (** {*ȼ*} **) (** if FAU_STRUCT_IN.SM=1 then **) (* if - Cond *) LD FAU_STRUCT_IN.SM EQ 1 JMPCN ODK_SKIP_00000000000000G_000000000000001 (* then - Stmts *) (** if FAU_STRUCT_IN.TSET-FAU_STRUCT_IN.STS>=3.0 then **) (* if - Cond *) LD FAU_STRUCT_IN.TSET SUB FAU_STRUCT_IN.STS GE 3.0 JMPCN ODK_SKIP_00000000000000H_000000000000001 (* then - Stmts *) (** FAU_WVCTEMP:=100.0; **) (* assign - Stmt *) LD 100.0 ST FAU_WVCTEMP JMP ODK_END_IF_00000000000000H (** end_if; **) (* if - End *) ODK_SKIP_00000000000000H_000000000000001: ODK_END_IF_00000000000000H: (** if PID_timer.q then **) (* if - Cond *) LD PID_timer.q JMPCN ODK_SKIP_00000000000000I_000000000000001 (* then - Stmts *) (** FAU_WPID(RUN:= FAU_STRUCT_IN.RUN,STOP_D:=1,STOP_I:=0,SET:=FAU_STRUCT_IN.TSET,FB:=FAU_STRUCT_IN.STS,KFB:=1.0,KP:=FAU_WPID_VP,TI:=FAU_WPID_VI,TD:=1.0,DEAD_BAND:=0.2,YMAX:=100.0,YMIN:=0.0 | FAU_WVCTEMP:=OUT); **) (* call - Stmt *) CAL FAU_WPID ( Run := FAU_STRUCT_IN.Run, STOP_D := 1, STOP_I := 0, SET := FAU_STRUCT_IN.TSET, FB := FAU_STRUCT_IN.STS, KFB := 1.0, KP := FAU_WPID_VP, TI := FAU_WPID_VI, TD := 1.0, DEAD_BAND := 0.2, YMAX := 100.0, YMIN := 0.0 | FAU_WVCTEMP := OUT ) JMP ODK_END_IF_00000000000000I (** end_if; **) (* if - End *) ODK_SKIP_00000000000000I_000000000000001: ODK_END_IF_00000000000000I: JMP ODK_END_IF_00000000000000G (** end_if; **) (* if - End *) ODK_SKIP_00000000000000G_000000000000001: ODK_END_IF_00000000000000G: (** {*ɼ*} **) (** if FAU_STRUCT_IN.SM=2 then **) (* if - Cond *) LD FAU_STRUCT_IN.SM EQ 2 JMPCN ODK_SKIP_00000000000000J_000000000000001 (* then - Stmts *) (** FAU_WVCTEMP:=0.0; **) (* assign - Stmt *) LD 0.0 ST FAU_WVCTEMP JMP ODK_END_IF_00000000000000J (** end_if; **) (* if - End *) ODK_SKIP_00000000000000J_000000000000001: ODK_END_IF_00000000000000J: JMP ODK_END_IF_00000000000000B (** else **) (* else *) ODK_SKIP_00000000000000B_000000000000001: (* else - Stmts *) (** FAU_WVCTEMP:=0.0; **) (* assign - Stmt *) LD 0.0 ST FAU_WVCTEMP (** end_if; **) (* if - End *) ODK_END_IF_00000000000000B: JMP ODK_END_IF_00000000000000A (** else **) (* else *) ODK_SKIP_00000000000000A_000000000000001: (* else - Stmts *) (** FAU_WVCTEMP:=FAU_STRUCT_IN.WVMV; **) (* assign - Stmt *) LD FAU_STRUCT_IN.WVMV ST FAU_WVCTEMP (** end_if; **) (* if - End *) ODK_END_IF_00000000000000A: JMP ODK_END_IF_000000000000001 (** **) (** end_if;{*ν*} **) (* if - End *) ODK_SKIP_000000000000001_000000000000001: ODK_END_IF_000000000000001: (** **) (** **) (** {*ˮֵת*} **) (** FAU_STRUCT_OUT.WVCS:=REAL_TO_INT(FAU_WVCTEMP*100.0); **) (* assign - Stmt *) LD FAU_WVCTEMP MUL 100.0 REAL_TO_INT ST FAU_STRUCT_OUT.WVCS (** **) (** **) (** {***************************************緧ŵλӳֹͣƵ********************************************* **) (** **) (** FDOTon( IN:=FDOM , PT:=FAU_STRUCT_IN.VDELAY); **) (** FDSTon( IN:=FDSM , PT:=FAU_STRUCT_IN.VDELAY); **) (** **) (** if FDOM=1 and FDOTon.q=0 then **) (** FAU_STRUCT_OUT.FDO:=1; **) (** else FAU_STRUCT_OUT.FDO:=0; **) (** end_if; **) (** if FDSM=1 and FDSTon.q=0 then **) (** FAU_STRUCT_OUT.FDS:=1; **) (** else FAU_STRUCT_OUT.FDS:=0; **) (** end_if; **) (** **) (** *} **) (** {*Ƶͣ*} **) (** {* **) (** Ƶֹͣɺر,ƵһԴֹͣʱ˹ **) (** **) (** RunTon5 ( IN:=RunTon5M , PT:=DevDelay5_time ); **) (** RunTon5M:= not RunTon5.q; **) (** **) (** if RunTon3.Q =1 then **) (** if RunTon5.Q then **) (** FAU_VFCSM:=FAU_VFCSM+1; **) (** end_if; **) (** if FAU_VFCSM>FAU_STRUCT_IN.VFMV then **) (** FAU_VFCSM:=FAU_STRUCT_IN.VFMV; **) (** end_if; **) (** end_if; **) (** if FAU_CM =0 then **) (** if RunTon5.Q then **) (** FAU_VFCSM:=FAU_VFCSM-1; **) (** end_if; **) (** if FAU_VFCSM<1 then **) (** FAU_VFCSM:=0; **) (** FAU_STRUCT_OUT.Control :=0; **) (** FDOM:=0; **) (** FDSM:=1; **) (** end_if; **) (** end_if; **) (** **) (** **) (** if RunTon3.q=1 then **) (** if FAU_VFCSM=FAU_STRUCT_IN.VFMV then **) (** FAU_STRUCT_OUT.Control:=1; **) (** end_if; **) (** if FAU_VFCSM=0 then **) (** FAU_STRUCT_OUT.Control:=0; **) (** end_if; **) (** end_if; **) (** **) (** FAU_STRUCT_OUT.VFCS :=FAU_VFCSM; **) (** *} **) (** {************************************************************************************************************} **) (** **) (** if FAU_STRUCT_IN.ISO3=0 and FAU_STRUCT_IN.SM=1 then **) (* if - Cond *) LD FAU_STRUCT_IN.ISO3 EQ 0 AND ( FAU_STRUCT_IN.SM EQ 1 ) JMPCN ODK_SKIP_00000000000000K_000000000000001 (* then - Stmts *) (** AFSTON ( IN:=FAU_STRUCT_IN.AFS , PT:=AFSDelay_time | AFSON:=q ); **) (* call - Stmt *) CAL AFSTON ( IN := FAU_STRUCT_IN.AFS, PT := AFSDelay_time | AFSON := q ) (** AFSTOF ( IN:=FAU_STRUCT_IN.AFS , PT:=AFSDelay_time | AFSOF:=q ); **) (* call - Stmt *) CAL AFSTOF ( IN := FAU_STRUCT_IN.AFS, PT := AFSDelay_time | AFSOF := q ) (** if AFSON=1 and AFSOF=1 then **) (* if - Cond *) LD AFSON EQ 1 AND ( AFSOF EQ 1 ) JMPCN ODK_SKIP_00000000000000L_000000000000001 (* then - Stmts *) (** AFSM:=1 ; **) (* assign - Stmt *) LD 1 ST AFSM JMP ODK_END_IF_00000000000000L (** end_if; **) (* if - End *) ODK_SKIP_00000000000000L_000000000000001: ODK_END_IF_00000000000000L: (** if AFSOF=0 and AFSON=0 then **) (* if - Cond *) LD AFSOF EQ 0 AND ( AFSON EQ 0 ) JMPCN ODK_SKIP_00000000000000M_000000000000001 (* then - Stmts *) (** AFSM:=0 ; **) (* assign - Stmt *) LD 0 ST AFSM JMP ODK_END_IF_00000000000000M (** end_if; **) (* if - End *) ODK_SKIP_00000000000000M_000000000000001: ODK_END_IF_00000000000000M: (** if AFSM=1 then **) (* if - Cond *) LD AFSM EQ 1 JMPCN ODK_SKIP_00000000000000N_000000000000001 (* then - Stmts *) (** FAU_STRUCT_OUT.Control:=0; **) (* assign - Stmt *) LD 0 ST FAU_STRUCT_OUT.Control (** FAU_WVCTEMP:=100.0; **) (* assign - Stmt *) LD 100.0 ST FAU_WVCTEMP (** FDSM:=1; **) (* assign - Stmt *) LD 1 ST FDSM (** FDOM:=0; **) (* assign - Stmt *) LD 0 ST FDOM (** Status3:=1; **) (* assign - Stmt *) LD 1 ST Status3 JMP ODK_END_IF_00000000000000N (** else **) (* else *) ODK_SKIP_00000000000000N_000000000000001: (* else - Stmts *) (** Status3:=0; **) (* assign - Stmt *) LD 0 ST Status3 (** end_if; **) (* if - End *) ODK_END_IF_00000000000000N: JMP ODK_END_IF_00000000000000K (** end_if; **) (* if - End *) ODK_SKIP_00000000000000K_000000000000001: ODK_END_IF_00000000000000K: (** {*Ƕг*} **) (** if FAU_STRUCT_IN.ISO3=1 or FAU_STRUCT_IN.SM<>1 then **) (* if - Cond *) LD FAU_STRUCT_IN.ISO3 EQ 1 OR ( FAU_STRUCT_IN.SM NE 1 ) JMPCN ODK_SKIP_00000000000000O_000000000000001 (* then - Stmts *) (** AFSM:=0; **) (* assign - Stmt *) LD 0 ST AFSM JMP ODK_END_IF_00000000000000O (** end_if; **) (* if - End *) ODK_SKIP_00000000000000O_000000000000001: ODK_END_IF_00000000000000O: (** **) (** **) (** {******************************************************йϻؼ******************************************************} **) (** RunTon1( IN:=FAU_STRUCT_IN.Control , PT:=DevCheck1_time); **) (* call - Stmt *) CAL RunTon1 ( IN := FAU_STRUCT_IN.Control, PT := DevCheck1_time ) (** RunTof1( IN:=FAU_STRUCT_IN.Control , PT:=DevCheck1_time); **) (* call - Stmt *) CAL RunTof1 ( IN := FAU_STRUCT_IN.Control, PT := DevCheck1_time ) (** RunTon2( IN:=FAU_STRUCT_IN.Control , PT:=DevCheck2_time); **) (* call - Stmt *) CAL RunTon2 ( IN := FAU_STRUCT_IN.Control, PT := DevCheck2_time ) (** RunTof2( IN:=FAU_STRUCT_IN.Control , PT:=DevCheck2_time); **) (* call - Stmt *) CAL RunTof2 ( IN := FAU_STRUCT_IN.Control, PT := DevCheck2_time ) (** **) (** {*豸ָ豸зһ¹ϼ⣬ϲԭû硢·Ͽм̵ӴϵΪStatus0*}; **) (** **) (** if FAU_STRUCT_IN.ISO1=0 then **) (* if - Cond *) LD FAU_STRUCT_IN.ISO1 EQ 0 JMPCN ODK_SKIP_00000000000000P_000000000000001 (* then - Stmts *) (** if RunTon1.q or not RunTof1.q then **) (* if - Cond *) LD RunTon1.q OR ( RunTof1.q NOT ) JMPCN ODK_SKIP_00000000000000Q_000000000000001 (* then - Stmts *) (** if FAU_STRUCT_OUT.Control<>FAU_STRUCT_IN.Run then **) (* if - Cond *) LD FAU_STRUCT_OUT.Control NE FAU_STRUCT_IN.Run JMPCN ODK_SKIP_00000000000000R_000000000000001 (* then - Stmts *) (** Status0:=1; **) (* assign - Stmt *) LD 1 ST Status0 JMP ODK_END_IF_00000000000000R (** else **) (* else *) ODK_SKIP_00000000000000R_000000000000001: (* else - Stmts *) (** Status0:=0; **) (* assign - Stmt *) LD 0 ST Status0 (** end_if; **) (* if - End *) ODK_END_IF_00000000000000R: (** if FAU_STRUCT_IN.Fault=1 then **) (* if - Cond *) LD FAU_STRUCT_IN.Fault EQ 1 JMPCN ODK_SKIP_00000000000000S_000000000000001 (* then - Stmts *) (** Status1:=1; **) (* assign - Stmt *) LD 1 ST Status1 JMP ODK_END_IF_00000000000000S (** else **) (* else *) ODK_SKIP_00000000000000S_000000000000001: (* else - Stmts *) (** Status1:=0; **) (* assign - Stmt *) LD 0 ST Status1 (** end_if; **) (* if - End *) ODK_END_IF_00000000000000S: JMP ODK_END_IF_00000000000000Q (** end_if; **) (* if - End *) ODK_SKIP_00000000000000Q_000000000000001: ODK_END_IF_00000000000000Q: JMP ODK_END_IF_00000000000000P (** else **) (* else *) ODK_SKIP_00000000000000P_000000000000001: (* else - Stmts *) (** Status0:=0; **) (* assign - Stmt *) LD 0 ST Status0 (** Status1:=0; **) (* assign - Stmt *) LD 0 ST Status1 (** end_if; **) (* if - End *) ODK_END_IF_00000000000000P: (** **) (** {*豸ָ豸зһ¹ϼ⣬ϲѹ޻ؼź*}; **) (** if FAU_STRUCT_IN.ISO2=0 then **) (* if - Cond *) LD FAU_STRUCT_IN.ISO2 EQ 0 JMPCN ODK_SKIP_00000000000000T_000000000000001 (* then - Stmts *) (** if RunTon2.q or not RunTof2.q then **) (* if - Cond *) LD RunTon2.q OR ( RunTof2.q NOT ) JMPCN ODK_SKIP_00000000000000U_000000000000001 (* then - Stmts *) (** if FAU_STRUCT_OUT.Control<>FAU_STRUCT_IN.FPS then **) (* if - Cond *) LD FAU_STRUCT_OUT.Control NE FAU_STRUCT_IN.FPS JMPCN ODK_SKIP_00000000000000V_000000000000001 (* then - Stmts *) (** Status2:=1; **) (* assign - Stmt *) LD 1 ST Status2 JMP ODK_END_IF_00000000000000V (** else **) (* else *) ODK_SKIP_00000000000000V_000000000000001: (* else - Stmts *) (** Status2:=0; **) (* assign - Stmt *) LD 0 ST Status2 (** end_if; **) (* if - End *) ODK_END_IF_00000000000000V: JMP ODK_END_IF_00000000000000U (** end_if; **) (* if - End *) ODK_SKIP_00000000000000U_000000000000001: ODK_END_IF_00000000000000U: JMP ODK_END_IF_00000000000000T (** else **) (* else *) ODK_SKIP_00000000000000T_000000000000001: (* else - Stmts *) (** Status2:=0; **) (* assign - Stmt *) LD 0 ST Status2 (** end_if; **) (* if - End *) ODK_END_IF_00000000000000T: (** **) (** **) (** {*ϴ*} **) (** if FAU_STRUCT_OUT.Control<>0 then **) (* if - Cond *) LD FAU_STRUCT_OUT.Control NE 0 JMPCN ODK_SKIP_00000000000000W_000000000000001 (* then - Stmts *) (** FAU_STRUCT_OUT.SN := Status0 * 1 + Status1* 2 + Status2* 4 + Status3*8; **) (* assign - Stmt *) LD Status0 MUL 1 ADD ( Status1 MUL 2 ) ADD ( Status2 MUL 4 ) ADD ( Status3 MUL 8 ) ST FAU_STRUCT_OUT.SN JMP ODK_END_IF_00000000000000W (** else **) (* else *) ODK_SKIP_00000000000000W_000000000000001: (* else - Stmts *) (** FAU_STRUCT_OUT.SN := 0 ; **) (* assign - Stmt *) LD 0 ST FAU_STRUCT_OUT.SN (** end_if; **) (* if - End *) ODK_END_IF_00000000000000W: (** **) (** {******************************************************ʱۼ******************************************************} **) (** FAU_RunTime(RUN :=FAU_STRUCT_IN.Run , RUNTIMESET :=FAU_STRUCT_IN.RSTV , RUNTIMERST :=FAU_STRUCT_IN.RST | FAU_STRUCT_OUT.RH:= RUNTIME); **) (* call - Stmt *) CAL FAU_RunTime ( Run := FAU_STRUCT_IN.Run, RUNTIMESET := FAU_STRUCT_IN.RSTV, RUNTIMERST := FAU_STRUCT_IN.RST | FAU_STRUCT_OUT.RH := RUNTIME ) (** **) (** **) (** **) (** **) (** **) (** **) (** **) (** **) (** **) END_FUNCTION_BLOCK