Redstone Clock

monside = "top"
local rRunning = true
local eFlicker = "0"

while rRunning do
 local nTime = os.time()
 local rTime = textutils.formatTime(nTime, false)
 local aT = string.sub(rTime, 1, 1)
 local bT = string.sub(rTime, 2, 2)
 local cT = "0"
 local dT = "0"
 local ampm = "AM"
 if bT == ":" then
  bT = aT
  aT = "0"
  cT = string.sub(rTime, 3, 3)
  dT = string.sub(rTime, 4, 4)
  ampm = string.sub(rTime, 6, 7)
 else
  cT = string.sub(rTime, 4, 4)
  dT = string.sub(rTime, 5, 5)
  ampm = string.sub(rTime, 7, 8)
 end

 if aT == "0" then
  rs.setBundledOutput("right", colors.red + colors.orange + colors.blue + colors.black + colors.white + colors.yellow)
 elseif aT == "1" then
  rs.setBundledOutput("right", colors.yellow + colors.white)
 end

 if bT == "0" then
  rs.setBundledOutput("top", colors.red + colors.orange + colors.blue + colors.black + colors.white + colors.yellow)
 elseif bT == "1" then
  rs.setBundledOutput("top", colors.yellow + colors.white)
 elseif bT == "2" then
  rs.setBundledOutput("top", colors.red + colors. yellow + colors.green + colors.blue + colors.black)
 elseif bT == "3" then
  rs.setBundledOutput("top", colors.red + colors.yellow + colors.green + colors.white + colors.black)
 elseif bT == "4" then
  rs.setBundledOutput("top", colors.orange + colors.green + colors.yellow + colors.white)
 elseif bT == "5" then
  rs.setBundledOutput("top", colors.red + colors.orange + colors.green + colors.white + colors.black)
 elseif bT == "6" then
  rs.setBundledOutput("top", colors.red + colors.orange + colors.green + colors.black + colors.white + colors.blue)
 elseif bT == "7" then
  rs.setBundledOutput("top", colors.red + colors.yellow + colors.white)
 elseif bT == "8" then
  rs.setBundledOutput("top", colors.red + colors.orange + colors.yellow + colors.green + colors.blue + colors.white + colors.black)
 elseif bT == "9" then
  rs.setBundledOutput("top", colors.red + colors.orange + colors.yellow + colors.green + colors.white + colors.black)
 end

 if cT == "0" then
  rs.setBundledOutput("bottom", colors.red + colors.orange + colors.blue + colors.black + colors.white + colors.yellow)
 elseif cT == "1" then
  rs.setBundledOutput("bottom", colors.yellow + colors.white)
 elseif cT == "2" then
  rs.setBundledOutput("bottom", colors.red + colors. yellow + colors.green + colors.blue + colors.black)
 elseif cT == "3" then
  rs.setBundledOutput("bottom", colors.red + colors.yellow + colors.green + colors.white + colors.black)
 elseif cT == "4" then
  rs.setBundledOutput("bottom", colors.orange + colors.green + colors.yellow + colors.white)
 elseif cT == "5" then
  rs.setBundledOutput("bottom", colors.red + colors.orange + colors.green + colors.white + colors.black)
 elseif cT == "6" then
  rs.setBundledOutput("bottom", colors.red + colors.orange + colors.green + colors.black + colors.white + colors.blue)
 elseif cT == "7" then
  rs.setBundledOutput("bottom", colors.red + colors.yellow + colors.white)
 elseif cT == "8" then
  rs.setBundledOutput("bottom", colors.red + colors.orange + colors.yellow + colors.green + colors.blue + colors.white + colors.black)
 elseif cT == "9" then
  rs.setBundledOutput("bottom", colors.red + colors.orange + colors.yellow + colors.green + colors.white + colors.black)
 end

 if dT == "0" then
  rs.setBundledOutput("left", colors.red + colors.orange + colors.blue + colors.black + colors.white + colors.yellow)
 elseif dT == "1" then
  rs.setBundledOutput("left", colors.yellow + colors.white)
 elseif dT == "2" then
  rs.setBundledOutput("left", colors.red + colors. yellow + colors.green + colors.blue + colors.black)
 elseif dT == "3" then
  rs.setBundledOutput("left", colors.red + colors.yellow + colors.green + colors.white + colors.black)
 elseif dT == "4" then
  rs.setBundledOutput("left", colors.orange + colors.green + colors.yellow + colors.white)
 elseif dT == "5" then
  rs.setBundledOutput("left", colors.red + colors.orange + colors.green + colors.white + colors.black)
 elseif dT == "6" then
  rs.setBundledOutput("left", colors.red + colors.orange + colors.green + colors.black + colors.white + colors.blue)
 elseif dT == "7" then
  rs.setBundledOutput("left", colors.red + colors.yellow + colors.white)
 elseif dT == "8" then
  rs.setBundledOutput("left", colors.red + colors.orange + colors.yellow + colors.green + colors.blue + colors.white + colors.black)
 elseif dT == "9" then
  rs.setBundledOutput("left", colors.red + colors.orange + colors.yellow + colors.green + colors.white + colors.black)
 end

 if eFlicker == "1" then
  rs.setBundledOutput("back", colors.black)
  eFlicker = "0"
 else
  rs.setBundledOutput("back", 0)
  eFlicker = "1"
 end
 sleep(1)
 end

--    111     RRR                        AAAAA  M   M     A = RED
--   2   3   O   Y                       A   A  MM MM     P = ORANGE
--   2   3   O   Y                       A   A  M M M     M = YELLOW
--    444     GGG                        AAAAA  M   M
--   5   6   B   W                       A   P  M   M
--   5   6   B   W                       A   P  M   M
--    777     KKK                        A   P  M   M
--    LEFT   TOP   :   BOTTOM   RIGHT    ampm: BACK
--
--   1 = RED
--   2 = ORANGE
--   3 = YELLOW
--   4 = GEREN
--   5 = BLUE
--   6 = white
--   7 = BLACK