海南电网项目下位机程序
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.

174 lines
4.3 KiB

5 days ago
PROGRAM EAF
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
LEAFB2A01_COS:ARRAY[0..10] OF REAL;
ESFB2A01_SyncControl:IJ_LSyncControl;
ESFB2A01_SLG:IJ_EAFGroup;
ESFB2A01_RunTime:BS_RunTime;
LESFB2A01_LC :ARRAY[0..10] OF BOOL;
SAFB2A02_SyncControl:IJ_LSyncControl;
SAFB2A02_SLG:IJ_EAFGroup;
SAFB2A02_RunTime:BS_RunTime;
LSAFB2A02_LC :ARRAY[0..10] OF BOOL;
EAFB2A03_SyncControl:IJ_LSyncControl;
EAFB2A03_SLG:IJ_EAFGroup;
EAFB2A03_RunTime:BS_RunTime;
LEAFB2A03_LC :ARRAY[0..10] OF BOOL;
END_VAR
(*Automatically declared*)
VAR_EXTERNAL
LIESB2A04_COS : REAL;
LEAFB2A03_RST : BOOL;
LESFB2A01_RST : BOOL;
LSAFB2A02_RH : REAL;
LSAFB2A02_RSTV : REAL;
LESFB2A01_TM : BOOL;
LEAFB2A03_TC : BOOL;
LSAFB2A02_TM : BOOL;
LEAFB2A03_RSTV : REAL;
LSAFB2A02_COSET : REAL;
LEAFB2A03_R : BOOL;
LSAFB2A02_R : BOOL;
LESFB2A01_TC : BOOL;
LESFB2A01_RSTV : REAL;
LEAFB2A03_RH : REAL;
LESFB2A01_R : BOOL;
LSAFB2A02_TC : BOOL;
LESFB2A01_COSET : REAL;
LEAFB2A03_COSET : REAL;
LEAFB2A03_TM : BOOL;
LIESB2A01_COS : REAL;
LIESB2A02_COS : REAL;
LSAFB2A02_RST : BOOL;
LIESB2A03_COS : REAL;
LESFB2A01_RH : REAL;
END_VAR
(** LESFB2A01_TC :=LESFB2A01_LC[1]; **)
(* assign - Stmt *)
LD LESFB2A01_LC[1]
ST LESFB2A01_TC
(** {*�ŷ�����������*} **)
(** ESFB2A01_SLG(ENABLE :=LESFB2A01_TM ,LINKAGEVALUE :=LEAFB2A01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LESFB2A01_COSET , HOLDDELAY :=t#60s); **)
(* call - Stmt *)
CAL ESFB2A01_SLG (
ENABLE := LESFB2A01_TM,
LINKAGEVALUE := LEAFB2A01_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LESFB2A01_COSET,
HOLDDELAY := t#60s
)
(** {*�����ۻ�ʱ��*} **)
(** ESFB2A01_RunTime(RUN :=LESFB2A01_R , RUNTIMESET :=LESFB2A01_RSTV , RUNTIMERST :=LESFB2A01_RST , RunTimeRec_In :=LESFB2A01_RH | LESFB2A01_RH:= RUNTIME); **)
(* call - Stmt *)
CAL ESFB2A01_RunTime (
RUN := LESFB2A01_R,
RUNTIMESET := LESFB2A01_RSTV,
RUNTIMERST := LESFB2A01_RST,
RunTimeRec_In := LESFB2A01_RH
|
LESFB2A01_RH := RUNTIME
)
(** **)
(** **)
(** LSAFB2A02_TC :=LSAFB2A02_LC[1]; **)
(* assign - Stmt *)
LD LSAFB2A02_LC[1]
ST LSAFB2A02_TC
(** {*�ŷ�����������*} **)
(** SAFB2A02_SLG(ENABLE :=LSAFB2A02_TM ,LINKAGEVALUE :=LEAFB2A01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LSAFB2A02_COSET , HOLDDELAY :=t#60s); **)
(* call - Stmt *)
CAL SAFB2A02_SLG (
ENABLE := LSAFB2A02_TM,
LINKAGEVALUE := LEAFB2A01_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LSAFB2A02_COSET,
HOLDDELAY := t#60s
)
(** {*�����ۻ�ʱ��*} **)
(** SAFB2A02_RunTime(RUN :=LSAFB2A02_R , RUNTIMESET :=LSAFB2A02_RSTV , RUNTIMERST :=LSAFB2A02_RST , RunTimeRec_In :=LSAFB2A02_RH | LSAFB2A02_RH:= RUNTIME); **)
(* call - Stmt *)
CAL SAFB2A02_RunTime (
RUN := LSAFB2A02_R,
RUNTIMESET := LSAFB2A02_RSTV,
RUNTIMERST := LSAFB2A02_RST,
RunTimeRec_In := LSAFB2A02_RH
|
LSAFB2A02_RH := RUNTIME
)
(** **)
(** **)
(** **)
(** LEAFB2A03_TC :=LEAFB2A03_LC[1]; **)
(* assign - Stmt *)
LD LEAFB2A03_LC[1]
ST LEAFB2A03_TC
(** {*�ŷ�����������*} **)
(** EAFB2A03_SLG(ENABLE :=LEAFB2A03_TM ,LINKAGEVALUE :=LEAFB2A01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB2A03_COSET , HOLDDELAY :=t#60s); **)
(* call - Stmt *)
CAL EAFB2A03_SLG (
ENABLE := LEAFB2A03_TM,
LINKAGEVALUE := LEAFB2A01_COS,
DEAD_BAND := 10.0,
MAXRANGE := 1000.0,
MINRANGE := 0.1,
LINKAGESET := LEAFB2A03_COSET,
HOLDDELAY := t#60s
)
(** {*�����ۻ�ʱ��*} **)
(** EAFB2A03_RunTime(RUN :=LEAFB2A03_R , RUNTIMESET :=LEAFB2A03_RSTV , RUNTIMERST :=LEAFB2A03_RST , RunTimeRec_In :=LEAFB2A03_RH | LEAFB2A03_RH:= RUNTIME); **)
(* call - Stmt *)
CAL EAFB2A03_RunTime (
RUN := LEAFB2A03_R,
RUNTIMESET := LEAFB2A03_RSTV,
RUNTIMERST := LEAFB2A03_RST,
RunTimeRec_In := LEAFB2A03_RH
|
LEAFB2A03_RH := RUNTIME
)
(** **)
(** LEAFB2A01_COS[1]:=LIESB2A01_COS; **)
(* assign - Stmt *)
LD LIESB2A01_COS
ST LEAFB2A01_COS[1]
(** LEAFB2A01_COS[2]:=LIESB2A02_COS; **)
(* assign - Stmt *)
LD LIESB2A02_COS
ST LEAFB2A01_COS[2]
(** LEAFB2A01_COS[3]:=LIESB2A03_COS; **)
(* assign - Stmt *)
LD LIESB2A03_COS
ST LEAFB2A01_COS[3]
(** LEAFB2A01_COS[4]:=LIESB2A04_COS; **)
(* assign - Stmt *)
LD LIESB2A04_COS
ST LEAFB2A01_COS[4]
(** **)
END_PROGRAM