--startup for banner display
--by SemlerPDX Aug-05-2021 13:18

displaySide = "back"
motdVG1 =    "      VETERANS-GAMING"
motdVG2 =    "GOOD PEOPLE - GREAT TEAM PLAY"
textSize = 1
interval = 0.83

motd6to9 =   "      Good Morning VG!"
motd9to12 =  "   Daylight's burning guys!"
motd12to14 = "  Time for Lunchy Munchies!"
motd14to18 = "    Work smart not hard"
motd18to21 = " the sun is getting real low"
motd21to6 =  "   watch out!  behind you!"

local randM = 0
local randH = 15
local randF = 30

function fClearSet()
  monitor.clear()
  monitor.setCursorPos(1,1)
end

function fRandy()
  t = os.time()
  if t>=6.001 and t<=9 then
    monitor.setTextColor(colors.orange)
    motd = motd6to9
  elseif t>=9.001 and t<=12 then
    monitor.setTextColor(colors.yellow)
    motd = motd9to12
  elseif t>=12.001 and t<=14 then
    monitor.setTextColor(colors.green)
    motd = motd12to14
  elseif t>=14.001 and t<=18 then
    monitor.setTextColor(colors.yellow)
    motd = motd14to18
  elseif t>=18.001 and t<=21 then
    monitor.setTextColor(colors.orange)
    motd = motd18to21
  elseif t>21.001 or t<=6 then
    monitor.setTextColor(colors.red)
    motd = motd21to6
  else
    motd = "time is space"
  end
  if randM >= randH then
    motdVG = motdVG2
  else
    motdVG = motdVG1
  end
  if randM >= randF then
    randM = 0
  end
end

monitor = peripheral.wrap(displaySide)
fClearSet()
monitor.setTextScale(textSize)
monitor.setBackgroundColor(colors.black)

function mPrint(text, y)
  monitor.setCursorPos(1, y)
  monitor.write(text)
end

while true do
  sleep(interval)
  fClearSet()
  randM = randM + 1
  nDay = os.day()
  nTime = os.time() 
  motdDays = "   Day " .. nDay .. " on VG Minecraft!"
  motdTime = " Local world time is " .. textutils.formatTime(nTime, false)
  
  --world days line 1
  monitor.setTextColor(colors.yellow)
  mPrint(motdDays, 1)
  --world time line 2
  monitor.setTextColor(colors. blue)
  mPrint(motdTime, 2)
  --random clan name line 3
  fRandy()
  monitor.setTextColor(colors.yellow)
  mPrint(motdVG, 3)
  --random message line 5
  fRandy()
  mPrint(motd, 5)
end