CCUPS/main

-- CCUPS (ComputerCraft Unbreakable / User Password System) <= NOW AN OS! --
--           Created by Just Does Games              --
shell.run("clear")

settings.set("shell.allow_disk_startup", false)
settings.save(".settings")
sx,sy = term.getSize()
upd = true


os.pullEvent = os.pullEventRaw

if shell.getRunningProgram() ~= "CCUPS/main.lua" then
    if fs.exists("startup.lua") == true then
        shell.run("clear")
        print("Your Startup Program will be moved here:")
        print("'CCUPS/user_startup.lua'")
        print("----------------------------------------")
        sleep(1.5)
        print("Type 'confirm' to continue")
        write("-- ")
        local inp = read()
        if inp ~= "confirm" and inp ~= "Confirm" and inp ~= "CONFIRM" then
            shell.run("clear")
            print("Files have not been touched or altered.")
            return
        end
        if fs.exists("CCUPS/user_startup.lua") == true then
            fs.delete("CCUPS/user_startup.lua")
        end
        fs.copy("startup.lua", "CCUPS/user_startup.lua")
    end
    if fs.exists("CCUPS/main.lua") == true then
        fs.delete("CCUPS/main.lua")
    end
    shell.run("clear")
    print("Loading...")
    term.setTextColor(colours.black)
    shell.run("pastebin get JQ19FdjH CCUPS/main.lua")
    term.setTextColor(colours.white)
    local file = fs.open("startup.lua", "w")
    file.writeLine("--[] Easter Eggs are kool, do you like them too? []--") -- Yes I Do Too!
    file.writeLine("shell.run('CCUPS/main.lua')")
    file.close()
    shell.run("clear")
    write("new admin password: ")
    local password = read("*")
    local file = fs.open("CCUPS/USERS/admin/admin.lua", "w")
    file.writeLine(password)
    file.writeLine("admin")
    file.writeLine("0")
    file.close()
    print("Username is 'admin' and password has been set!")
    sleep(1.5)
    os.reboot()
end

if fs.exists("CCUPS/USERS/admin/admin.lua") == false then
    local file = fs.open("CCUPS/USERS/admin/admin.lua", "w")
    file.writeLine("0815")
    file.writeLine("admin")
    file.writeLine("0")
    file.close()
end
if fs.exists("CCUPS/USERS/admin/MESSAGES/") == false then
    fs.makeDir("CCUPS/USERS/admin/MESSAGES/")
end

--[[
if fs.exists("startup.lua") == true then
    local file = fs.open("startup.lua","r")
    if file.readLine() ~= "-- CCUPS STARTUP --" then
        if fs.exists("CCUPS/com_startup.lua") then fs.delete("CCUPS/com_startup.lua") end
        fs.move("startup.lua", "CCUPS/com_startup.lua")
        fs.copy("CCUPS/ccups_startup.lua","startup.lua")
    end
    file.close()
else
    fs.copy("CCUPS/ccups_startup.lua","startup.lua")
end
]]--

function clr() term.clear() term.setCursorPos(1,1) end
function setBack(col) term.setBackgroundColor(colors[col]) end
function setText(col) term.setTextColor(colors[col]) end

function check(user, password)
    if fs.exists("CCUPS/USERS/"..user.."/"..user..".lua") == true then
        local file = fs.open("CCUPS/USERS/"..user.."/"..user..".lua","r")
        if password == file.readLine() then
            access = file.readLine()
            credits = file.readLine()
            selector = file.readLine()
            t_color = file.readLine()
            if credits == nil then
                file.close()
                local file = fs.open("CCUPS/USERS/"..user.."/"..user..".lua","w")
                file.writeLine(password)
                file.writeLine(access)
                file.writeLine("0")
                file.writeLine("1")
                file.writeLine("white")
                credits = 0
            end
            credits = tonumber(credits)
            selector = tonumber(selector)
            return true
        else
            return false
        end
        file.close()
    else
        return false
    end
