Time server

function get_realtime()
  return tonumber(http.get("http://s5.squareland.ru/time.php").readAll())
end

real_time = get_realtime()
local periList = peripheral.getNames()
modem = false
for i = 1, #periList do
  if peripheral.getType(periList[i])=="modem" then
    modem = peripheral.wrap(periList[i])
    rednet.open(periList[i])
  end
end
if not(modem) then
  error("No modem found")
end

while true do
  sleep(1)
  real_time = get_realtime()
  term.clear()
  term.setCursorPos(1,1)
  print("Real time is: "..real_time)
  rednet.broadcast(real_time)
end