Fortune teller (horologium predictor)

-- Under: Optional chatbox
-- Above: Optional monitor
local f_reboot = false

while not f_reboot do
    -- Day on which horologium last showed up
    local horologium = 751

    local day = os.day()
    local ellipsis = 36

    local daysLeft = ellipsis - ((day-horologium) % ellipsis)

    local mon = peripheral.wrap("top")
    if mon then
        term.redirect(mon)
    end

    if daysLeft > 3 then
        term.setBackgroundColor(colors.red)
    else
        term.setBackgroundColor(colors.green)
    end

    local width, height = term.getSize()

    term.clear()
    term.setCursorPos(1, 1)
    print("Astrology: ")
    local fortune = {
        "The stars have aligned today. You should take advantage of this and buy more butter.",
        "You'll take part in an argument. In favor or against greasy hair ? Try to stay calm.",
        "You'll have an argument with your significant other. But you'll stutter and lose like a lil bitch.",
        "You'll try to give yourself a cool nickname but everyone still calls you 'retardboi'",
        "There's another strike in France today. This doesn't mean much though.",
        "You're going to eat lobster. You'll want to make a pun, but it won't translate well in english.",
        "You'll spend a significant part of the day drawing dicks in a gas station bathroom",
        "Your colleagues are talking shit about you. And rightfully so, cuz you're a lil bitch",
        "You're going to be impregnated by aliens. Don't let them call the child Wyatt. They'll insist.",
        "You'll steal a baguette and be sent to jail for 8 years. You'll share a cell with Bill Cosby.",
        "It's funny, after 35 years of marriage, you'd think it'd be easy identifying your wife's corpse.",
        "Next week, you and 3,244 other Eagles fans will assume someone else will bring the beach ball.",
        "The people at the local animal shelter wouldn't think so highly of you if they knew about your taxidermy hobby.",
        "You can't remember how you first got in trouble with the Japanese Mafia, but constantly mistaking them for the Chinese Mafia sure hasn't helped matters.",
        "Travel and adventure are in your future this week as your captors continue crossing state lines to stay one step ahead of the law.",
        "It comes down to whether or not you can play an instrument or drive a stick, but no, you won’t get the girl this time, either.",
        "Just when all hope is gone, you will find a secret stash of Oreos that actually makes up for quite a lot.",
        "Although you feel as if you are all alone in a cold, brutal, and uncaring world, there are in fact 7 billion other people there.",
        "Earth and Water magics are very strong in your sign this week, indicating that this is a good time to do mud-related activities.",
        "It’s actually not true that doctors would simply allow you to die in order to harvest your organs. You’ll be dead, all right.",
    }

    fortune = fortune[day%#fortune + 1]
    print(fortune)
    print("")

    if daysLeft > 1 then
        print("Horologium will be up in " .. daysLeft .. (daysLeft<=1 and " day" or " days"))
    else
        print("Horologium will be up TONIGHT !!!")
    end

    if mon then
        term.redirect(term.native())
    end

    local cb = peripheral.wrap("bottom")
    if cb then
        cb.setName("Fortune Teller")
        cb.say("Here is for today's fortune: " .. fortune)
    end

    local alarm = os.setAlarm(0)
    while not f_reboot do
        event, param = os.pullEvent()
        print(event, param)
        if event == "alarm" and param == alarm then
            break
        end
    end
end