end

function main()
    running = true
    parallel.waitForAny(login,style)
    main_2()
end

function login()
    clr()
    print("Welcome to CCUPS!")
    print("To Create a User, Type 'create'")
    print("")
    write("Username: ")
    user = read()
    if user == "create" then
        _user_create()
    end
    write("Password: ")
    password = read("*")
    print("")
    if check(user, password) == true then
        print("Welcome, "..user)
        sleep(1)
        running = false
    else
        print("Username or Password is Incorrect.")
        sleep(1)
        os.reboot()
    end
end

function style()
    local title = {"W","e","l","c","o","m","e"," ","t","o"," ","C","C","U","P","S","!"}
    if term.isColor() == true then
        clrs = {"red","orange","yellow","lime","lightBlue","purple"}
    else
        clrs = {"gray"}
    end
    while running do
        local temp = 1
        for i=1,#clrs do
            for i=1,#title do
                local px,py = term.getCursorPos()
                term.setCursorPos(0+i,1)
                if term.isColor() == true then
                    setText(clrs[temp])
                else
                    setText("gray")
                end
                write(title[i])
                setText("white")
                term.setCursorPos(px,py)
                sleep(.15)
            end
            if term.isColor() == true then
                for i=1,#title do
                    local px,py = term.getCursorPos()
                    term.setCursorPos(0+i,1)
                    setText("white")
                    write(title[i])
                    term.setCursorPos(px,py)
                    sleep(.15)
                end
            end
            temp = temp + 1
        end
    end
end
cv = "1.0.4"
tmp = 1
function _update()
    setText("black")
    if fs.exists("CCUPS/update.lua") == true then fs.delete("CCUPS/update.lua") end
    shell.run("pastebin get 4Q6FAbDp CCUPS/update.lua")
    if fs.exists("CCUPS/update.lua") == true then
        local file = fs.open("CCUPS/update.lua","r")
        lv = file.readLine()
        file.close()
        if cv ~= lv then
            return true
        else
            return false
        end
    else
        return false
    end
end

function updat()
    while true do
        clr()
        setText("white")
        print("|CCUPS has an update!|")
        print("---------------------+")
        print("")
        print("Current Version: "..cv)
        print("Latest Version: "..lv)
        term.setCursorPos(1,7)
        if tmp == 1 then
            setText("white")
            print("[ Update ]")
            setText("gray")
            print("  Skip  ")
        else
            setText("gray")
            print("  Update  ")
            setText("white")
            print("[ Skip ]")
        end
        a,i = os.pullEvent("key")
        if i == keys.w or i == keys.up then
            if tmp == 2 then tmp = 1 end
        elseif i == keys.s or i == keys.down then
            if tmp == 1 then tmp = 2 end
        elseif i == keys.e or i == keys.enter then
            if tmp == 1 then
                setText("black")
                if fs.exists("CCUPS/main_temp.lua") == true then fs.delete("CCUPS/main_temp.lua") end
                shell.run("pastebin get JQ19FdjH CCUPS/main_temp.lua")
                if fs.exists("CCUPS/main_temp.lua") == true then
                    fs.delete("CCUPS/main.lua")
                    fs.copy("CCUPS/main_temp.lua","CCUPS/main.lua")
                    clr()
                    setText("white")
                    print("Update has been installed!")
                    sleep(1)
                    os.reboot()
                end
            else
                break
            end
        end
    end
end

