E-Zylinder-Linien-SPS/Logical/RFID/Main.st

PROGRAM _INIT
	
	RTInfo_0(enable:=1);
	Wartezeit_OPCUA := 1100;
	 
END_PROGRAM

PROGRAM _CYCLIC

//**********************************	Tisch 1		***********************************************
	
	(* Lesen *)

	gMerker_Tisch_1_RFID_Vorhanden := gTisch_1_RFID_Read[0].0; (* Auslesen ob Chip vor Lesekopf *)
	
	IF gMerker_Tisch_1_Auftrag_Lesen = TRUE THEN
		//			gMerker_Lesen_Fertig := FALSE;
		gTisch_1_RFID_Write[1] := 1;(* Befehl Datenträger lesen *)
		gTisch_1_RFID_Write[2] := 0;
		gTisch_1_RFID_Write[3] := 0;
		gTisch_1_RFID_Write[4] := 8;  (* Anzahl Bytes Lowbytes *)
		gTisch_1_RFID_Write[5] := 0;
		gTisch_1_RFID_Write[6] := 0;
		gTisch_1_RFID_Write[7] := 0;
		gTisch_1_RFID_Write[8] := 0;
		gTisch_1_RFID_Write[9] := 1;
		gTisch_1_RFID_Write[0].0 := TRUE;
	END_IF
	   
	(* Schreiben *)	
	
	(* Befehlsdaten *)
	IF gMerker_neuen_Befehl_schreiben = TRUE THEN
		gTisch_1_RFID_Write[1] := 2;  (* Datenträger beschreiben *)
		gTisch_1_RFID_Write[2] := 0;  (* Daten *)
		gTisch_1_RFID_Write[3] := 0;  (* Daten *)
		gTisch_1_RFID_Write[4] := 8;  (* Anzahl Bytes Lowbytes *)
		gTisch_1_RFID_Write[5] := 0;  (* Daten *)
		gTisch_1_RFID_Write[6] := 0;  (* Daten *)
		gTisch_1_RFID_Write[7] := 0;  (* Daten *)
		gTisch_1_RFID_Write[8] := 0;  (* Daten *)
		gTisch_1_RFID_Write[0].0 := TRUE; (* neuer Auftrag steht an *)
	END_IF
		
	(* Write Variable nullen *)
	
	IF gMerker_Tisch_1_alles_nullen = TRUE THEN
		gTisch_1_RFID_Write[1] := 0;
		gTisch_1_RFID_Write[2] := 0;
		gTisch_1_RFID_Write[3] := 0;
		gTisch_1_RFID_Write[4] := 0;  
		gTisch_1_RFID_Write[5] := 0;
		gTisch_1_RFID_Write[6] := 0;
		gTisch_1_RFID_Write[7] := 0; 
		gTisch_1_RFID_Write[8] := 0;
		gTisch_1_RFID_Write[0] := 0;
	END_IF
	
	gTisch_1_RFID_Write[9] := gTisch_1_RFID_Write[0];
	
	CASE Tisch_1_RFID OF
		
		0:
			IF gMerker_Tisch_1_RFID_Vorhanden  = TRUE AND gTisch_1.Inputs.Vor_Stopper = TRUE AND gMerker_Tisch_1_RFID_Reset = FALSE (*AND gMerker_Tisch_1_lesen_fertig = FALSE*) THEN
				gMerker_Tisch_1_Auftrag_Lesen := TRUE;
				Tisch_1_RFID := 10;
			END_IF
		
		10: lWarten_RFID_Fehler_Tisch_1 := lWarten_RFID_Fehler_Tisch_1 + (RTInfo_0.cycle_time/1000);
			IF gTisch_1_RFID_Read[0] = 135 THEN
				gMerker_RFID_Value_Tisch_1 := gTisch_1_RFID_Read[1];
	//			gMerker_RFID_Tisch_1_gelesen := TRUE;
	//			gMerker_Tisch_1_lesen_fertig := TRUE;
				lWarten_RFID_Fehler_Tisch_1 := 0;
				Tisch_1_RFID := 15;
			ELSIF lWarten_RFID_Fehler_Tisch_1 >= 5000 AND gTisch_1_RFID_Read[0] <> 135 THEN
				gMerker_Tisch_1_Auftrag_Lesen := FALSE;
				gMerker_Tisch_1_RFID_Reset := TRUE;
				lWarten_RFID_Fehler_Tisch_1 := 0;
				Tisch_1_RFID := 100;
			END_IF
		
		15:
			IF gMerker_RFID_Value_Tisch_1 <> 0 THEN
				gMerker_RFID_Tisch_1_gelesen := TRUE;
				gMerker_Tisch_1_lesen_fertig := TRUE;
				Tisch_1_RFID := 20;
			ELSIF gMerker_RFID_Value_Tisch_1 = 0 THEN
					gMerker_RFID_Tisch_1_gelesen := FALSE;
					gMerker_Tisch_1_lesen_fertig := FALSE;
					Tisch_1_RFID := 100;
			END_IF				
			
		20: lWarten_fuer_OPCUA_Tisch_1 := lWarten_fuer_OPCUA_Tisch_1 + (RTInfo_0.cycle_time/1000);
			IF gMerker_Tisch_1_RFID_Vorhanden = FALSE AND gTisch_1.Inputs.Vor_Stopper = FALSE AND lWarten_fuer_OPCUA_Tisch_1 >= Wartezeit_OPCUA THEN
				gMerker_Tisch_1_Auftrag_Lesen := FALSE;
				gMerker_RFID_Value_Tisch_1 := 0;
				gTisch_1_RFID_Write[0] := 4;
				Tisch_1_RFID := 30;
			END_IF
		
		30: 
			IF gTisch_1_RFID_Read[0] = 0 THEN
				gTisch_1_RFID_Write[0] := 0;
				Tisch_1_RFID := 0;
			END_IF
		
		100:
			IF gMerker_Tisch_1_Auftrag_Lesen = FALSE AND gMerker_Tisch_1_RFID_Reset = TRUE THEN
				gTisch_1_RFID_Write[0] := 4;
				gMerker_RFID_Value_Tisch_1 := 0;
				Tisch_1_RFID := 110;
			END_IF
		
		110:
			IF gTisch_1_RFID_Read[0] = 0 THEN
				gMerker_Tisch_1_alles_nullen := TRUE;
				Tisch_1_RFID := 120;
			END_IF
		
		120:
			IF gTisch_1_RFID_Write[0] = 0 AND gTisch_1_RFID_Write[1] = 0 AND gTisch_1_RFID_Write[2] = 0 AND gTisch_1_RFID_Write[3] = 0 AND gTisch_1_RFID_Write[4] = 0 AND gTisch_1_RFID_Write[5] = 0 AND gTisch_1_RFID_Write[6] = 0 AND gTisch_1_RFID_Write[7] = 0 AND gTisch_1_RFID_Write[8] = 0 AND gTisch_1_RFID_Write[9] = 0 THEN
				gMerker_Tisch_1_alles_nullen := FALSE;
				gMerker_Tisch_1_RFID_Reset := FALSE;
				Tisch_1_RFID := 0;
			END_IF			
				
	END_CASE
	
	
	// SCHREIBEN AUF ALLE GLEICH
	
		CASE RFID_Schreiben OF
			
			0:
			IF gMerker_Tisch_1_RFID_Vorhanden = TRUE AND gMerker_OPCUA_Schreibauftrag = TRUE AND gMerker_Tisch_1_lesen_fertig = TRUE THEN
				gTisch_1_RFID_Write[0] := 4;
				RFID_Schreiben := 10;
			END_IF
			
			10:	
			IF gTisch_1_RFID_Read[0] = 0 THEN
				gMerker_Tisch_1_alles_nullen := TRUE;
				RFID_Schreiben := 20;
			END_IF			
				
			20:
			IF gTisch_1_RFID_Write[0] = 0 AND gTisch_1_RFID_Write[1] = 0 AND gTisch_1_RFID_Write[2] = 0 AND gTisch_1_RFID_Write[3] = 0 AND gTisch_1_RFID_Write[4] = 0 AND gTisch_1_RFID_Write[5] = 0 AND gTisch_1_RFID_Write[6] = 0 AND gTisch_1_RFID_Write[7] = 0 AND gTisch_1_RFID_Write[8] = 0 AND gTisch_1_RFID_Write[9] = 0 THEN
				gMerker_Tisch_1_alles_nullen := FALSE;
				gMerker_neuen_Befehl_schreiben := TRUE;
				RFID_Schreiben := 30;
			END_IF
			
			30: 
			IF gTisch_1_RFID_Read[0] = 163 THEN
				gMerker_neuen_Befehl_schreiben := FALSE;	
				gMerker_Tisch_1_alles_nullen := TRUE;
				RFID_Schreiben := 40;
			END_IF
			
			40:
			IF gTisch_1_RFID_Write[0] = 0 AND gTisch_1_RFID_Write[1] = 0 AND gTisch_1_RFID_Write[2] = 0 AND gTisch_1_RFID_Write[3] = 0 AND gTisch_1_RFID_Write[4] = 0 AND gTisch_1_RFID_Write[5] = 0 AND gTisch_1_RFID_Write[6] = 0 AND gTisch_1_RFID_Write[7] = 0 AND gTisch_1_RFID_Write[8] = 0 AND gTisch_1_RFID_Write[9] = 0 THEN
				gMerker_Tisch_1_alles_nullen := FALSE;
				gTisch_1_RFID_Write[1] := gMerker_OPCUA_Seriennummer_Test;
				gTisch_1_RFID_Write[2] := 0;
				gTisch_1_RFID_Write[3] := 0;
				gTisch_1_RFID_Write[4] := 0;  
				gTisch_1_RFID_Write[5] := 0;
				gTisch_1_RFID_Write[6] := 0;
				gTisch_1_RFID_Write[7] := 0; 
				gTisch_1_RFID_Write[8] := 0;
				gTisch_1_RFID_Write[0] := 65;
				RFID_Schreiben := 50;
			END_IF
					
			50:
			IF gTisch_1_RFID_Read[0] = 167 THEN
				gMerker_Tisch_1_alles_nullen := TRUE;
				RFID_Schreiben := 60;
			END_IF
						
			60:
			IF gTisch_1_RFID_Write[0] = 0 AND gTisch_1_RFID_Write[1] = 0 AND gTisch_1_RFID_Write[2] = 0 AND gTisch_1_RFID_Write[3] = 0 AND gTisch_1_RFID_Write[4] = 0 AND gTisch_1_RFID_Write[5] = 0 AND gTisch_1_RFID_Write[6] = 0 AND gTisch_1_RFID_Write[7] = 0 AND gTisch_1_RFID_Write[8] = 0 AND gTisch_1_RFID_Write[9] = 0 THEN
				gMerker_Tisch_1_alles_nullen := FALSE;
				gMerker_OPCUA_Schreibauftrag := FALSE;
				gMerker_Tisch_1_lesen_fertig := FALSE;
	//			gMerker_Tisch_1_Auftrag_Lesen := TRUE;
				RFID_Schreiben := 0; // war 70
			END_IF
									
