wuyue_latest/M08/EAF.POE

PROGRAM EAF
VAR_EXTERNAL
  


END_VAR

VAR_GLOBAL

END_VAR

VAR
LEAFB1G01_COS:ARRAY[0..10] OF REAL;



EAFB1G01_SyncControl:IJ_LSyncControl;
EAFB1G01_SLG:IJ_EAFGroup;
EAFB1G01_RunTime:BS_RunTime;
LEAFB1G01_LC  :ARRAY[0..10] OF BOOL;



LEAFB1E03_COS:ARRAY[0..10] OF REAL;



EAFB1E03_SyncControl:IJ_LSyncControl;
EAFB1E03_SLG:IJ_EAFGroup;
EAFB1E03_RunTime:BS_RunTime;
LEAFB1E03_LC  :ARRAY[0..10] OF BOOL;




END_VAR

(*Automatically declared*)
VAR_EXTERNAL
	LCMD00000_RM : INT;
	LEAFB1E03_COSET : REAL;
	LEAFB1E03_TC : BOOL;
	LEAFB1E03_TM : BOOL;
	LEAFB1E03_DM : BOOL;
	LEAFB1E03_RH : REAL;
	LEAFB1E03_R : BOOL;
	LEAFB1E03_C : BOOL;
	RNIEAFB2X00_PC : BOOL;
	LEAFB1E03_RSTV : REAL;
	LEAFB1E03_RST : BOOL;
	REAFB1G01_C : BOOL;
	REAFB1E03_C : BOOL;
	RNIEAF00000_CM : BOOL;
	LEAFB1G01_RSTV : REAL;
	LEAFB1G01_RST : BOOL;
	LEAFB1G01_COSET : REAL;
	LEAFB1G01_TC : BOOL;
	LEAFB1G01_TM : BOOL;
	LEAFB1G01_DM : BOOL;
	LEAFB1G01_RH : REAL;
	LEAFB1G01_R : BOOL;
	LEAFB1E03_TSTR : STRING;
	LEAFB1G01_TSTR : STRING;
	LEAFB1G01_C : BOOL;
END_VAR
(**   	LEAFB1G01_TC    :=LEAFB1G01_LC[1]; **)
	(* assign - Stmt *)
	LD LEAFB1G01_LC[1]
	ST LEAFB1G01_TC

(**     {*�ŷ�����������*} **)
(**     EAFB1G01_SLG(ENABLE :=LEAFB1G01_TM ,LINKAGEVALUE :=LEAFB1G01_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB1G01_COSET ,  HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB1G01_TSTR ,ALLDAY :=LEAFB1G01_DM  |  LEAFB1G01_LC:= LINKAGEOUT); **)
	(* call - Stmt *)
	CAL EAFB1G01_SLG (
		ENABLE := LEAFB1G01_TM,
		LINKAGEVALUE := LEAFB1G01_COS,
		DEAD_BAND := 10.0,
		MAXRANGE := 1000.0,
		MINRANGE := 0.1,
		LINKAGESET := LEAFB1G01_COSET,
		HOLDDELAY := t#60s,
		ENABLENUM := 4,
		SCH_STR := LEAFB1G01_TSTR,
		ALLDAY := LEAFB1G01_DM
		|
		LEAFB1G01_LC := LINKAGEOUT
	)

(**     {*ͬ������*} **)
(**     EAFB1G01_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB1G01_C,BOOL_IN2:=REAFB1G01_C,BOOL_IN3:=LEAFB1G01_TC | LEAFB1G01_C:= BOOL_OUT1,REAFB1G01_C:=BOOL_OUT2); **)
	(* call - Stmt *)
	CAL EAFB1G01_SyncContRol (
		CM := RNIEAF00000_CM,
		RM := LCMD00000_RM,
		BOOL_IN0 := RNIEAFB2X00_PC,
		BOOL_IN1 := LEAFB1G01_C,
		BOOL_IN2 := REAFB1G01_C,
		BOOL_IN3 := LEAFB1G01_TC
		|
		LEAFB1G01_C := BOOL_OUT1,
		REAFB1G01_C := BOOL_OUT2
	)

