E-Zylinder-Linien-SPS/Logical/TischProgramme/Tisch4/Main.st

PROGRAM _INIT

	Tisch_4 := 0;
	 
	gTisch_4.Cmd.Stopper := KMD_EINFAHREN;
	gTisch_4.Cmd.Vorstopper := KMD_EINFAHREN;


END_PROGRAM

PROGRAM _CYCLIC

//		IF (gTisch_4.Inputs.Vor_Stopper = TRUE AND gTisch_4.Inputs.Stausensor = FALSE AND Tisch_4 = 0) OR (gTisch_4.Inputs.Vor_VorStopper = TRUE AND gTisch_4.Inputs.Vor_Stopper = FALSE AND Tisch_4 = 0) THEN
//			gTisch_4.Outputs.Lampe_Start := TRUE;
//		ELSE
//			gTisch_4.Outputs.Lampe_Start := FALSE;
//		END_IF
//	
//		IF gTaster_Tisch_4_aus = TRUE THEN
//			gTisch_4.Cmd.Stopper := KMD_EINFAHREN;
//			gTisch_4.Cmd.Vorstopper := KMD_EINFAHREN;
//			gMerker_RFID_Tisch_4_gelesen := TRUE;
//			Tisch_4 := 0;
//		END_IF
//	
//	CASE Tisch_4 OF
//
//		0:
//		IF gTisch_4.Inputs.Start = TRUE AND gTisch_4.Inputs.Vor_VorStopper = TRUE AND gTisch_4.Inputs.Vor_Stopper = TRUE AND gTisch_4.Inputs.Stausensor = FALSE AND gTaster_Tisch_4_aus = FALSE AND gMerker_RFID_Tisch_4_gelesen = TRUE THEN
//			gTisch_4.Cmd.Stopper := KMD_EINFAHREN;
//			gMerker_RFID_Tisch_4_gelesen := FALSE;	
//			Tisch_4 := 10;
//		ELSIF gTisch_4.Inputs.Start = TRUE AND gTisch_4.Inputs.Vor_VorStopper = FALSE AND gTisch_4.Inputs.Vor_Stopper = TRUE AND gTisch_4.Inputs.Stausensor = FALSE AND gTaster_Tisch_4_aus = FALSE AND gMerker_RFID_Tisch_4_gelesen = TRUE THEN
//				gTisch_4.Cmd.Stopper := KMD_EINFAHREN;
//				gMerker_RFID_Tisch_4_gelesen := FALSE;
//				Tisch_4 := 70;
//		ELSIF gTisch_4.Inputs.Start = TRUE AND gTisch_4.Inputs.Vor_VorStopper = TRUE AND gTisch_4.Inputs.Vor_Stopper = FALSE AND gTaster_Tisch_4_aus = FALSE THEN
//				gTisch_4.Cmd.Vorstopper := KMD_EINFAHREN;
//				Tisch_4 := 110;
//		ELSIF gTaster_Tisch_4_aus = FALSE AND gTisch_4.Inputs.Stopper_eingefahren = TRUE AND gTisch_4.Inputs.Vorstopper_eingefahren = TRUE THEN
//				gTisch_4.Cmd.Stopper := KMD_AUSFAHREN;
//				gTisch_4.Cmd.Vorstopper := KMD_AUSFAHREN;
//				Tisch_4 := 0;
//		END_IF	
//		
////
//
//		10:
//		IF gTisch_4.Inputs.Nach_Stopper = TRUE THEN
//			Tisch_4 := 20;
//		END_IF
//		
//		20:
//		IF gTisch_4.Inputs.Nach_Stopper = FALSE THEN
//			gTisch_4.Cmd.Stopper := KMD_AUSFAHREN;
//			gTisch_4.Cmd.Vorstopper := KMD_EINFAHREN;
//			Tisch_4 := 30;
//		END_IF
//
//		30:
//		IF gTisch_4.Inputs.Nach_Vorstopper = TRUE THEN
//			Tisch_4 := 40;
//		END_IF
//
//		40:
//		IF gTisch_4.Inputs.Nach_Vorstopper = FALSE THEN
//			gTisch_4.Cmd.Vorstopper := KMD_AUSFAHREN;
//			Tisch_4 := 50;
//		END_IF
//
//		50:
//		IF gTisch_4.Inputs.Stausensor = TRUE THEN
//			Tisch_4 := 60;
//		END_IF
//
//		60:
//		IF gTisch_4.Status.Vorstopper = STATUS_AUSGEFAHREN AND gTisch_4.Status.Stopper = STATUS_AUSGEFAHREN THEN
//			Tisch_4 := 0;
//		END_IF
//
////      	
//
//		70:
//		IF gTisch_4.Inputs.Nach_Stopper = TRUE THEN
//			Tisch_4 := 80;
//		END_IF
//
//		80:
//		IF gTisch_4.Inputs.Nach_Stopper = FALSE THEN
//			gTisch_4.Cmd.Stopper := KMD_AUSFAHREN;
//			Tisch_4 := 90;
//		END_IF
//
//		90:
//		IF gTisch_4.Inputs.Stausensor = TRUE THEN
//			Tisch_4 := 100;
//		END_IF
//
//		100:
//		IF gTisch_4.Status.Stopper = STATUS_AUSGEFAHREN THEN
//			Tisch_4 := 0;
//		END_IF
//
////
//
//		110:
//		IF gTisch_4.Inputs.Nach_Vorstopper = TRUE THEN
//			Tisch_4 := 120;
//		END_IF
//
//		120:
//		IF gTisch_4.Inputs.Nach_Vorstopper = FALSE THEN
//			gTisch_4.Cmd.Vorstopper := KMD_AUSFAHREN;
//			Tisch_4 := 130;
//		END_IF
//
//		130:
//		IF gTisch_4.Inputs.Vor_Stopper = TRUE AND gTisch_4.Status.Vorstopper = STATUS_AUSGEFAHREN THEN
//			Tisch_4 := 0;
//		END_IF
//
//	END_CASE	

END_PROGRAM

PROGRAM _EXIT
	(* Insert code here *)
	 
END_PROGRAM