broadcaster

rednet.open("back")
while true do
  local s,msg,p = rednet.receive(5)
  if s == 1125 then
    if msg == "200" then
      term.setTextColor(colors.lime)
      textutils.slowWrite("network")
      term.setTextColor(colors.blue)
      write(">")
      term.setTextColor(colors.red)
      local cmd = read()
      if cmd == "!exit!" then
        error("End of Stream")
      end
      rednet.send(1125,cmd)
    elseif msg == "query" then
      term.setTextColor(colors.yellow)
      textutils.slowWrite("File")
      term.setTextColor(colors.blue)
      write(">")
      term.setTextColor(colors.red)
      local fie = read()
      rednet.send(1125,fie)
    end
  end
end