//			70:
//			IF gMerker_Tisch_1_RFID_Vorhanden = FALSE THEN
//	//			gMerker_Tisch_1_Auftrag_Lesen := FALSE;
//				RFID_Schreiben := 0;
//			END_IF	
									
		END_CASE

	//**********************************	Tisch 2		***********************************************
	
	(* Lesen *)

	gMerker_Tisch_2_RFID_Vorhanden := gTisch_2_RFID_Read[0].0; (* Auslesen ob Chip vor Lesekopf *)
	
	IF gMerker_Tisch_2_Auftrag_Lesen = TRUE THEN
		//			gMerker_Lesen_Fertig := FALSE;
		gTisch_2_RFID_Write[1] := 1;(* Befehl Datenträger lesen *)
		gTisch_2_RFID_Write[2] := 0;
		gTisch_2_RFID_Write[3] := 0;
		gTisch_2_RFID_Write[4] := 8;  (* Anzahl Bytes Lowbytes *)
		gTisch_2_RFID_Write[5] := 0;
		gTisch_2_RFID_Write[6] := 0;
		gTisch_2_RFID_Write[7] := 0;
		gTisch_2_RFID_Write[8] := 0;
		gTisch_2_RFID_Write[9] := 1;
		gTisch_2_RFID_Write[0].0 := TRUE;
	END_IF
		
	(* Write Variable nullen *)
	
	IF gMerker_Tisch_2_alles_nullen = TRUE THEN
		gTisch_2_RFID_Write[1] := 0;
		gTisch_2_RFID_Write[2] := 0;
		gTisch_2_RFID_Write[3] := 0;
		gTisch_2_RFID_Write[4] := 0;  
		gTisch_2_RFID_Write[5] := 0;
		gTisch_2_RFID_Write[6] := 0;
		gTisch_2_RFID_Write[7] := 0; 
		gTisch_2_RFID_Write[8] := 0;
		gTisch_2_RFID_Write[0] := 0;
	END_IF
	
	gTisch_2_RFID_Write[9] := gTisch_2_RFID_Write[0];
	
	CASE Tisch_2_RFID OF
		
		0:
			IF gMerker_Tisch_2_RFID_Vorhanden  = TRUE AND gTisch_2.Inputs.Vor_Stopper = TRUE AND gMerker_Tisch_2_RFID_Reset = FALSE (*AND gMerker_Tisch_2_lesen_fertig = FALSE*) THEN
				gMerker_Tisch_2_Auftrag_Lesen := TRUE;
				Tisch_2_RFID := 10;
			END_IF
		
		10: lWarten_RFID_Fehler_Tisch_2 := lWarten_RFID_Fehler_Tisch_2 + (RTInfo_0.cycle_time/1000);
			IF gTisch_2_RFID_Read[0] = 135 THEN
				gMerker_RFID_Value_Tisch_2 := gTisch_2_RFID_Read[1];
				//			gMerker_RFID_Tisch_2_gelesen := TRUE;
				//			gMerker_Tisch_2_lesen_fertig := TRUE;
				lWarten_RFID_Fehler_Tisch_2 := 0;
				Tisch_2_RFID := 15;
			ELSIF lWarten_RFID_Fehler_Tisch_2 >= 5000 AND gTisch_2_RFID_Read[0] <> 135 THEN
				gMerker_Tisch_2_Auftrag_Lesen := FALSE;
				gMerker_Tisch_2_RFID_Reset := TRUE;
				lWarten_RFID_Fehler_Tisch_2 := 0;
				Tisch_2_RFID := 100;
			END_IF
		
		15:
			IF gMerker_RFID_Value_Tisch_2 <> 0 THEN
				gMerker_RFID_Tisch_2_gelesen := TRUE;
				gMerker_Tisch_2_lesen_fertig := TRUE;
				Tisch_2_RFID := 20;
			ELSIF gMerker_RFID_Value_Tisch_2 = 0 THEN
				gMerker_RFID_Tisch_2_gelesen := FALSE;
				gMerker_Tisch_2_lesen_fertig := FALSE;
				Tisch_2_RFID := 100;
			END_IF				
			
		20: lWarten_fuer_OPCUA_Tisch_2 := lWarten_fuer_OPCUA_Tisch_2 + (RTInfo_0.cycle_time/1000);
			IF gMerker_Tisch_2_RFID_Vorhanden = FALSE AND gTisch_2.Inputs.Vor_Stopper = FALSE AND lWarten_fuer_OPCUA_Tisch_2 >= Wartezeit_OPCUA THEN
				gMerker_Tisch_2_Auftrag_Lesen := FALSE;
				gMerker_RFID_Value_Tisch_2 := 0;
				gTisch_2_RFID_Write[0] := 4;
				Tisch_2_RFID := 30;
			END_IF
		
		30: 
			IF gTisch_2_RFID_Read[0] = 0 THEN
				gTisch_2_RFID_Write[0] := 0;
				Tisch_2_RFID := 0;
			END_IF
		
		100:
			IF gMerker_Tisch_2_Auftrag_Lesen = FALSE AND gMerker_Tisch_2_RFID_Reset = TRUE THEN
				gTisch_2_RFID_Write[0] := 4;
				gMerker_RFID_Value_Tisch_2 := 0;
				Tisch_2_RFID := 110;
			END_IF
		
		110:
			IF gTisch_2_RFID_Read[0] = 0 THEN
				gMerker_Tisch_2_alles_nullen := TRUE;
				Tisch_2_RFID := 120;
			END_IF
		
		120:
			IF gTisch_2_RFID_Write[0] = 0 AND gTisch_2_RFID_Write[1] = 0 AND gTisch_2_RFID_Write[2] = 0 AND gTisch_2_RFID_Write[3] = 0 AND gTisch_2_RFID_Write[4] = 0 AND gTisch_2_RFID_Write[5] = 0 AND gTisch_2_RFID_Write[6] = 0 AND gTisch_2_RFID_Write[7] = 0 AND gTisch_2_RFID_Write[8] = 0 AND gTisch_2_RFID_Write[9] = 0 THEN
				gMerker_Tisch_2_alles_nullen := FALSE;
				gMerker_Tisch_2_RFID_Reset := FALSE;
				Tisch_2_RFID := 0;
			END_IF			
				
	END_CASE
	

