rednet.open("top")
function send()
  while true do
    print(">")
    input = read()
    rednet.broadcast(input)
  end
end
function recv()
  while true do
    id,msg = rednet.receive()
    print(msg)
  end
end
while true do
  parallel.waitForAny(send,recv)
end