w = peripheral.wrap("bottom")
p = peripheral.wrap("top")
function msg()
  w.open(1)
  local event, modemSide, senderChannel,
    replyChannel, message, senderDistance = os.pullEvent("modem_message")
  p.clear()
  p.setTextScale(3)
  p.write(message)
end
while true do
  msg()
  os.sleep(2)
end