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.
 
 
 
 
 
 

100 lines
2.2 KiB

PROGRAM SUMP
VAR_EXTERNAL
END_VAR
VAR_GLOBAL
END_VAR
VAR
SWPB2B01_RunTime1:BS_RunTime;
SWPB2B01_RunTime2:BS_RunTime;
SWPB2A01_RunTime1:BS_RunTime;
SWPB2A01_RunTime2:BS_RunTime;
END_VAR
(*Automatically declared*)
VAR_EXTERNAL
LSWPB2B01_RH2 : REAL;
LSWPB2B01_RST2 : BOOL;
LSWPB2B01_RST1 : BOOL;
LSWPB2A01_R2 : BOOL;
LSWPB2A01_R1 : BOOL;
LSWPB2A01_RSTV1 : REAL;
LSWPB2A01_RSTV2 : REAL;
LSWPB2A01_RST2 : BOOL;
LSWPB2A01_RST1 : BOOL;
LSWPB2A01_RH1 : REAL;
LSWPB2A01_RH2 : REAL;
LSWPB2B01_RSTV2 : REAL;
LSWPB2B01_RSTV1 : REAL;
LSWPB2B01_R2 : BOOL;
LSWPB2B01_R1 : BOOL;
LSWPB2B01_RH1 : REAL;
END_VAR
(** **)
(** {*运行累积时间*} **)
(** SWPB2B01_RunTime1(RUN :=LSWPB2B01_R1 , RUNTIMESET :=LSWPB2B01_RSTV1 , RUNTIMERST :=LSWPB2B01_RST1 , RunTimeRec_In :=LSWPB2B01_RH1 | LSWPB2B01_RH1:= RUNTIME); **)
(* call - Stmt *)
CAL SWPB2B01_RunTime1 (
RUN := LSWPB2B01_R1,
RUNTIMESET := LSWPB2B01_RSTV1,
RUNTIMERST := LSWPB2B01_RST1,
RunTimeRec_In := LSWPB2B01_RH1
|
LSWPB2B01_RH1 := RUNTIME
)
(** SWPB2B01_RunTime2(RUN :=LSWPB2B01_R2 , RUNTIMESET :=LSWPB2B01_RSTV2 , RUNTIMERST :=LSWPB2B01_RST2 , RunTimeRec_In :=LSWPB2B01_RH2 | LSWPB2B01_RH2:= RUNTIME); **)
(* call - Stmt *)
CAL SWPB2B01_RunTime2 (
RUN := LSWPB2B01_R2,
RUNTIMESET := LSWPB2B01_RSTV2,
RUNTIMERST := LSWPB2B01_RST2,
RunTimeRec_In := LSWPB2B01_RH2
|
LSWPB2B01_RH2 := RUNTIME
)
(** **)
(** **)
(** **)
(** {*运行累积时间*} **)
(** SWPB2A01_RunTime1(RUN :=LSWPB2A01_R1 , RUNTIMESET :=LSWPB2A01_RSTV1 , RUNTIMERST :=LSWPB2A01_RST1 , RunTimeRec_In :=LSWPB2A01_RH1 | LSWPB2A01_RH1:= RUNTIME); **)
(* call - Stmt *)
CAL SWPB2A01_RunTime1 (
RUN := LSWPB2A01_R1,
RUNTIMESET := LSWPB2A01_RSTV1,
RUNTIMERST := LSWPB2A01_RST1,
RunTimeRec_In := LSWPB2A01_RH1
|
LSWPB2A01_RH1 := RUNTIME
)
(** SWPB2A01_RunTime2(RUN :=LSWPB2A01_R2 , RUNTIMESET :=LSWPB2A01_RSTV2 , RUNTIMERST :=LSWPB2A01_RST2 , RunTimeRec_In :=LSWPB2A01_RH2 | LSWPB2A01_RH2:= RUNTIME); **)
(* call - Stmt *)
CAL SWPB2A01_RunTime2 (
RUN := LSWPB2A01_R2,
RUNTIMESET := LSWPB2A01_RSTV2,
RUNTIMERST := LSWPB2A01_RST2,
RunTimeRec_In := LSWPB2A01_RH2
|
LSWPB2A01_RH2 := RUNTIME
)
(** **)
(** **)
END_PROGRAM