function main_2()
    if selector == nil then selector = 1 end
    if t_color == nil then t_color = "white" end
    _user("save")
    if access == "admin" then
        if _update() == true and upd == true then -- UPDATE
            updat()
        end
        menu = {"Users", "Messages", "Games", "Redstone", "Settings", "Shell", "Logout"}
        menu_users = {"Add User", "Delete User", "User Access", "Change User Password", "Back"}
        menu_redstone = {"RIGHT","LEFT","TOP","BOTTOM","FRONT","BACK","Back"}
        raw_redstone = {"right","left","top","bottom","front","back"}
    elseif access == "user" then
        menu = {"Messages","Games","Settings","Logout"}
    else
        print("Access Error! Please Report to an Admin.")
        sleep(5)
        os.reboot()
    end
    menu_games = {"RNG", "Paint for Credits", "Back"}
    menu_messages = {"Send", "Check (0)", "Back"}
    menu_settings = {"Change Password", "Delete Account", "Change Selector", "Change Text Color", "Back"}
    sels = {"[ "," ]","{ "," }","- "," -","+ "," +","! "," !","@ "," @", "# "," #","$ "," $","% "," %","^ "," ^","& "," &","* "," *","( "," )"}
    c_menu = menu
    running = true
    sel = 1
    while running do
        if ref == true or ref == nil then
            clr()
            ref = false
            term.setCursorPos(2,2)
            setText("white")
            print("CCUPS V"..cv)
            for i=1,#c_menu do --[ MAIN STYLE OF HOME PAGE ]--
                term.setCursorPos(2,3+i)
                if sel == i then
                    setText("white")
                    write(sels[selector])
                    setText(t_color)
                    write(c_menu[i])
                    setText("white")
                    print(sels[selector+1])
                else
                    setText("gray")
                    print("  "..c_menu[i])
                    setText("white")
                end
            end
            term.setCursorPos(1,sy-2)
            print("Access "..sels[selector]..access..sels[selector+1])
            print("Credits "..sels[selector]..credits..sels[selector+1])
            r_sel = false
        elseif r_sel == true or r_sel == nil then
            r_sel = false
            for i=1,#c_menu do --[ MAIN STYLE OF HOME PAGE ]--
                term.setCursorPos(2,3+i)
                if sel == i then
                    setText("white")
                    write(sels[selector])
                    setText(t_color)
                    write(c_menu[i])
                    setText("white")
                    print(sels[selector+1])
                else
                    setText("gray")
                    print("  "..c_menu[i].."  ")
                    setText("white")
                end
            end
            term.setCursorPos(1,sy-2)
            print("Access "..sels[selector]..access..sels[selector+1])
            print("Credits "..sels[selector]..credits..sels[selector+1])
        end
        a,i = os.pullEvent("key")
        if i == keys.w or i == keys.up then
            if sel ~= 1 then sel = sel - 1 r_sel = true end
        elseif i == keys.s or i == keys.down then
            if sel ~= #c_menu then sel = sel + 1 r_sel = true end
        elseif i == keys.e or i == keys.enter then
            if c_menu == menu_messages then
                if sel == 1 then
                    send_message()
                    ref = true
                    chk()
                elseif sel == 2 then
                    check_messages()
                    ref = true
                    chk()
                elseif sel == #c_menu then
                    c_menu = menu
                    ref = true
                    sel = 1
                    chk()
                end
            elseif c_menu == menu_games then
                if sel == 1 then
                    GAMES_1()
                    ref = true
                    sel = 1
                elseif sel == 2 then
                    GAMES_2()
                    ref = true
                    sel = 1
                elseif sel == #c_menu then
                    c_menu = menu
                    ref = true
                    sel = 1
                end
            elseif c_menu == menu_settings then
                if sel == 1 then
                    cp()
                    ref = true
                elseif sel == 2 then
                    _user_del()
                    ref = true
                elseif sel == 3 then
                    selector = selector + 1
                    if selector == #sels then
                        selector = 1
                    else
                        selector = selector + 1
                    end
                    _user("save")
                    r_sel = true
                elseif sel == 4 then
                    if term.isColor() == true then
                        if t_color == "white" then
                            t_color = "red"
                        elseif t_color == "red" then
                            t_color = "orange"
                        elseif t_color == "orange" then
                            t_color = "yellow"
                        elseif t_color == "yellow" then
                            t_color = "green"
                        elseif t_color == "green" then
                            t_color = "lime"
                        elseif t_color == "lime" then
                            t_color = "lightBlue"
                        elseif t_color == "lightBlue" then
                            t_color = "blue"
                        elseif t_color == "blue" then
                            t_color = "purple"
                        elseif t_color == "purple" then
                            t_color = "white"
                        end
                        _user("save")
                        term.setCursorPos(2,3+sel)
                        setText("white")
                        write(sels[selector])
                        setText(t_color)
                        write(c_menu[sel])
                        setText("white")
                        write(sels[selector+1])
                    else
                        if t_color == "white" then
                            t_color = "lightGray"
                        elseif t_color == "lightGray" then
                            t_color = "white"
                        end
                        _user("save")
                    end
                elseif sel == #c_menu then
                    c_menu = menu
                    ref = true
                    sel = 1
                end
            elseif access == "admin" then
                if c_menu == menu then
                    if sel == 1 then
                        c_menu = menu_users
                        ref = true
                        sel = 1
                    elseif sel == 2 then
                        c_menu = menu_messages
                        ref = true
                        sel = 1
                        chk()
                    elseif sel == 3 then
                        c_menu = menu_games
                        ref = true
                        sel = 1
                    elseif sel == 4 then
                        c_menu = menu_redstone
                        ref = true
                        sel = 1
                    elseif sel == 5 then
                        c_menu = menu_settings
                        ref = true
                        sel = 1
                    elseif sel == 6 then
                        clr()
                        print("Application Closed! Shell Loaded")
                        running = false
                    elseif sel == #c_menu then
                        os.reboot()
                    end
                elseif c_menu == menu_users then
                    if sel == 1 then
                        _user("add")
                        ref = true
                    elseif sel == 2 then
                        _user("delete")
                        ref = true
                    elseif sel == 3 then
                        _user("access")
                        ref = true
                    elseif sel == 4 then
                        _user("password")
                        ref = true
                    elseif sel == #c_menu then
                        c_menu = menu
                        ref = true
                        sel = 1
                    end
                elseif c_menu == menu_redstone then
                    if sel == #c_menu then
                        c_menu = menu
                        ref = true
                        sel = 1
                    else
                        if redstone.getOutput(raw_redstone[sel]) == true then
                            redstone.setOutput(raw_redstone[sel],false)
                        else
                            redstone.setOutput(raw_redstone[sel],true)
                        end
                        ref = true
                    end
                end
            elseif access == "user" then
                if c_menu == menu then
                    if sel == 1 then
                        c_menu = menu_messages
                        ref = true
                        sel = 1
                        chk()
                    elseif sel == 2 then
                        c_menu = menu_games
                        ref = true
                        sel = 1
                    elseif sel == 3 then
                        c_menu = menu_settings
                        ref = true
                        sel = 1
                    elseif sel == #c_menu then
                        os.reboot()
                    end
                end
            end
        end
    end
