local speakers = table.pack(peripheral.find("speaker"))
local playerDetector = table.pack(peripheral.find("playerDetector"))
local RedstoneControl = table.pack(peripheral.find("redstoneIntegrator"))
local AlarmToggle = peripheral.wrap("redstoneIntegrator_1")
-- local chat = peripheral.find("chat")

local AllowedUser = "supreacallum45"

function alarmsound()
    -- while true do

    for i = 1, speakers.n do
        speakers[i].playSound("minecraft:block.note_block.bell", 3, 0.5)
        speakers[i].playSound("minecraft:block.note_block.bell", 3, 1)
        speakers[i].playSound("minecraft:block.note_block.bell", 3, 1.5)
        speakers[i].playSound("minecraft:block.note_block.bell", 3, 2)
        speakers[i].playSound("minecraft:block.note_block.bell", 3, 1.5)
        speakers[i].playSound("minecraft:block.note_block.bell", 3, 1)
        speakers[i].playSound("minecraft:block.note_block.bell", 3, 0.5)
    end
    sleep(0.05)
    print("ALARM")
    -- end
end

function getPlayers(range)
    for o = 1, playerDetector.n do
        local players = playerDetector[o].getPlayersInRange(range) -- Returns a table of every player in a certain range
        if next(players) ~= nil then
            for k, v in pairs(players) do -- we use a for loop to print the names of every player
                print(v) -- We print every player name
                if AllowedUser ~= v then
                    closeDoor()
                    alarmsound()
                else
                    print(next(players))
                    openDoor()
                    print("Found No one")
                end
            end
        else
            openDoor()
            print("Found No one")
        end
    end
end

function openDoor()
    for d = 1, RedstoneControl.n do
        RedstoneControl[d].setOutput("top", false)
        print("Opening door...")
    end
end

function closeDoor()
    for d = 1, RedstoneControl.n do
        RedstoneControl[d].setOutput("top", true)
        print("Closing door...")
    end
end

-- getPlayers(10)
-- printPlayerCords("supreamcallum45")

-- alarmsound()

while true do
    while AlarmToggle.getInput("front") == true do
        getPlayers(100)
    end
end