//**********************************	Tisch 3		***********************************************
	
	(* Lesen *)

	gMerker_Tisch_3_RFID_Vorhanden := gTisch_3_RFID_Read[0].0; (* Auslesen ob Chip vor Lesekopf *)
	
	IF gMerker_Tisch_3_Auftrag_Lesen = TRUE THEN
		//			gMerker_Lesen_Fertig := FALSE;
		gTisch_3_RFID_Write[1] := 1;(* Befehl Datenträger lesen *)
		gTisch_3_RFID_Write[2] := 0;
		gTisch_3_RFID_Write[3] := 0;
		gTisch_3_RFID_Write[4] := 8;  (* Anzahl Bytes Lowbytes *)
		gTisch_3_RFID_Write[5] := 0;
		gTisch_3_RFID_Write[6] := 0;
		gTisch_3_RFID_Write[7] := 0;
		gTisch_3_RFID_Write[8] := 0;
		gTisch_3_RFID_Write[9] := 1;
		gTisch_3_RFID_Write[0].0 := TRUE;
	END_IF
		
	(* Write Variable nullen *)
	
	IF gMerker_Tisch_3_alles_nullen = TRUE THEN
		gTisch_3_RFID_Write[1] := 0;
		gTisch_3_RFID_Write[2] := 0;
		gTisch_3_RFID_Write[3] := 0;
		gTisch_3_RFID_Write[4] := 0;  
		gTisch_3_RFID_Write[5] := 0;
		gTisch_3_RFID_Write[6] := 0;
		gTisch_3_RFID_Write[7] := 0; 
		gTisch_3_RFID_Write[8] := 0;
		gTisch_3_RFID_Write[0] := 0;
	END_IF
	
	gTisch_3_RFID_Write[9] := gTisch_3_RFID_Write[0];
	
	CASE Tisch_3_RFID OF
		
		0:
			IF gMerker_Tisch_3_RFID_Vorhanden  = TRUE AND gTisch_3.Inputs.Vor_Stopper = TRUE AND gMerker_Tisch_3_RFID_Reset = FALSE (*AND gMerker_Tisch_3_lesen_fertig = FALSE*) THEN
				gMerker_Tisch_3_Auftrag_Lesen := TRUE;
				Tisch_3_RFID := 10;
			END_IF
		
		10: lWarten_RFID_Fehler_Tisch_3 := lWarten_RFID_Fehler_Tisch_3 + (RTInfo_0.cycle_time/1000);
			IF gTisch_3_RFID_Read[0] = 135 THEN
				gMerker_RFID_Value_Tisch_3 := gTisch_3_RFID_Read[1];
				//			gMerker_RFID_Tisch_3_gelesen := TRUE;
				//			gMerker_Tisch_3_lesen_fertig := TRUE;
				lWarten_RFID_Fehler_Tisch_3 := 0;
				Tisch_3_RFID := 15;
			ELSIF lWarten_RFID_Fehler_Tisch_3 >= 5000 AND gTisch_3_RFID_Read[0] <> 135 THEN
				gMerker_Tisch_3_Auftrag_Lesen := FALSE;
				gMerker_Tisch_3_RFID_Reset := TRUE;
				lWarten_RFID_Fehler_Tisch_3 := 0;
				Tisch_3_RFID := 100;
			END_IF
		
		15:
			IF gMerker_RFID_Value_Tisch_3 <> 0 THEN
				gMerker_RFID_Tisch_3_gelesen := TRUE;
				gMerker_Tisch_3_lesen_fertig := TRUE;
				Tisch_3_RFID := 20;
			ELSIF gMerker_RFID_Value_Tisch_3 = 0 THEN
				gMerker_RFID_Tisch_3_gelesen := FALSE;
				gMerker_Tisch_3_lesen_fertig := FALSE;
				Tisch_3_RFID := 100;
			END_IF				
			
		20: lWarten_fuer_OPCUA_Tisch_3 := lWarten_fuer_OPCUA_Tisch_3 + (RTInfo_0.cycle_time/1000);
			IF gMerker_Tisch_3_RFID_Vorhanden = FALSE AND gTisch_3.Inputs.Vor_Stopper = FALSE AND lWarten_fuer_OPCUA_Tisch_3 >= Wartezeit_OPCUA THEN
				gMerker_Tisch_3_Auftrag_Lesen := FALSE;
				gMerker_RFID_Value_Tisch_3 := 0;
				gTisch_3_RFID_Write[0] := 4;
				Tisch_3_RFID := 30;
			END_IF
		
		30: 
			IF gTisch_3_RFID_Read[0] = 0 THEN
				gTisch_3_RFID_Write[0] := 0;
				Tisch_3_RFID := 0;
			END_IF
		
		100:
			IF gMerker_Tisch_3_Auftrag_Lesen = FALSE AND gMerker_Tisch_3_RFID_Reset = TRUE THEN
				gTisch_3_RFID_Write[0] := 4;
				gMerker_RFID_Value_Tisch_3 := 0;
				Tisch_3_RFID := 110;
			END_IF
		
		110:
			IF gTisch_3_RFID_Read[0] = 0 THEN
				gMerker_Tisch_3_alles_nullen := TRUE;
				Tisch_3_RFID := 120;
			END_IF
		
		120:
			IF gTisch_3_RFID_Write[0] = 0 AND gTisch_3_RFID_Write[1] = 0 AND gTisch_3_RFID_Write[2] = 0 AND gTisch_3_RFID_Write[3] = 0 AND gTisch_3_RFID_Write[4] = 0 AND gTisch_3_RFID_Write[5] = 0 AND gTisch_3_RFID_Write[6] = 0 AND gTisch_3_RFID_Write[7] = 0 AND gTisch_3_RFID_Write[8] = 0 AND gTisch_3_RFID_Write[9] = 0 THEN
				gMerker_Tisch_3_alles_nullen := FALSE;
				gMerker_Tisch_3_RFID_Reset := FALSE;
				Tisch_3_RFID := 0;
			END_IF			
				
	END_CASE
	
	//**********************************	Tisch 4		***********************************************
	
	(* Lesen *)

	gMerker_Tisch_4_RFID_Vorhanden := gTisch_4_RFID_Read[0].0; (* Auslesen ob Chip vor Lesekopf *)
	
	IF gMerker_Tisch_4_Auftrag_Lesen = TRUE THEN
		//			gMerker_Lesen_Fertig := FALSE;
		gTisch_4_RFID_Write[1] := 1;(* Befehl Datenträger lesen *)
		gTisch_4_RFID_Write[2] := 0;
		gTisch_4_RFID_Write[3] := 0;
		gTisch_4_RFID_Write[4] := 8;  (* Anzahl Bytes Lowbytes *)
		gTisch_4_RFID_Write[5] := 0;
		gTisch_4_RFID_Write[6] := 0;
		gTisch_4_RFID_Write[7] := 0;
		gTisch_4_RFID_Write[8] := 0;
		gTisch_4_RFID_Write[9] := 1;
		gTisch_4_RFID_Write[0].0 := TRUE;
	END_IF
		
	(* Write Variable nullen *)
	
	IF gMerker_Tisch_4_alles_nullen = TRUE THEN
		gTisch_4_RFID_Write[1] := 0;
		gTisch_4_RFID_Write[2] := 0;
		gTisch_4_RFID_Write[3] := 0;
		gTisch_4_RFID_Write[4] := 0;  
		gTisch_4_RFID_Write[5] := 0;
		gTisch_4_RFID_Write[6] := 0;
		gTisch_4_RFID_Write[7] := 0; 
		gTisch_4_RFID_Write[8] := 0;
		gTisch_4_RFID_Write[0] := 0;
	END_IF
	
	gTisch_4_RFID_Write[9] := gTisch_4_RFID_Write[0];
	
	CASE Tisch_4_RFID OF
		
		0:
			IF gMerker_Tisch_4_RFID_Vorhanden  = TRUE AND gTisch_4.Inputs.Vor_Stopper = TRUE AND gMerker_Tisch_4_RFID_Reset = FALSE (*AND gMerker_Tisch_4_lesen_fertig = FALSE*) THEN
				gMerker_Tisch_4_Auftrag_Lesen := TRUE;
				Tisch_4_RFID := 10;
			END_IF
		
		10: lWarten_RFID_Fehler_Tisch_4 := lWarten_RFID_Fehler_Tisch_4 + (RTInfo_0.cycle_time/1000);
			IF gTisch_4_RFID_Read[0] = 135 THEN
				gMerker_RFID_Value_Tisch_4 := gTisch_4_RFID_Read[1];
				//			gMerker_RFID_Tisch_4_gelesen := TRUE;
				//			gMerker_Tisch_4_lesen_fertig := TRUE;
				lWarten_RFID_Fehler_Tisch_4 := 0;
				Tisch_4_RFID := 15;
			ELSIF lWarten_RFID_Fehler_Tisch_4 >= 5000 AND gTisch_4_RFID_Read[0] <> 135 THEN
				gMerker_Tisch_4_Auftrag_Lesen := FALSE;
				gMerker_Tisch_4_RFID_Reset := TRUE;
				lWarten_RFID_Fehler_Tisch_4 := 0;
				Tisch_4_RFID := 100;
			END_IF
		
		15:
			IF gMerker_RFID_Value_Tisch_4 <> 0 THEN
				gMerker_RFID_Tisch_4_gelesen := TRUE;
				gMerker_Tisch_4_lesen_fertig := TRUE;
				Tisch_4_RFID := 20;
			ELSIF gMerker_RFID_Value_Tisch_4 = 0 THEN
				gMerker_RFID_Tisch_4_gelesen := FALSE;
				gMerker_Tisch_4_lesen_fertig := FALSE;
				Tisch_4_RFID := 100;
			END_IF				
			
		20: lWarten_fuer_OPCUA_Tisch_4 := lWarten_fuer_OPCUA_Tisch_4 + (RTInfo_0.cycle_time/1000);
			IF gMerker_Tisch_4_RFID_Vorhanden = FALSE AND gTisch_4.Inputs.Vor_Stopper = FALSE AND lWarten_fuer_OPCUA_Tisch_4 >= Wartezeit_OPCUA THEN
				gMerker_Tisch_4_Auftrag_Lesen := FALSE;
				gMerker_RFID_Value_Tisch_4 := 0;
				gTisch_4_RFID_Write[0] := 4;
				Tisch_4_RFID := 30;
			END_IF
		
		30: 
			IF gTisch_4_RFID_Read[0] = 0 THEN
				gTisch_4_RFID_Write[0] := 0;
				Tisch_4_RFID := 0;
			END_IF
		
		100:
			IF gMerker_Tisch_4_Auftrag_Lesen = FALSE AND gMerker_Tisch_4_RFID_Reset = TRUE THEN
				gTisch_4_RFID_Write[0] := 4;
				gMerker_RFID_Value_Tisch_4 := 0;
				Tisch_4_RFID := 110;
			END_IF
		
		110:
			IF gTisch_4_RFID_Read[0] = 0 THEN
				gMerker_Tisch_4_alles_nullen := TRUE;
				Tisch_4_RFID := 120;
			END_IF
		
		120:
			IF gTisch_4_RFID_Write[0] = 0 AND gTisch_4_RFID_Write[1] = 0 AND gTisch_4_RFID_Write[2] = 0 AND gTisch_4_RFID_Write[3] = 0 AND gTisch_4_RFID_Write[4] = 0 AND gTisch_4_RFID_Write[5] = 0 AND gTisch_4_RFID_Write[6] = 0 AND gTisch_4_RFID_Write[7] = 0 AND gTisch_4_RFID_Write[8] = 0 AND gTisch_4_RFID_Write[9] = 0 THEN
				gMerker_Tisch_4_alles_nullen := FALSE;
				gMerker_Tisch_4_RFID_Reset := FALSE;
				Tisch_4_RFID := 0;
			END_IF			
				
	END_CASE
	
	//**********************************	Tisch 5		***********************************************
	
	(* Lesen *)

	gMerker_Tisch_5_RFID_Vorhanden := gTisch_5_RFID_Read[0].0; (* Auslesen ob Chip vor Lesekopf *)
	
	IF gMerker_Tisch_5_Auftrag_Lesen = TRUE THEN
		//			gMerker_Lesen_Fertig := FALSE;
		gTisch_5_RFID_Write[1] := 1;(* Befehl Datenträger lesen *)
		gTisch_5_RFID_Write[2] := 0;
		gTisch_5_RFID_Write[3] := 0;
		gTisch_5_RFID_Write[4] := 8;  (* Anzahl Bytes Lowbytes *)
		gTisch_5_RFID_Write[5] := 0;
		gTisch_5_RFID_Write[6] := 0;
		gTisch_5_RFID_Write[7] := 0;
		gTisch_5_RFID_Write[8] := 0;
		gTisch_5_RFID_Write[9] := 1;
		gTisch_5_RFID_Write[0].0 := TRUE;
	END_IF
		
	(* Write Variable nullen *)
	
	IF gMerker_Tisch_5_alles_nullen = TRUE THEN
		gTisch_5_RFID_Write[1] := 0;
		gTisch_5_RFID_Write[2] := 0;
		gTisch_5_RFID_Write[3] := 0;
		gTisch_5_RFID_Write[4] := 0;  
		gTisch_5_RFID_Write[5] := 0;
		gTisch_5_RFID_Write[6] := 0;
		gTisch_5_RFID_Write[7] := 0; 
		gTisch_5_RFID_Write[8] := 0;
		gTisch_5_RFID_Write[0] := 0;
	END_IF
	
	gTisch_5_RFID_Write[9] := gTisch_5_RFID_Write[0];
	
	CASE Tisch_5_RFID OF
		
		0:
			IF gMerker_Tisch_5_RFID_Vorhanden  = TRUE AND gTisch_5.Inputs.Vor_Stopper = TRUE AND gMerker_Tisch_5_RFID_Reset = FALSE (*AND gMerker_Tisch_5_lesen_fertig = FALSE*) THEN
				gMerker_Tisch_5_Auftrag_Lesen := TRUE;
				Tisch_5_RFID := 10;
			END_IF
		
		10: lWarten_RFID_Fehler_Tisch_5 := lWarten_RFID_Fehler_Tisch_5 + (RTInfo_0.cycle_time/1000);
			IF gTisch_5_RFID_Read[0] = 135 THEN
				gMerker_RFID_Value_Tisch_5 := gTisch_5_RFID_Read[1];
				//			gMerker_RFID_Tisch_5_gelesen := TRUE;
				//			gMerker_Tisch_5_lesen_fertig := TRUE;
				lWarten_RFID_Fehler_Tisch_5 := 0;
				Tisch_5_RFID := 15;
			ELSIF lWarten_RFID_Fehler_Tisch_5 >= 5000 AND gTisch_5_RFID_Read[0] <> 135 THEN
				gMerker_Tisch_5_Auftrag_Lesen := FALSE;
				gMerker_Tisch_5_RFID_Reset := TRUE;
				lWarten_RFID_Fehler_Tisch_5 := 0;
				Tisch_5_RFID := 100;
			END_IF
		
		15:
			IF gMerker_RFID_Value_Tisch_5 <> 0 THEN
				gMerker_RFID_Tisch_5_gelesen := TRUE;
				gMerker_Tisch_5_lesen_fertig := TRUE;
				Tisch_5_RFID := 20;
			ELSIF gMerker_RFID_Value_Tisch_5 = 0 THEN
				gMerker_RFID_Tisch_5_gelesen := FALSE;
				gMerker_Tisch_5_lesen_fertig := FALSE;
				Tisch_5_RFID := 100;
			END_IF				
			
		20: lWarten_fuer_OPCUA_Tisch_5 := lWarten_fuer_OPCUA_Tisch_5 + (RTInfo_0.cycle_time/1000);
			IF gMerker_Tisch_5_RFID_Vorhanden = FALSE AND gTisch_5.Inputs.Vor_Stopper = FALSE AND lWarten_fuer_OPCUA_Tisch_5 >= Wartezeit_OPCUA THEN
				gMerker_Tisch_5_Auftrag_Lesen := FALSE;
				gMerker_RFID_Value_Tisch_5 := 0;
				gTisch_5_RFID_Write[0] := 4;
				Tisch_5_RFID := 30;
			END_IF
		
		30: 
			IF gTisch_5_RFID_Read[0] = 0 THEN
				gTisch_5_RFID_Write[0] := 0;
				Tisch_5_RFID := 0;
			END_IF
		
		100:
			IF gMerker_Tisch_5_Auftrag_Lesen = FALSE AND gMerker_Tisch_5_RFID_Reset = TRUE THEN
				gTisch_5_RFID_Write[0] := 4;
				gMerker_RFID_Value_Tisch_5 := 0;
				Tisch_5_RFID := 110;
			END_IF
		
		110:
			IF gTisch_5_RFID_Read[0] = 0 THEN
				gMerker_Tisch_5_alles_nullen := TRUE;
				Tisch_5_RFID := 120;
			END_IF
		
		120:
			IF gTisch_5_RFID_Write[0] = 0 AND gTisch_5_RFID_Write[1] = 0 AND gTisch_5_RFID_Write[2] = 0 AND gTisch_5_RFID_Write[3] = 0 AND gTisch_5_RFID_Write[4] = 0 AND gTisch_5_RFID_Write[5] = 0 AND gTisch_5_RFID_Write[6] = 0 AND gTisch_5_RFID_Write[7] = 0 AND gTisch_5_RFID_Write[8] = 0 AND gTisch_5_RFID_Write[9] = 0 THEN
				gMerker_Tisch_5_alles_nullen := FALSE;
				gMerker_Tisch_5_RFID_Reset := FALSE;
				Tisch_5_RFID := 0;
			END_IF			
				
	END_CASE
	
	//**********************************	Tisch 6		***********************************************
	
	(* Lesen *)

	gMerker_Tisch_6_RFID_Vorhanden := gTisch_6_RFID_Read[0].0; (* Auslesen ob Chip vor Lesekopf *)
	
	IF gMerker_Tisch_6_Auftrag_Lesen = TRUE THEN
		//			gMerker_Lesen_Fertig := FALSE;
		gTisch_6_RFID_Write[1] := 1;(* Befehl Datenträger lesen *)
		gTisch_6_RFID_Write[2] := 0;
		gTisch_6_RFID_Write[3] := 0;
		gTisch_6_RFID_Write[4] := 8;  (* Anzahl Bytes Lowbytes *)
		gTisch_6_RFID_Write[5] := 0;
		gTisch_6_RFID_Write[6] := 0;
		gTisch_6_RFID_Write[7] := 0;
		gTisch_6_RFID_Write[8] := 0;
		gTisch_6_RFID_Write[9] := 1;
		gTisch_6_RFID_Write[0].0 := TRUE;
	END_IF
		
	(* Write Variable nullen *)
	
	IF gMerker_Tisch_6_alles_nullen = TRUE THEN
		gTisch_6_RFID_Write[1] := 0;
		gTisch_6_RFID_Write[2] := 0;
		gTisch_6_RFID_Write[3] := 0;
		gTisch_6_RFID_Write[4] := 0;  
		gTisch_6_RFID_Write[5] := 0;
		gTisch_6_RFID_Write[6] := 0;
		gTisch_6_RFID_Write[7] := 0; 
		gTisch_6_RFID_Write[8] := 0;
		gTisch_6_RFID_Write[0] := 0;
	END_IF
	
	gTisch_6_RFID_Write[9] := gTisch_6_RFID_Write[0];
	
	CASE Tisch_6_RFID OF
		
		0:
			IF gMerker_Tisch_6_RFID_Vorhanden  = TRUE AND gTisch_6.Inputs.Vor_Stopper = TRUE AND gMerker_Tisch_6_RFID_Reset = FALSE AND gMerker_block_RFID_read_Tisch_6 = FALSE (*AND gMerker_Tisch_6_lesen_fertig = FALSE*) THEN
				gMerker_Tisch_6_Auftrag_Lesen := TRUE;
				Tisch_6_RFID := 10;
			END_IF
		
		10: lWarten_RFID_Fehler_Tisch_6 := lWarten_RFID_Fehler_Tisch_6 + (RTInfo_0.cycle_time/1000);
			IF gTisch_6_RFID_Read[0] = 135 THEN
				gMerker_RFID_Value_Tisch_6 := gTisch_6_RFID_Read[1];
				//			gMerker_RFID_Tisch_6_gelesen := TRUE;
				//			gMerker_Tisch_6_lesen_fertig := TRUE;
				lWarten_RFID_Fehler_Tisch_6 := 0;
				Tisch_6_RFID := 15;
			ELSIF lWarten_RFID_Fehler_Tisch_6 >= 5000 AND gTisch_6_RFID_Read[0] <> 135 THEN
				gMerker_Tisch_6_Auftrag_Lesen := FALSE;
				gMerker_Tisch_6_RFID_Reset := TRUE;
				lWarten_RFID_Fehler_Tisch_6 := 0;
				Tisch_6_RFID := 100;
			END_IF
		
		15:
			IF gMerker_RFID_Value_Tisch_6 <> 0 THEN
				gMerker_RFID_Tisch_6_gelesen := TRUE;
				gMerker_Tisch_6_lesen_fertig := TRUE;
				Tisch_6_RFID := 20;
			ELSIF gMerker_RFID_Value_Tisch_6 = 0 THEN
				gMerker_RFID_Tisch_6_gelesen := FALSE;
				gMerker_Tisch_6_lesen_fertig := FALSE;
				Tisch_6_RFID := 100;
			END_IF				
			
		20: lWarten_fuer_OPCUA_Tisch_6 := lWarten_fuer_OPCUA_Tisch_6 + (RTInfo_0.cycle_time/1000);
			IF gMerker_Tisch_6_RFID_Vorhanden = FALSE AND gTisch_6.Inputs.Vor_Stopper = FALSE AND lWarten_fuer_OPCUA_Tisch_6 >= Wartezeit_OPCUA THEN
				gMerker_Tisch_6_Auftrag_Lesen := FALSE;
	//			gMerker_RFID_Value_Tisch_6 := 0;
				gTisch_6_RFID_Write[0] := 4;
				Tisch_6_RFID := 30;
			END_IF
		
		30: 
			IF gTisch_6_RFID_Read[0] = 0 THEN
				gTisch_6_RFID_Write[0] := 0;
				Tisch_6_RFID := 0;
			END_IF
		
		100:
			IF gMerker_Tisch_6_Auftrag_Lesen = FALSE AND gMerker_Tisch_6_RFID_Reset = TRUE THEN
				gTisch_6_RFID_Write[0] := 4;
		//		gMerker_RFID_Value_Tisch_6 := 0;
				Tisch_6_RFID := 110;
			END_IF
		
		110:
			IF gTisch_6_RFID_Read[0] = 0 THEN
				gMerker_Tisch_6_alles_nullen := TRUE;
				Tisch_6_RFID := 120;
			END_IF
		
		120:
			IF gTisch_6_RFID_Write[0] = 0 AND gTisch_6_RFID_Write[1] = 0 AND gTisch_6_RFID_Write[2] = 0 AND gTisch_6_RFID_Write[3] = 0 AND gTisch_6_RFID_Write[4] = 0 AND gTisch_6_RFID_Write[5] = 0 AND gTisch_6_RFID_Write[6] = 0 AND gTisch_6_RFID_Write[7] = 0 AND gTisch_6_RFID_Write[8] = 0 AND gTisch_6_RFID_Write[9] = 0 THEN
				gMerker_Tisch_6_alles_nullen := FALSE;
				gMerker_Tisch_6_RFID_Reset := FALSE;
				Tisch_6_RFID := 0;
			END_IF			
				
	END_CASE
	
	//**********************************	Tisch 7		***********************************************
	
	(* Lesen *)

	gMerker_Tisch_7_RFID_Vorhanden := gTisch_7_RFID_Read[0].0; (* Auslesen ob Chip vor Lesekopf *)
	
	IF gMerker_Tisch_7_Auftrag_Lesen = TRUE THEN
		//			gMerker_Lesen_Fertig := FALSE;
		gTisch_7_RFID_Write[1] := 1;(* Befehl Datenträger lesen *)
		gTisch_7_RFID_Write[2] := 0;
		gTisch_7_RFID_Write[3] := 0;
		gTisch_7_RFID_Write[4] := 8;  (* Anzahl Bytes Lowbytes *)
		gTisch_7_RFID_Write[5] := 0;
		gTisch_7_RFID_Write[6] := 0;
		gTisch_7_RFID_Write[7] := 0;
		gTisch_7_RFID_Write[8] := 0;
		gTisch_7_RFID_Write[9] := 1;
		gTisch_7_RFID_Write[0].0 := TRUE;
	END_IF
		
	(* Write Variable nullen *)
	
	IF gMerker_Tisch_7_alles_nullen = TRUE THEN
		gTisch_7_RFID_Write[1] := 0;
		gTisch_7_RFID_Write[2] := 0;
		gTisch_7_RFID_Write[3] := 0;
		gTisch_7_RFID_Write[4] := 0;  
		gTisch_7_RFID_Write[5] := 0;
		gTisch_7_RFID_Write[6] := 0;
		gTisch_7_RFID_Write[7] := 0; 
		gTisch_7_RFID_Write[8] := 0;
		gTisch_7_RFID_Write[0] := 0;
	END_IF
	
	gTisch_7_RFID_Write[9] := gTisch_7_RFID_Write[0];
	
	CASE Tisch_7_RFID OF
		
		0:
			IF gMerker_Tisch_7_RFID_Vorhanden  = TRUE AND gTisch_7.Inputs.Vor_Stopper = TRUE AND gMerker_Tisch_7_RFID_Reset = FALSE (*AND gMerker_Tisch_7_lesen_fertig = FALSE*) THEN
				gMerker_Tisch_7_Auftrag_Lesen := TRUE;
				Tisch_7_RFID := 10;
			END_IF
		
		10: lWarten_RFID_Fehler_Tisch_7 := lWarten_RFID_Fehler_Tisch_7 + (RTInfo_0.cycle_time/1000);
			IF gTisch_7_RFID_Read[0] = 135 THEN
				gMerker_RFID_Value_Tisch_7 := gTisch_7_RFID_Read[1];
				//			gMerker_RFID_Tisch_7_gelesen := TRUE;
				//			gMerker_Tisch_7_lesen_fertig := TRUE;
				lWarten_RFID_Fehler_Tisch_7 := 0;
				Tisch_7_RFID := 15;
			ELSIF lWarten_RFID_Fehler_Tisch_7 >= 5000 AND gTisch_7_RFID_Read[0] <> 135 THEN
				gMerker_Tisch_7_Auftrag_Lesen := FALSE;
				gMerker_Tisch_7_RFID_Reset := TRUE;
				lWarten_RFID_Fehler_Tisch_7 := 0;
				Tisch_7_RFID := 100;
			END_IF
		
		15:
			IF gMerker_RFID_Value_Tisch_7 <> 0 THEN
				gMerker_RFID_Tisch_7_gelesen := TRUE;
				gMerker_Tisch_7_lesen_fertig := TRUE;
				Tisch_7_RFID := 20;
			ELSIF gMerker_RFID_Value_Tisch_7 = 0 THEN
				gMerker_RFID_Tisch_7_gelesen := FALSE;
				gMerker_Tisch_7_lesen_fertig := FALSE;
				Tisch_7_RFID := 100;
			END_IF				
			
		20: lWarten_fuer_OPCUA_Tisch_7 := lWarten_fuer_OPCUA_Tisch_7 + (RTInfo_0.cycle_time/1000);
			IF gMerker_Tisch_7_RFID_Vorhanden = FALSE AND gTisch_7.Inputs.Vor_Stopper = FALSE AND lWarten_fuer_OPCUA_Tisch_7 >= Wartezeit_OPCUA THEN
				gMerker_Tisch_7_Auftrag_Lesen := FALSE;
				gMerker_RFID_Value_Tisch_7 := 0;
				gTisch_7_RFID_Write[0] := 4;
				Tisch_7_RFID := 30;
			END_IF
		
		30: 
			IF gTisch_7_RFID_Read[0] = 0 THEN
				gTisch_7_RFID_Write[0] := 0;
				Tisch_7_RFID := 0;
			END_IF
		
		100:
			IF gMerker_Tisch_7_Auftrag_Lesen = FALSE AND gMerker_Tisch_7_RFID_Reset = TRUE THEN
				gTisch_7_RFID_Write[0] := 4;
				gMerker_RFID_Value_Tisch_7 := 0;
				Tisch_7_RFID := 110;
			END_IF
		
		110:
			IF gTisch_7_RFID_Read[0] = 0 THEN
				gMerker_Tisch_7_alles_nullen := TRUE;
				Tisch_7_RFID := 120;
			END_IF
		
		120:
			IF gTisch_7_RFID_Write[0] = 0 AND gTisch_7_RFID_Write[1] = 0 AND gTisch_7_RFID_Write[2] = 0 AND gTisch_7_RFID_Write[3] = 0 AND gTisch_7_RFID_Write[4] = 0 AND gTisch_7_RFID_Write[5] = 0 AND gTisch_7_RFID_Write[6] = 0 AND gTisch_7_RFID_Write[7] = 0 AND gTisch_7_RFID_Write[8] = 0 AND gTisch_7_RFID_Write[9] = 0 THEN
				gMerker_Tisch_7_alles_nullen := FALSE;
				gMerker_Tisch_7_RFID_Reset := FALSE;
				Tisch_7_RFID := 0;
			END_IF			
				
	END_CASE
	
	//**********************************	Tisch 8		***********************************************
	
	(* Lesen *)

	gMerker_Tisch_8_RFID_Vorhanden := gTisch_8_RFID_Read[0].0; (* Auslesen ob Chip vor Lesekopf *)
	
	IF gMerker_Tisch_8_Auftrag_Lesen = TRUE THEN
		//			gMerker_Lesen_Fertig := FALSE;
		gTisch_8_RFID_Write[1] := 1;(* Befehl Datenträger lesen *)
		gTisch_8_RFID_Write[2] := 0;
		gTisch_8_RFID_Write[3] := 0;
		gTisch_8_RFID_Write[4] := 8;  (* Anzahl Bytes Lowbytes *)
		gTisch_8_RFID_Write[5] := 0;
		gTisch_8_RFID_Write[6] := 0;
		gTisch_8_RFID_Write[7] := 0;
		gTisch_8_RFID_Write[8] := 0;
		gTisch_8_RFID_Write[9] := 1;
		gTisch_8_RFID_Write[0].0 := TRUE;
	END_IF
		
	(* Write Variable nullen *)
	
	IF gMerker_Tisch_8_alles_nullen = TRUE THEN
		gTisch_8_RFID_Write[1] := 0;
		gTisch_8_RFID_Write[2] := 0;
		gTisch_8_RFID_Write[3] := 0;
		gTisch_8_RFID_Write[4] := 0;  
		gTisch_8_RFID_Write[5] := 0;
		gTisch_8_RFID_Write[6] := 0;
		gTisch_8_RFID_Write[7] := 0; 
		gTisch_8_RFID_Write[8] := 0;
		gTisch_8_RFID_Write[0] := 0;
	END_IF
	
	gTisch_8_RFID_Write[9] := gTisch_8_RFID_Write[0];
	
	CASE Tisch_8_RFID OF
		
		0:
			IF gMerker_Tisch_8_RFID_Vorhanden  = TRUE AND gTisch_8.Inputs.Vor_Stopper = TRUE AND gMerker_Tisch_8_RFID_Reset = FALSE (*AND gMerker_Tisch_8_lesen_fertig = FALSE*) THEN
				gMerker_Tisch_8_Auftrag_Lesen := TRUE;
				Tisch_8_RFID := 10;
			END_IF
		
		10: lWarten_RFID_Fehler_Tisch_8 := lWarten_RFID_Fehler_Tisch_8 + (RTInfo_0.cycle_time/1000);
			IF gTisch_8_RFID_Read[0] = 135 THEN
				gMerker_RFID_Value_Tisch_8 := gTisch_8_RFID_Read[1];
				//			gMerker_RFID_Tisch_8_gelesen := TRUE;
				//			gMerker_Tisch_8_lesen_fertig := TRUE;
				lWarten_RFID_Fehler_Tisch_8 := 0;
				Tisch_8_RFID := 15;
			ELSIF lWarten_RFID_Fehler_Tisch_8 >= 5000 AND gTisch_8_RFID_Read[0] <> 135 THEN
				gMerker_Tisch_8_Auftrag_Lesen := FALSE;
				gMerker_Tisch_8_RFID_Reset := TRUE;
				lWarten_RFID_Fehler_Tisch_8 := 0;
				Tisch_8_RFID := 100;
			END_IF
		
		15:
			IF gMerker_RFID_Value_Tisch_8 <> 0 THEN
				gMerker_RFID_Tisch_8_gelesen := TRUE;
				gMerker_Tisch_8_lesen_fertig := TRUE;
				Tisch_8_RFID := 20;
			ELSIF gMerker_RFID_Value_Tisch_8 = 0 THEN
				gMerker_RFID_Tisch_8_gelesen := FALSE;
				gMerker_Tisch_8_lesen_fertig := FALSE;
				Tisch_8_RFID := 100;
			END_IF				
			
		20: lWarten_fuer_OPCUA_Tisch_8 := lWarten_fuer_OPCUA_Tisch_8 + (RTInfo_0.cycle_time/1000);
			IF gMerker_Tisch_8_RFID_Vorhanden = FALSE AND gTisch_8.Inputs.Vor_Stopper = FALSE AND lWarten_fuer_OPCUA_Tisch_8 >= Wartezeit_OPCUA THEN
				gMerker_Tisch_8_Auftrag_Lesen := FALSE;
				gMerker_RFID_Value_Tisch_8 := 0;
				gTisch_8_RFID_Write[0] := 4;
				Tisch_8_RFID := 30;
			END_IF
		
		30: 
			IF gTisch_8_RFID_Read[0] = 0 THEN
				gTisch_8_RFID_Write[0] := 0;
				Tisch_8_RFID := 0;
			END_IF
		
		100:
			IF gMerker_Tisch_8_Auftrag_Lesen = FALSE AND gMerker_Tisch_8_RFID_Reset = TRUE THEN
				gTisch_8_RFID_Write[0] := 4;
				gMerker_RFID_Value_Tisch_8 := 0;
				Tisch_8_RFID := 110;
			END_IF
		
		110:
			IF gTisch_8_RFID_Read[0] = 0 THEN
				gMerker_Tisch_8_alles_nullen := TRUE;
				Tisch_8_RFID := 120;
			END_IF
		
		120:
			IF gTisch_8_RFID_Write[0] = 0 AND gTisch_8_RFID_Write[1] = 0 AND gTisch_8_RFID_Write[2] = 0 AND gTisch_8_RFID_Write[3] = 0 AND gTisch_8_RFID_Write[4] = 0 AND gTisch_8_RFID_Write[5] = 0 AND gTisch_8_RFID_Write[6] = 0 AND gTisch_8_RFID_Write[7] = 0 AND gTisch_8_RFID_Write[8] = 0 AND gTisch_8_RFID_Write[9] = 0 THEN
				gMerker_Tisch_8_alles_nullen := FALSE;
				gMerker_Tisch_8_RFID_Reset := FALSE;
				Tisch_8_RFID := 0;
			END_IF			
				
	END_CASE
	
	OPCUA_TEST_1;
	
	OPCUATEST2;
	
	OPCUATEST3;
	
	
	
END_PROGRAM

PROGRAM _EXIT
	(* Insert code here *)
	 
END_PROGRAM