PROGRAM SCAN
VAR_EXTERNAL

END_VAR

VAR_GLOBAL

END_VAR

VAR
Dev_Array                   :array[0..31] of byte;			
BOX01_DevScan               :BS_DevScan;
BOX02_DevScan               :BS_DevScan;
BOX03_DevScan               :BS_DevScan;
BOX04_DevScan               :BS_DevScan;
BOX05_DevScan               :BS_DevScan;
						         
BOX01_Hex			        :DWORD ; 
BOX02_Hex			        :DWORD ; 
BOX03_Hex			        :DWORD ; 
BOX04_Hex			        :DWORD ; 
BOX05_Hex			        :DWORD ; 				

DEV00_IP        AT%M7000.0  :BYTE;										
DEV00_R         AT%M8000.0  :BYTE;										
DEV01_R         AT%M8001.0  :BYTE;										
DEV02_R         AT%M8002.0  :BYTE;										
DEV03_R         AT%M8003.0  :BYTE;										
DEV04_R         AT%M8004.0  :BYTE;										
DEV05_R         AT%M8005.0  :BYTE;										
DEV06_R         AT%M8006.0  :BYTE;										
DEV07_R         AT%M8007.0  :BYTE;										
DEV08_R         AT%M8008.0  :BYTE;										
DEV09_R         AT%M8009.0  :BYTE;										
DEV10_R         AT%M8010.0  :BYTE;										
DEV11_R         AT%M8011.0  :BYTE;										
DEV12_R         AT%M8012.0  :BYTE;										
DEV13_R         AT%M8013.0  :BYTE;										
DEV14_R         AT%M8014.0  :BYTE;										
DEV15_R         AT%M8015.0  :BYTE;										
DEV16_R         AT%M8016.0  :BYTE;										
DEV17_R         AT%M8017.0  :BYTE;										
DEV18_R         AT%M8018.0  :BYTE;										
DEV19_R         AT%M8019.0  :BYTE;										
DEV20_R         AT%M8020.0  :BYTE;
DEV21_R         AT%M8021.0  :BYTE;	
DEV22_R         AT%M8022.0  :BYTE;	
DEV23_R         AT%M8023.0  :BYTE;	
DEV24_R         AT%M8024.0  :BYTE;	
DEV25_R         AT%M8025.0  :BYTE;	
DEV26_R         AT%M8026.0  :BYTE;	
DEV27_R         AT%M8027.0  :BYTE;	
DEV28_R         AT%M8028.0  :BYTE;	
DEV29_R         AT%M8029.0  :BYTE;	
DEV30_R         AT%M8030.0  :BYTE;	
DEV31_R         AT%M8031.0  :BYTE;	

END_VAR

(*Automatically declared*)
VAR_EXTERNAL
	LBOX07A01_OR : REAL;
	LBOX07A01_DS : BOOL;
END_VAR
(**  **)
(** {*ģ���ַ�����趨���ֱ��Ӧ0~31�ŵ�ַģ�飬������*} **)
(**             {* 3         2         1          *} **)
(** 		    {*10987654321098765432109876543210*} **)
(** BOX01_Hex :=2#00000000000000000000000000111111 ;  **)
	(* assign - Stmt *)
	LD 2#00000000000000000000000000111111
	ST BOX01_Hex

(**  **)
(** {*ģ��ɨ�蹦�ܿ����*} **)
(** BOX01_DevScan( Dev_Array:= Dev_Array , Dev_Scan_Hex:= BOX01_Hex |  LBOX07A01_DS:= Dev_Ready, LBOX07A01_OR:= Dev_Ratio ); **)
	(* call - Stmt *)
	CAL BOX01_DevScan (
		Dev_Array := Dev_Array,
		Dev_Scan_Hex := BOX01_Hex
		|
		LBOX07A01_DS := Dev_Ready,
		LBOX07A01_OR := Dev_Ratio
	)

(**  **)
(** {****************************************************Ĭ�϶�****************************************************}												 **)
(** {*ģ���豸״̬����*} **)
(** Dev_Array[0] :=DEV00_R;													 **)
	(* assign - Stmt *)
	LD DEV00_R
	ST Dev_Array[0]

(** Dev_Array[1] :=DEV01_R;													 **)
	(* assign - Stmt *)
	LD DEV01_R
	ST Dev_Array[1]

(** Dev_Array[2] :=DEV02_R;													 **)
	(* assign - Stmt *)
	LD DEV02_R
	ST Dev_Array[2]

(** Dev_Array[3] :=DEV03_R;													 **)
	(* assign - Stmt *)
	LD DEV03_R
	ST Dev_Array[3]

(** Dev_Array[4] :=DEV04_R; **)
	(* assign - Stmt *)
	LD DEV04_R
	ST Dev_Array[4]

(** Dev_Array[5] :=DEV05_R;													 **)
	(* assign - Stmt *)
	LD DEV05_R
	ST Dev_Array[5]

(** Dev_Array[6] :=DEV06_R;													 **)
	(* assign - Stmt *)
	LD DEV06_R
	ST Dev_Array[6]

(** Dev_Array[7] :=DEV07_R;													 **)
	(* assign - Stmt *)
	LD DEV07_R
	ST Dev_Array[7]

(** Dev_Array[8] :=DEV08_R;													 **)
	(* assign - Stmt *)
	LD DEV08_R
	ST Dev_Array[8]

(** Dev_Array[9] :=DEV09_R; **)
	(* assign - Stmt *)
	LD DEV09_R
	ST Dev_Array[9]

(** Dev_Array[10]:=DEV10_R;													 **)
	(* assign - Stmt *)
	LD DEV10_R
	ST Dev_Array[10]

(** Dev_Array[11]:=DEV11_R;													 **)
	(* assign - Stmt *)
	LD DEV11_R
	ST Dev_Array[11]


END_PROGRAM