FUNCTION_BLOCK IJ_FAU 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; 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; END_VAR (*Automatically declared*) VAR_EXTERNAL END_VAR (** {* **) (** **) (** ʱ 䣺20200411 **) (** 1.4 **) (** ߣƽ/Ҧ **) (** ƣöƵյܿ **) (** ˵ **) (** **) (** FAU_STRUCT_IN. **) (** SM :INT ; ģʽ 0ļ 1 2 **) (** LM :LM ; ģʽ 0 1 **) (** Run :BOOL; ״̬ **) (** Fault :BOOL; ״̬ **) (** Auto :BOOL; Զ״̬ **) (** Control :BOOL; **) (** FDOB :BOOL; 緧״̬ **) (** FDSB :BOOL; 緧״̬ **) (** TSET :REAL; ¶趨 **) (** WVMC :BOOL; ˮֶ **) (** WVMV :REAL; ˮֵֶ **) (** VFMV :INT; Ƶ趨ֵ **) (** STS :REAL; ͷ¶ **) (** RTS :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) **) (** FDO :BOOL; 緧 **) (** FDS :BOOL; 緧ؿ **) (** Control :BOOL; ͣ **) (** RH :REAL; Сʱ **) (** SN :INT ; 豸״̬ **) (** **) (** ¼㹦 **) (** 1.йϻؼ,ϴ룬ֹ֧ϱ **) (** 2.ˮPID/ֶ **) (** 3.ʱۼ **) (** 4. **) (** 5.緧򣬼ⷧŵλֹͣƵ **) (** 6.̼ **) (** 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 or FAU_STRUCT_IN.Run=1 then **) (* if - Cond *) LD FAU_STRUCT_IN.Control EQ 1 OR ( FAU_STRUCT_IN.Run EQ 1 ) JMPCN ODK_SKIP_000000000000002_000000000000001 (* then - Stmts *) (** FDOM:=1; **) (* assign - Stmt *) LD 1 ST FDOM (** FDSM:=0; **) (* assign - Stmt *) LD 0 ST FDSM JMP ODK_END_IF_000000000000002 (** else **) (* else *) ODK_SKIP_000000000000002_000000000000001: (* else - Stmts *) (** FDOM:=0; **) (* assign - Stmt *) LD 0 ST FDOM (** FDSM:=1; **) (* assign - Stmt *) LD 1 ST FDSM (** end_if; **) (* if - End *) 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.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_000000000000003_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_000000000000003 (** end_if; **) (* if - End *) ODK_SKIP_000000000000003_000000000000001: ODK_END_IF_000000000000003: (** if FAU_STRUCT_IN.VFMV>50 then **) (* if - Cond *) LD FAU_STRUCT_IN.VFMV GT 50 JMPCN ODK_SKIP_000000000000004_000000000000001 (* then - Stmts *) (** FAU_STRUCT_OUT.VFCS:=50; **) (* assign - Stmt *) LD 50 ST FAU_STRUCT_OUT.VFCS JMP ODK_END_IF_000000000000004 (** end_if; **) (* if - End *) ODK_SKIP_000000000000004_000000000000001: ODK_END_IF_000000000000004: (** if FAU_STRUCT_IN.VFMV<30 then **) (* if - Cond *) LD FAU_STRUCT_IN.VFMV LT 30 JMPCN ODK_SKIP_000000000000005_000000000000001 (* then - Stmts *) (** FAU_STRUCT_OUT.VFCS:=30; **) (* assign - Stmt *) LD 30 ST FAU_STRUCT_OUT.VFCS JMP ODK_END_IF_000000000000005 (** end_if; **) (* if - End *) ODK_SKIP_000000000000005_000000000000001: 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_000000000000006_000000000000001 (* then - Stmts *) (** if FAU_STRUCT_IN.Run=1 then **) (* if - Cond *) LD FAU_STRUCT_IN.Run EQ 1 JMPCN ODK_SKIP_000000000000007_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_000000000000008_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_000000000000008 (** else **) (* else *) ODK_SKIP_000000000000008_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_000000000000008: (** {*伾*} **) (** if FAU_STRUCT_IN.SM=0 then **) (* if - Cond *) LD FAU_STRUCT_IN.SM EQ 0 JMPCN ODK_SKIP_000000000000009_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_00000000000000A_000000000000001 (* then - Stmts *) (** FAU_WVCTEMP:=100.0; **) (* assign - Stmt *) LD 100.0 ST FAU_WVCTEMP JMP ODK_END_IF_00000000000000A (** end_if; **) (* if - End *) ODK_SKIP_00000000000000A_000000000000001: ODK_END_IF_00000000000000A: (** if PID_timer.q then **) (* if - Cond *) LD PID_timer.q JMPCN ODK_SKIP_00000000000000B_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_00000000000000B (** end_if; **) (* if - End *) ODK_SKIP_00000000000000B_000000000000001: ODK_END_IF_00000000000000B: JMP ODK_END_IF_000000000000009 (** end_if; **) (* if - End *) ODK_SKIP_000000000000009_000000000000001: ODK_END_IF_000000000000009: (** {*ȼ*} **) (** if FAU_STRUCT_IN.SM=1 then **) (* if - Cond *) LD FAU_STRUCT_IN.SM EQ 1 JMPCN ODK_SKIP_00000000000000C_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_00000000000000D_000000000000001 (* then - Stmts *) (** FAU_WVCTEMP:=100.0; **) (* assign - Stmt *) LD 100.0 ST FAU_WVCTEMP JMP ODK_END_IF_00000000000000D (** end_if; **) (* if - End *) ODK_SKIP_00000000000000D_000000000000001: ODK_END_IF_00000000000000D: (** if PID_timer.q then **) (* if - Cond *) LD PID_timer.q JMPCN ODK_SKIP_00000000000000E_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_00000000000000E (** end_if; **) (* if - End *) ODK_SKIP_00000000000000E_000000000000001: ODK_END_IF_00000000000000E: JMP ODK_END_IF_00000000000000C (** end_if; **) (* if - End *) ODK_SKIP_00000000000000C_000000000000001: ODK_END_IF_00000000000000C: (** {*ɼ*} **) (** if FAU_STRUCT_IN.SM=2 then **) (* if - Cond *) LD FAU_STRUCT_IN.SM EQ 2 JMPCN ODK_SKIP_00000000000000F_000000000000001 (* then - Stmts *) (** FAU_WVCTEMP:=0.0; **) (* assign - Stmt *) LD 0.0 ST FAU_WVCTEMP JMP ODK_END_IF_00000000000000F (** end_if; **) (* if - End *) ODK_SKIP_00000000000000F_000000000000001: ODK_END_IF_00000000000000F: JMP ODK_END_IF_000000000000007 (** else **) (* else *) ODK_SKIP_000000000000007_000000000000001: (* else - Stmts *) (** FAU_WVCTEMP:=0.0; **) (* assign - Stmt *) LD 0.0 ST FAU_WVCTEMP (** end_if; **) (* if - End *) ODK_END_IF_000000000000007: JMP ODK_END_IF_000000000000006 (** else **) (* else *) ODK_SKIP_000000000000006_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_000000000000006: 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); **) (* call - Stmt *) CAL FDOTon ( IN := FDOM, PT := FAU_STRUCT_IN.VDELAY ) (** FDSTon( IN:=FDSM , PT:=FAU_STRUCT_IN.VDELAY); **) (* call - Stmt *) CAL FDSTon ( IN := FDSM, PT := FAU_STRUCT_IN.VDELAY ) (** **) (** if FDOM=1 and FDOTon.q=0 then **) (* if - Cond *) LD FDOM EQ 1 AND ( FDOTon.q EQ 0 ) JMPCN ODK_SKIP_00000000000000G_000000000000001 (* then - Stmts *) (** FAU_STRUCT_OUT.FDO:=1; **) (* assign - Stmt *) LD 1 ST FAU_STRUCT_OUT.FDO JMP ODK_END_IF_00000000000000G (** else FAU_STRUCT_OUT.FDO:=0; **) (* else *) ODK_SKIP_00000000000000G_000000000000001: (* else - Stmts *) (* assign - Stmt *) LD 0 ST FAU_STRUCT_OUT.FDO (** end_if; **) (* if - End *) ODK_END_IF_00000000000000G: (** if FDSM=1 and FDSTon.q=0 then **) (* if - Cond *) LD FDSM EQ 1 AND ( FDSTon.q EQ 0 ) JMPCN ODK_SKIP_00000000000000H_000000000000001 (* then - Stmts *) (** FAU_STRUCT_OUT.FDS:=1; **) (* assign - Stmt *) LD 1 ST FAU_STRUCT_OUT.FDS JMP ODK_END_IF_00000000000000H (** else FAU_STRUCT_OUT.FDS:=0; **) (* else *) ODK_SKIP_00000000000000H_000000000000001: (* else - Stmts *) (* assign - Stmt *) LD 0 ST FAU_STRUCT_OUT.FDS (** end_if; **) (* if - End *) ODK_END_IF_00000000000000H: (** {*Ƶͣ*} **) (** {* **) (** Ƶֹͣɺر,ƵһԴֹͣʱ˹ **) (** **) (** 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_00000000000000I_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_00000000000000J_000000000000001 (* then - Stmts *) (** AFSM:=1 ; **) (* assign - Stmt *) LD 1 ST AFSM JMP ODK_END_IF_00000000000000J (** end_if; **) (* if - End *) ODK_SKIP_00000000000000J_000000000000001: ODK_END_IF_00000000000000J: (** if AFSOF=0 and AFSON=0 then **) (* if - Cond *) LD AFSOF EQ 0 AND ( AFSON EQ 0 ) JMPCN ODK_SKIP_00000000000000K_000000000000001 (* then - Stmts *) (** AFSM:=0 ; **) (* assign - Stmt *) LD 0 ST AFSM JMP ODK_END_IF_00000000000000K (** end_if; **) (* if - End *) ODK_SKIP_00000000000000K_000000000000001: ODK_END_IF_00000000000000K: (** if AFSM=1 then **) (* if - Cond *) LD AFSM EQ 1 JMPCN ODK_SKIP_00000000000000L_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_00000000000000L (** else **) (* else *) ODK_SKIP_00000000000000L_000000000000001: (* else - Stmts *) (** Status3:=0; **) (* assign - Stmt *) LD 0 ST Status3 (** end_if; **) (* if - End *) ODK_END_IF_00000000000000L: JMP ODK_END_IF_00000000000000I (** end_if; **) (* if - End *) ODK_SKIP_00000000000000I_000000000000001: ODK_END_IF_00000000000000I: (** {*Ƕг*} **) (** 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_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: (** **) (** **) (** {******************************************************йϻؼ******************************************************} **) (** 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_00000000000000N_000000000000001 (* then - Stmts *) (** if RunTon1.q or not RunTof1.q then **) (* if - Cond *) LD RunTon1.q OR ( RunTof1.q NOT ) JMPCN ODK_SKIP_00000000000000O_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_00000000000000P_000000000000001 (* then - Stmts *) (** Status0:=1; **) (* assign - Stmt *) LD 1 ST Status0 JMP ODK_END_IF_00000000000000P (** else **) (* else *) ODK_SKIP_00000000000000P_000000000000001: (* else - Stmts *) (** Status0:=0; **) (* assign - Stmt *) LD 0 ST Status0 (** end_if; **) (* if - End *) ODK_END_IF_00000000000000P: (** if FAU_STRUCT_IN.Fault=1 then **) (* if - Cond *) LD FAU_STRUCT_IN.Fault EQ 1 JMPCN ODK_SKIP_00000000000000Q_000000000000001 (* then - Stmts *) (** Status1:=1; **) (* assign - Stmt *) LD 1 ST Status1 JMP ODK_END_IF_00000000000000Q (** else **) (* else *) ODK_SKIP_00000000000000Q_000000000000001: (* else - Stmts *) (** Status1:=0; **) (* assign - Stmt *) LD 0 ST Status1 (** end_if; **) (* if - End *) ODK_END_IF_00000000000000Q: JMP ODK_END_IF_00000000000000O (** end_if; **) (* if - End *) ODK_SKIP_00000000000000O_000000000000001: ODK_END_IF_00000000000000O: JMP ODK_END_IF_00000000000000N (** else **) (* else *) ODK_SKIP_00000000000000N_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_00000000000000N: (** **) (** {*豸ָ豸зһ¹ϼ⣬ϲѹ޻ؼź*}; **) (** if FAU_STRUCT_IN.ISO2=0 then **) (* if - Cond *) LD FAU_STRUCT_IN.ISO2 EQ 0 JMPCN ODK_SKIP_00000000000000R_000000000000001 (* then - Stmts *) (** if RunTon2.q or not RunTof2.q then **) (* if - Cond *) LD RunTon2.q OR ( RunTof2.q NOT ) JMPCN ODK_SKIP_00000000000000S_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_00000000000000T_000000000000001 (* then - Stmts *) (** Status2:=1; **) (* assign - Stmt *) LD 1 ST Status2 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: JMP ODK_END_IF_00000000000000S (** end_if; **) (* if - End *) ODK_SKIP_00000000000000S_000000000000001: ODK_END_IF_00000000000000S: JMP ODK_END_IF_00000000000000R (** else **) (* else *) ODK_SKIP_00000000000000R_000000000000001: (* else - Stmts *) (** Status2:=0; **) (* assign - Stmt *) LD 0 ST Status2 (** end_if; **) (* if - End *) ODK_END_IF_00000000000000R: (** **) (** **) (** {*ϴ*} **) (** if FAU_STRUCT_OUT.Control<>0 then **) (* if - Cond *) LD FAU_STRUCT_OUT.Control NE 0 JMPCN ODK_SKIP_00000000000000U_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_00000000000000U (** else **) (* else *) ODK_SKIP_00000000000000U_000000000000001: (* else - Stmts *) (** FAU_STRUCT_OUT.SN := 0 ; **) (* assign - Stmt *) LD 0 ST FAU_STRUCT_OUT.SN (** end_if; **) (* if - End *) ODK_END_IF_00000000000000U: (** **) (** {******************************************************ʱۼ******************************************************} **) (** FAU_RunTime(RUN :=FAU_STRUCT_IN.Run , RUNTIMESET :=FAU_STRUCT_IN.RSTV , RUNTIMERST :=FAU_STRUCT_IN.RST ,RunTimeRec_In :=FAU_STRUCT_OUT.RH | 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, RunTimeRec_In := FAU_STRUCT_OUT.RH | FAU_STRUCT_OUT.RH := RUNTIME ) (** **) (** **) (** **) (** **) (** **) (** **) (** **) (** **) (** **) END_FUNCTION_BLOCK