GateControl

local time = os.time()
time = textutils.formatTime(time, false)
Chime = peripheral.wrap("left")
Chat = peripheral.wrap("right")

local function morning()
    rs.setOutput("back", false)
    sleep(1.5)
    Chat.say("Good Morning.  The main gate is now open.")
    Chime.playNote(0, 20)
    sleep(0.4)
    Chime.playNote(0, 17)
    sleep(0.4)
    Chime.playNote(0, 15)
    sleep(0.4)
    Chime.playNote(0, 13)
    sleep(0.4)
    Chime.playNote(0, 15)
    sleep(0.2)
    Chime.playNote(0, 17)
    sleep(0.2)
    Chime.playNote(0, 15)
    sleep(0.2)
    Chime.playNote(0, 17)
    sleep(0.2)
    Chime.playNote(0, 20)
    sleep(0.4)
    Chime.playNote(0, 17)
    sleep(0.4)
    Chime.playNote(0, 15)
    sleep(0.4)
    Chime.playNote(0, 13)
    sleep(0.4)
    Chime.playNote(0, 15)
    sleep(0.2)
    Chime.playNote(0, 17)
    sleep(0.2)
    Chime.playNote(0, 15)
    sleep(0.2)
    Chime.playNote(0, 17)
    sleep(0.2)
    Chime.playNote(0, 20)
    sleep(0.4)
    Chime.playNote(0, 17)
    sleep(0.4)
    Chime.playNote(0, 20)
    sleep(0.4)
    Chime.playNote(0, 22)
    sleep(0.4)
    Chime.playNote(0, 17)
    sleep(0.4)
    Chime.playNote(0, 22)
    sleep(0.4)
    Chime.playNote(0, 20)
    sleep(0.4)
    Chime.playNote(0, 17)
    sleep(0.4)
    Chime.playNote(0, 15)
    sleep(0.4)
    Chime.playNote(0, 13)
    sleep(0.4)

end

function noon()
    Chime.playNote(0, 12)
    sleep(0.2)
    Chime.playNote(0, 16)
    sleep(0.1)
    Chime.playNote(0, 19)
    sleep(0.2)
    Chime.playNote(0, 24)
    sleep(0.3)
    Chime.playNote(0, 24)
    sleep(0.3)
    Chime.playNote(0, 24)
    sleep(0.3)
    Chime.playNote(0, 24)
    sleep(0.3)
    Chime.playNote(0, 24)
    sleep(0.1)
    Chime.playNote(0, 23)
    sleep(0.2)
    Chime.playNote(0, 24)
    sleep(0.1)
    Chime.playNote(0, 19)
    sleep(0.2)
    Chime.playNote(0, 16)
    sleep(0.1)
    Chime.playNote(0, 19)
    sleep(0.2)
    Chime.playNote(0, 18)
    sleep(0.1)
    Chime.playNote(0, 17)
    sleep(0.2)
    Chime.playNote(0, 16)
    sleep(0.1)
    Chime.playNote(0, 15)
    sleep(0.2)
    Chime.playNote(0, 14)
    sleep(0.3)
    Chime.playNote(0, 12)
end

function preNight()
    Chat.say("Monsters will spawn soon.  Hurry inside!")
    Chime.playNote(0, 1)
    sleep(0.3)
    Chime.playNote(0, 4)
    sleep(0.3)
    Chime.playNote(0, 7)
end

function night()
    Chat.say("Closing the main gate for your protection.")
    rs.setOutput("back", true)
    sleep(1.5)
    Chime.playNote(0, 1)
    sleep(0.3)
    Chime.playNote(0, 4)
    sleep(0.3)
    Chime.playNote(0, 7)
    sleep(0.3)
    Chime.playNote(0, 10)
    sleep(0.05)
    Chime.playNote(0, 10)
    sleep(0.05)
    Chime.playNote(0, 10)
    sleep(0.05)
    Chime.playNote(0, 10)
    sleep(0.05)
    Chime.playNote(0, 10)
    sleep(0.05)
end

    local Vmorning = os.setAlarm(6)
    local Vnoon = os.setAlarm(12)
    local VpreNight = os.setAlarm(18)
    local Vnight = os.setAlarm(20)
    while true do
        time = os.time()
        local evt, arg = os.pullEvent()
        if evt == "chat" then
            if string.find(arg, "open") then
                if rs.getOutput("back") == true then
                    Chat.say("Temporarily opening the gate")
                    rs.setOutput("back", false)
                    sleep(4)
                    rs.setOutput("back", true)
                end
            end
        else
            if arg == Vmorning then
                morning()
            elseif arg == Vnoon then
                noon()
            elseif arg == VpreNight then
                preNight()
            elseif arg == Vnight then
                night()
            end
        end
        print(time)
    end

--morning()
--noon()
--sleep(5)
--preNight()
--sleep(5)
--night()