EAS PocketComputer

term.clear()
term.setCursorPos(1,1)
rednet.open("back")
while true do
  local id, message = rednet.receive()
  if id == 6915 then
    if message == "code1" then
      print("EAS")
      print("A Primary Entry Point")
      print("has triggered a Code 1 EAS announcment")
      shell.run("red")
      while true do
        local id2, msg = rednet.receive()
        if id2 == 6915 and msg == "allclear" then
          os.reboot()
        end
      end
    elseif message == "code2" then
	print("EAS")
      print("A Primary Entry Point")
      print("has triggered a Code 2 EAS announcment")
      shell.run("red")
      while true do
        local id2, msg = rednet.receive()
        if id2 == 6915 and msg == "allclear" then
          os.reboot()
        end
      end
    elseif message == "code3" then
	print("EAS")
      print("A Primary Entry Point")
      print("has triggered a Code 3 EAS announcment")
      shell.run("red")
      while true do
        local id2, msg = rednet.receive()
        if id2 == 6915 and msg == "allclear" then
          os.reboot()
        end
      end
    end
  end