View difference between Paste ID: P8mh7SJ4 and NpYkvJW8

 --Variablen
 wModul = "bottom"
 zone = "Schlafzimmer"
-lamp = "right"
+lamp = "left"
 --Code
 rednet.open(wModul)
-open = true
+alarm = false
-header = zone
+header = "Roter Alarm - " .. zone
 
 
 function start()
-rednet.broadcast(zone .. " status?", "1900Door")
+	dashboard("Ist gestoppt")
-senderId = rednet.receive("1900Door",3)
+	updateRedstone()
-if (open == true) then
+
-dashboard("Zimmer offen", senderId)
+
-else
+
-dashboard("Derzeit geschlossen", senderId)
+	redstone.setOutput(lamp, alarm)
 end
-updateRedstone()
+
 function blink()
 while alarm do
 	rednet.broadcast("Red Light on ALL", "1900Light")
-if (open == true) then
+	sleep(1)
-	redstone.setOutput(lamp, true)
+	rednet.broadcast("Red Light off ALL", "1900Light")
 	sleep(1)
-	redstone.setOutput(lamp,false)
+
 end
 
 function dashboard(status, id)
 shell.run("clear")
 maxX, maxY = term.getSize()
 term.setCursorPos(1,2)
 text = ""
 for i = 0, maxX - 1, 1 do
     text = text .. "#"
 end
 print(text)
 
 term.setCursorPos(math.floor((maxX - string.len(header)) / 2), 4)
 print(header)
 
 term.setCursorPos(math.floor((maxX - string.len(status)) / 2),math.floor(maxY / 2))
 print(status)
 
 text = ""
 text = "Sende Befehle f\195\188r den Roten Alarm"
-text = "Sende Befehle an den Computer " .. tostring(id)
+
 print(text)
 
 text = ""
 term.setCursorPos(1,maxY)
 for i = 0, maxX - 1, 1 do
     text = text .. "#"
 end
 print(text)
 
 warten = " Signal kann gesendet werden "
 term.setCursorPos(math.floor((maxX - string.len(warten)) / 2),maxY - 1)
 print(warten)
 end
 
 function check()
 if rs.getInput("top") == true then
 sleep(1)
 	if (alarm == true) then
 		alarm = false
 		dashboard("Ist gestoppt")
 		updateRedstone()
-if rs.getInput("top") then
+		rednet.broadcast("Alarm stop!", "1900Alarm")
-	rednet.send(senderId, zone .. " status?", "1900Door")
+		rednet.broadcast("Roter Alarm wurde gestoppt. Von Zone: " .. zone, "1900Crit")
-	senderId, message, protocol = rednet.receive("1900Door",3)
+		rednet.broadcast("Red Light off ALL", "1900Light")
-	if (message == true) then
+	else
-		rednet.send(senderId, zone .. " zu", "1900Door")
+		alarm = true
-		open = false
+		dashboard("Alarm l\195\164uft")
 		updateRedstone()
-		rednet.broadcast("Die T\195\188r " .. zone .. " wurde geschlossen", "1900Info")
+		rednet.broadcast("Alarm start!", "1900Alarm")
-	elseif (message == false) then
+		rednet.broadcast("Roter Alarm wurde ausgel\195\182st. Von Zone: " ..zone, "1900Crit")
-		rednet.send(senderId, zone .. " auf", "1900Door")
+		parallel.waitForAny(signal, blink)
-		open = true
+
 else
-		rednet.broadcast("Die T\195\188r f\195\188r " .. zone .. " wurde ge\195\182ffnet", "1900Info")
+	print("Redstone changed")
 end
 end
 
 function signal()
 local event = os.pullEvent("redstone")
 check()
 end
 
 --Einmalig alles Updaten
 start()
 
 --Endlosschleife
 while true do
 signal()
 end