end
function cp()
    clr()
    print("Current Password: "..password)
    print("")
    write("New Password: ")
    n_password = read("*")
    write("Confirm Password: ")
    n_c_password = read("*")
    if n_c_password == n_password then
        local file = fs.open("CCUPS/USERS/"..user.."/"..user..".lua", "w")
        file.writeLine(n_password)
        file.writeLine(access)
        file.writeLine(credits)
        file.close()
        print("Password has been Changed!")
        sleep(1)
    else
        print("Passwords did not match!")
        sleep(1)
    end
end
function _user(option)
    if option == "add" then
        clr()
        write("New User: ")
        c_user = read()
        print("")
        if fs.exists("CCUPS/USERS/"..c_user) == false then
            write("New Password: ")
            c_pass = read("*")
            local file = fs.open("CCUPS/USERS/"..c_user.."/"..c_user..".lua", "w")
            file.writeLine(c_pass)
            file.writeLine("user")
            file.writeLine(credits)
            file.close()
            fs.makeDir("CCUPS/USERS/"..c_user.."/MESSAGES/")
            print("User has been Created! Access Set to 'user' by Default.")
            sleep(2)
        else
            print("User already exists!")
            sleep(1.5)
        end
    elseif option == "delete" then
        clr()
        write("User: ")
        c_user = read()
        print("")
        if fs.exists("CCUPS/USERS/"..c_user) == true and c_user ~= "admin" and c_user ~= "" then
            write("Enter your Password: ")
            c_pass = read("*")
            if c_pass == password then
                fs.delete("CCUPS/USERS/"..c_user)
                print("User has been Deleted Sucessfully!")
                sleep(2)
            else
                print("Incorrect Password! Canceling...")
                sleep(1)
            end
        else
            _user_error()
            sleep(1.5)
        end
    elseif option == "access" then
        clr()
        write("User: ")
        c_user = read()
        print("")
        if fs.exists("CCUPS/USERS/"..c_user) == true and c_user ~= "" then
            local file = fs.open("CCUPS/USERS/"..c_user.."/"..c_user..".lua", "r")
            print("Current Password: "..file.readLine())
            print("Current Access: "..file.readLine())
            print("Current Credits: "..file.readLine())
            file.close()
            print("")
            write("New Access: ")
            c_access = read()
            print("")
            if c_access == "admin" or c_access == "user" then
                local file = fs.open("CCUPS/USERS/"..c_user.."/"..c_user..".lua", "w")
                file.writeLine(user_password)
                file.writeLine(c_access)
                file.writeLine(credits)
                file.close()
                print("Access has been changed!")
                sleep(1)
            else
                print("Invalid Access Format! try 'admin' or 'user' with no caps")
                sleep(2)
            end
        else
            _user_error()
            sleep(1.5)
        end
    elseif option == "password" then
        clr()
        write("User: ")
        c_user = read()
        print("")
        if fs.exists("CCUPS/USERS/"..c_user) == true and c_user ~= "admin" and c_user ~= "" then
            local file = fs.open("CCUPS/USERS/"..c_user.."/"..c_user..".lua", "r")
            print(c_user.."'s Password is Currently "..file.readLine())
            local temp = file.readLine()
            file.close()
            print("")
            write("New Password: ")
            c_pass = read("*")
            local file = fs.open("CCUPS/USERS/"..c_user.."/"..c_user..".lua", "w")
            file.writeLine(c_pass)
            file.writeLine(temp)
            file.writeLine(credits)
            file.close()
            print("Password has been changed!")
            sleep(1)
        else
            _user_error()
            sleep(1)
        end
    elseif option == "save" then
        local file = fs.open("CCUPS/USERS/"..user.."/"..user..".lua", "w")
        file.writeLine(password)
        file.writeLine(access)
        file.writeLine(credits)
        file.writeLine(selector)
        file.writeLine(t_color)
        file.close()
    end
