log

    reader = peripheral.wrap("top")
    mon = peripheral.wrap("back")
    rsSide = "bottom"
    logg = false
    startLog = false
    state = 2

    function save(zmienna, name)
        local file = fs.open(name, "w")
        file.write(zmienna)
        file.close()
    end

    function load(name)
        local file = fs.open(name, "r")
        local data = file.readAll()
        file.close()
        return data
    end
    function odpal(par1, par2)
        loadDane = load("dane")
        rs.setBundledOutput(rsSide, 0)

        if par2 == true and logg == false and loadDane == "0" then
            -- wysuwanie panelu
            rs.setBundledOutput(rsSide, colors.white)
            sleep(1)
            rs.setBundledOutput(rsSide, 0)
            rs.setBundledOutput(rsSide, colors.lightBlue)
            sleep(10)
            rs.setBundledOutput(rsSide, 0)
            rs.setBundledOutput(rsSide, colors.lime)
            sleep(6)
            rs.setBundledOutput(rsSide, 0)
            Current = "1"
            logg = true
        end
        if par2 == false then
            rs.setBundledOutput(rsSide, colors.yellow)
            sleep(6)
            rs.setBundledOutput(rsSide, 0)
            rs.setBundledOutput(rsSide, colors.magenta)
            sleep(10)
            rs.setBundledOutput(rsSide, 0)
            rs.setBundledOutput(rsSide, colors.orange)
            sleep(1)
            rs.setBundledOutput(rsSide, 0)
            Current = "0"
            logg = false
        end
        save(Current, "dane")
    end
    function termClear()
        term.clear()
        term.setCursorPos(1,1)
    end
    function printMon(use, lvl)
        mon.clear()
        mon.setCursorPos(1,1)
        mon.write(use)
        mon.setCursorPos(1,3)
        mon.write(lvl)
    end
    users = {
        [1] = {name = "mariu", pass = "mariu", logged = false ,AccesLvl = "2"},
        [2] = {name = "mariu1", pass = "mariu1", logged = false ,AccesLvl = "0"},
    --  [3] = {name = "mariu", pass = "mariu", logged = false ,AccesLvl = "1"},
    }
    termClear()

    if fs.exists("dane") then
        loadDane = load("dane")
    else
        Current = "0"
        save(Current, "dane")
    end
    while true do
        mess = "0"
        if state == 1 then
            event,mess,lab = os.pullEvent("mag_swipe")
            state = 2
        end
        termClear()
        if state == 2 then
            for i=1,#users do
                if startLog == true then
                    if users[i].pass == mess then
                        --print("dostep")
                        dostep = users[i].AccesLvl

                        if users[i].logged == true then
                        -- wlogowanie
                            users[i].logged = false
                            reader.setInsertCardLight(false)
                            printMon("  *** Niezalogowany ***","    oczekuje karty...")
                        else
                            users[i].logged = true
                        --  zalogowanie
                            reader.setInsertCardLight(true)
                            user = users[i].name
                            printMon("Zalogowano: "..user,"Acces Level: "..dostep)
                        end

                        zalogowany = users[i].logged
                        odpal(dostep.zalogowany)
                    else
                        users[i].logged = false -- wylogowanie pozostalych
                    end
                else
                    reader.setInsertCardLight(false)
                    printMon("  *** Niezalogowany ***","    oczekuje karty...")
                startLog = true
                end
                if users[i].logged == true then
                    print("Zalogowano: "..users[i].name.." - Acces Level: "..users[i].AccesLvl)
                else
                    print("Wylogowany: "..users[i].name)
                end
            end
        end
        sleep(1)
        state = 1
    end