Touch Code Lock

local mon = peripheral.wrap("top")
mon.setTextScale(0.5)
local pass = "1234"
local passlen = string.len(pass)
local login = false
local press = "";
tblpad = {};
for i=0,10 do
tblpad[i] = {}
    for x=0,10 do
        tblpad[i][x] = "x"
    end
end

tblpad[2][6] = "1"
tblpad[4][6] = "2"
tblpad[6][6] = "3"
tblpad[2][7] = "4"
tblpad[4][7] = "5"
tblpad[6][7] = "6"
tblpad[2][8] = "7"
tblpad[4][8] = "8"
tblpad[6][8] = "9"
tblpad[4][9] = "0"

function draw()
    mon.clear()
    mon.setBackgroundColor(colors.black)
    drawframe()
    drawpad()
    drawlogin()
end

function drawframe()
    mon.clear()
    mon.setBackgroundColor(colors.black)
    mon.setCursorPos(1,1)
    mon.write("+-------------+")
    mon.setCursorPos(1,2)
    mon.write("|")
    mon.setTextColor(colors.cyan)
    mon.write("WarpX Project")
    mon.setCursorPos(15,2)
    mon.setTextColor(colors.white)
    mon.write("|")
    mon.setCursorPos(1,3)
    mon.write("+-----+-------+")
    mon.setCursorPos(1,4)
    mon.write("|")
    mon.setCursorPos(7,4)
    mon.write("|")
    mon.setCursorPos(15,4)
    mon.write("|")
    mon.setCursorPos(1,5)
    mon.write("+-----+-------+")
end

function drawlogin()
    mon.setBackgroundColor(colors.cyan)
    mon.setCursorPos(8,4)
    mon.write(" Login ")
end

function drawpad()
    mon.setBackgroundColor(colors.black)
    mon.setCursorPos(2,4)
    mon.setBackgroundColor(colors.cyan)
    mon.write("_____")
    mon.setCursorPos(2,6)
    mon.setBackgroundColor(colors.black)
    mon.write("1 2 3")
    mon.setCursorPos(2,7)
    mon.write("4 5 6")
    mon.setCursorPos(2,8)
    mon.write("7 8 9")
    mon.setCursorPos(2,9)
    mon.write("  0  ")
end

function countdown(c)
    for i=1,c do
        mon.setCursorPos(1,1)
        mon.write("       ")
        mon.setCursorPos(1,2)
        mon.write("       ")
        mon.setCursorPos(1,3)
        mon.write("   ".. c .."   ")
        mon.setCursorPos(1,4)
        mon.write("       ")
        mon.setCursorPos(1,5)
        mon.write("       ")
        sleep(1)
        c = c - 1
    end
end

function dots()
    mon.clear()
    mon.setCursorPos(1,1)
    mon.write("       ")
    mon.setCursorPos(1,2)
    mon.write("       ")
    mon.setCursorPos(1,3)
    mon.write("  ...  ")
    mon.setCursorPos(1,4)
    mon.write("       ")
    mon.setCursorPos(1,5)
    mon.write("       ")
end

function opendoor()
    dots()
    --open door
    countdown(5)
    dots()
    --close door
    mon.clear()
    draw()
end

function wrongpass()
    mon.clear()
    mon.setCursorPos(1,1)
    mon.write("       ")
    mon.setCursorPos(1,2)
    mon.write(" Wrong ")
    mon.setCursorPos(1,3)
    mon.write("       ")
    mon.setCursorPos(1,4)
    mon.write(" Code! ")
    mon.setCursorPos(1,5)
    mon.write("       ")
    sleep(2)
    countdown(5)
    draw()
end

draw()

while true do
    while string.len(press) <= 5 do
    event, side, xPos, yPos = os.pullEvent("monitor_touch")
    --if xPos == 8 or xPos == 9 and yPos == 2 then
    --    login = true
    --    mon.setCursorPos(8,2)
    --    mon.write("loging in")
    --end

    if xPos >= 8 and xPos <= 14 and yPos == 4 then
        login = true
        mon.setCursorPos(8,4)
        mon.write("...    ")
        sleep(0.5)
        mon.setCursorPos(8,4)
        mon.write(" ...   ")
        sleep(0.5)
        mon.setCursorPos(8,4)
        mon.write("  ...  ")
        sleep(0.5)
        mon.setCursorPos(8,4)
        mon.write("   ... ")
        sleep(0.5)
    end
    if tblpad[xPos][yPos] ~= "x" then
        mon.setCursorPos(xPos, yPos)
        mon.setBackgroundColor(colors.cyan)
        mon.write(tblpad[xPos][yPos])
        sleep(0.2)
        mon.setCursorPos(xPos, yPos)
        mon.setBackgroundColor(colors.black)
        mon.write(tblpad[xPos][yPos])
        press = press .. tblpad[xPos][yPos]
        mon.setCursorPos(string.len(press)+1, 4)
        mon.setBackgroundColor(colors.cyan)
        mon.write("*")
    end
        if string.len(press) == passlen and login == true and press == pass then
            press = ""
            login = false
            mon.setCursorPos(8,4)
            mon.setBackgroundColor(colors.green)
            mon.write("Success")
        elseif press ~= pass and login == true then
            press = ""
            login = false
            mon.setCursorPos(8,4)
            mon.setBackgroundColor(colors.red)
            mon.write("Failed ")
        end

    end
end