end

function _user_error()
    print("User unable to be found or modified.")
end

function _user_create()

    clr()
    print("Welcome to CCUPS!")
    print("Type 'back' to go back")
    print("===================================")
    write("New Username: ")
    user = read()
    if user == 'back' or user == 'Back' or user == 'BACK' then
        os.reboot()
    elseif fs.exists("CCUPS/USERS/"..user) == true or user == "" then
        print("User Already Exists or cannot be Used!")
        sleep(1.2)
        _user_create()
    else
        write("New Password: ")
        password = read("*")
        local file = fs.open("CCUPS/USERS/"..user.."/"..user..".lua", "w")
        file.writeLine(password)
        file.writeLine("user")
        file.writeLine("0")
        file.close()
        print("===================================")
        print("Welcome to this Computer, "..user.."!")
        sleep(.6)
        print("Login as normal and we can Begin!")
        sleep(3)
    end

    os.reboot()
end

function _user_del()
    clr()
    print("Are You Sure?")
    print("=============")
    write("Account Username: ")
    local inp = read()
    if inp ~= user then
        print("=============")
        print("CANCELED!")
        print("=============")
        sleep(1)
    else
        write("Account Password: ")
        local inp = read("*")
        if inp == password then
            fs.delete("CCUPS/USERS/"..user)
            print("=============")
            print(user.." HAS BEEN DELETED!")
            print("=============")
            sleep(1)
            os.reboot()
        else
            print("=============")
            print("CANCELED!")
            print("=============")
            sleep(1)
        end
    end