(**     {*�����ۻ�ʱ��*} **)
(**     EAFB1G01_RunTime(RUN :=LEAFB1G01_R , RUNTIMESET :=LEAFB1G01_RSTV , RUNTIMERST :=LEAFB1G01_RST , RunTimeRec_In :=LEAFB1G01_RH |  LEAFB1G01_RH:= RUNTIME); **)
	(* call - Stmt *)
	CAL EAFB1G01_RunTime (
		RUN := LEAFB1G01_R,
		RUNTIMESET := LEAFB1G01_RSTV,
		RUNTIMERST := LEAFB1G01_RST,
		RunTimeRec_In := LEAFB1G01_RH
		|
		LEAFB1G01_RH := RUNTIME
	)

(**    **)
(**   **)
(**    	LEAFB1E03_TC    :=LEAFB1E03_LC[1]; **)
	(* assign - Stmt *)
	LD LEAFB1E03_LC[1]
	ST LEAFB1E03_TC

(**     {*�ŷ�����������*} **)
(**     EAFB1E03_SLG(ENABLE :=LEAFB1E03_TM ,LINKAGEVALUE :=LEAFB1E03_COS , DEAD_BAND :=10.0 , MAXRANGE :=1000.0 , MINRANGE :=0.1 ,LINKAGESET :=LEAFB1E03_COSET ,  HOLDDELAY :=t#60s , ENABLENUM :=4 , SCH_STR :=LEAFB1E03_TSTR ,ALLDAY :=LEAFB1E03_DM  |  LEAFB1E03_LC:= LINKAGEOUT); **)
	(* call - Stmt *)
	CAL EAFB1E03_SLG (
		ENABLE := LEAFB1E03_TM,
		LINKAGEVALUE := LEAFB1E03_COS,
		DEAD_BAND := 10.0,
		MAXRANGE := 1000.0,
		MINRANGE := 0.1,
		LINKAGESET := LEAFB1E03_COSET,
		HOLDDELAY := t#60s,
		ENABLENUM := 4,
		SCH_STR := LEAFB1E03_TSTR,
		ALLDAY := LEAFB1E03_DM
		|
		LEAFB1E03_LC := LINKAGEOUT
	)

(**     {*ͬ������*} **)
(**     EAFB1E03_SyncContRol(CM :=RNIEAF00000_CM , RM :=LCMD00000_RM ,BOOL_IN0:= RNIEAFB2X00_PC,BOOL_IN1:=LEAFB1E03_C,BOOL_IN2:=REAFB1E03_C,BOOL_IN3:=LEAFB1E03_TC | LEAFB1E03_C:= BOOL_OUT1,REAFB1E03_C:=BOOL_OUT2); **)
	(* call - Stmt *)
	CAL EAFB1E03_SyncContRol (
		CM := RNIEAF00000_CM,
		RM := LCMD00000_RM,
		BOOL_IN0 := RNIEAFB2X00_PC,
		BOOL_IN1 := LEAFB1E03_C,
		BOOL_IN2 := REAFB1E03_C,
		BOOL_IN3 := LEAFB1E03_TC
		|
		LEAFB1E03_C := BOOL_OUT1,
		REAFB1E03_C := BOOL_OUT2
	)

(**     {*�����ۻ�ʱ��*} **)
(**     EAFB1E03_RunTime(RUN :=LEAFB1E03_R , RUNTIMESET :=LEAFB1E03_RSTV , RUNTIMERST :=LEAFB1E03_RST , RunTimeRec_In :=LEAFB1E03_RH |  LEAFB1E03_RH:= RUNTIME); **)
	(* call - Stmt *)
	CAL EAFB1E03_RunTime (
		RUN := LEAFB1E03_R,
		RUNTIMESET := LEAFB1E03_RSTV,
		RUNTIMERST := LEAFB1E03_RST,
		RunTimeRec_In := LEAFB1E03_RH
		|
		LEAFB1E03_RH := RUNTIME
	)

(**    **)

END_PROGRAM