end

function chk()
    msg = 1
    repeat
        if fs.exists("CCUPS/USERS/"..user.."/MESSAGES/"..msg..".lua") == false then
            fin = true
        else
            msg = msg + 1
        end
    until fin == true fin = false msg = msg - 1
    menu_messages[2] = "Check ("..msg..")"
end

function check_messages()
    msg = 1
    chk()
    clr()
    b_msg = msg
    if msg == 1 then
        print("You Have 1 New Message!")
    else
        print("You Have "..msg.." New Messages!")
    end
    sleep(.7)
    if msg ~= 0 then
        repeat
            clr()
            local file = fs.open("CCUPS/USERS/"..user.."/MESSAGES/"..msg..".lua", "r")
            textutils.slowPrint("TO: "..user)
            textutils.slowPrint("FROM: "..file.readLine())
            print("-------------------------")
            print("")
            textutils.slowPrint(file.readLine())
            file.close()
            print("-------------------------")
            print("Press [ANY KEY] to see next Message")
            print("Press [f] to Delete All Messages & Exit")
            print("Messages Left: "..msg-1)
            sleep(.5)
            a,i = os.pullEvent()
            if i == keys.f then
                msg = 0
                shell.run("delete CCUPS/USERS/"..user.."/MESSAGES")
                fs.makeDir("CCUPS/USERS/"..user.."/MESSAGES")
            else
                fs.delete("CCUPS/USERS/"..user.."MESSAGES/"..msg..".lua")
                msg = msg - 1
            end
        until msg == 0
    end
end

function send_message()
    clr()
    msg = 1
    write("Receiver: ")
    local Receiver = read()
    print("")
    if fs.exists("CCUPS/USERS/"..Receiver) == true and Receiver ~= "" then
        write("Message: ")
        local Message = read()
        repeat
            if fs.exists("CCUPS/USERS/"..Receiver.."/MESSAGES/"..msg..".lua") == false then
                fin = true
            else
                msg = msg + 1
            end
        until fin == true fin = false
        local file = fs.open("CCUPS/USERS/"..Receiver.."/MESSAGES/"..msg..".lua","w")
        file.writeLine(user)
        file.writeLine(Message)
        file.close()
        print("")
        print("Message has been Sent!")
        sleep(1)
    else
        print("Unable to find "..Receiver)
        sleep(1)
    end
end

function checkGameData(game)
    if fs.exists("CCUPS/USERS/"..user.."/GAMES/"..game.."/data.lua") == true then
        return true
    else
        return false
    end
end

function GAMES_1()
    local g_menu = {"Easy","Normal","Hard","Quit"}
    local selected = 1
    local run = true
    ref = true

    while run do
        if ref == true or ref == nil then ref = false clr()
        for i=1,#g_menu do
            if selected == i then
                print("{ "..g_menu[i].." }")
            else
                print("  "..g_menu[i])
            end
        end
        term.setCursorPos(1,sy-1)
        print("Credits: "..credits)
        end
        a,i = os.pullEvent("key")
        if i == keys.w or i == keys.up then
            if selected ~= 1 then selected = selected - 1 ref = true end
        elseif i == keys.s or i == keys.down then
            if selected ~= #g_menu then selected = selected + 1 ref = true end
        elseif i == keys.e or i == keys.enter then
            if selected == 1 then
                GAMES_1_init(1)
                ref = true
            elseif selected == 2 then
                GAMES_1_init(2)
                ref = true
            elseif selected == 3 then
                GAMES_1_init(3)
                ref = true
            elseif selected == #g_menu then
                run = false
            end
        end
    end
end

function GAMES_1_init(dif)
    local prize = 0
    if dif == 1 then
        if credits > 1000 then
            guess = math.random(14,16)
            prize = 25
        elseif credits > 800 then
            guess = math.random(15,17)
            prize = 20
        elseif credits > 600 then
            guess = math.random(16,18)
            prize = 15
        elseif credits > 400 then
            guess = 19
            prize = 10
        else
            guess = 20
            prize = 10
        end
    elseif dif == 2 then
        if credits > 1000 then
            guess = math.random(4,6)
            prize = 75
        elseif credits > 800 then
            guess = math.random(5,7)
            prize = 70
        elseif credits > 600 then
            guess = math.random(6,8)
            prize = 65
        elseif credits > 400 then
            guess = 9
            prize = 50
        else
            guess = 10
            prize = 25
        end
    else
        if credits > 1000 then
            guess = math.random(1,3)
            prize = 100
        elseif credits > 800 then
            guess = math.random(2,4)
            prize = 90
        elseif credits > 600 then
            guess = math.random(3,5)
            prize = 80
        elseif credits > 400 then
            guess = 4
            prize = 70
        else
            guess = 5
            prize = 60
        end
    end
    local numb = math.random(1,100)
    local win = false
    local last_dir = "*"
    repeat
        clr()
        print("Guesses: "..guess)
        print("Last Guess was "..last_dir.." to 100")
        write("Guess: ")
        local n_guess = tonumber(read())
        if type(n_guess) == "number" then
            if n_guess == numb then
                win = true
                last_dir = "="
            else
                if n_guess < numb then
                    last_dir = "<"
                else
                    last_dir = ">"
                end
                guess = guess - 1
            end
        else
            last_dir = "*"
        end
    until guess == 0 or win == true
    if win == true then
        clr()
        print("You Have Won!")
        print("The Number was "..numb)
        local b_credits = credits + prize + guess
        print(b_credits.." Has been added to your account.")
        credits = credits + prize + guess
        _user("save")
        sleep(3)
    else
        clr()
        print("You have Lost.")
        print("The Number was "..numb)
        sleep(2)
    end
end

function GAMES_2()
    local run = true
    curclol = "white"
    cr = 0
    local cr_timer = 0
    clr()
    GAMES_2_drawMenus()
    while run do
        a,b,x,y = os.pullEvent()
        if x ~= nil and y ~= nil then
            if x == sx and y == 1 then
                setBack("black")
                run = false
            elseif y == sy and x <= #clrs_1 then
                setBack(clrs_1[x])
                curclol = clrs_1[x]
            elseif y ~= 1 and y ~= sy then
                term.setCursorPos(x,y)
                write(" ")
                cr_timer = cr_timer + 1
                if cr_timer == 220 then
                    cr = cr + 1
                    cr_timer = 0
                    GAMES_2_updateText()
                end
            end
        end
    end
    if cr ~= 0 then
        credits = credits + cr
        _user("save")
    end
end

function GAMES_2_drawMenus()
    clrs_1 = {"red", "orange", "brown","yellow", "green", "lime", "lightBlue", "blue", "cyan", "purple", "black", "gray","white"}
    term.setCursorPos(1,1)
    setBack("gray")
    setText("white")
    for i=1, sx do
        if i == sx then
            setBack("red")
        end
        write(" ")
    end
    setBack("gray")
    term.setCursorPos(1,1)
    write("Credits Earned: $"..cr)
    term.setCursorPos(1,sy)
    for i=1, sx do
        write(" ")
    end
    term.setCursorPos(1,sy)
    for i=1, #clrs_1 do
        setBack(clrs_1[i])
        write(" ")
    end
end

function GAMES_2_updateText()
    term.setCursorPos(18,1)
    setBack("gray")
    write(cr)
    setBack(curclol)
end




main()