code

-- Made by Jay5476
-- Credit To:
-- Version 0.1

-- Important values
local w,h = term.getSize()
local nBuildingScroll = 0
local sGameDir = "Idle"
local tLocalFiles = {["SAVES"] = false}
local tPasteBinFiles = {["API"] = "CodeHere"}

    tBuildingsDisplay = {
    [1] = 1,
    [2] = 2,
    [3] = 3,
    [4] = 4,
    [5] = 5,
    [6] = 6,
    [7] = 7,
    [8] = 8,
    [9] = 9,
    [10] = 10,
    [11] = 11,
    [12] = 12,
    [13] = 13,
    [14] = 14,
    [15] = 15,
    [16] = 16,
    [17] = 17,
    [18] = 18
    }

local tGameValues = {
["TotalAutoCPS"] = 0,
["AutoCPSValue"] = 1,
["TotalClicks"] = 0,
["ClickValue"] = 1,
["Coins"] = 0,
["B1"] = {
            ["Value"] = 10,
            ["StartPrice"] = 100,
            ["Price"] = 100,
            ["Owned"] = 0
                },
["B2"] = {
            ["Value"] = 15,
            ["StartPrice"] = 300,
            ["Price"] = 300,
            ["Owned"] = 0
                },
["B3"] = {
            ["Value"] = 50,
            ["Price"] = 1000,
            ["Owned"] = 0
                },
[""] = 0,
} -- Add buildings
local sGameValues = textutils.serialize(tGameValues)

-- Base Functions

local function clear() -- Clears Screen
    term.clear()
    term.setCursorPos(1,1)
end

local function cPrint(str) -- Print to centre

    local _, y = term.getCursorPos()
    term.setCursorPos(math.floor((w-#str)/2),y)
    print(str)
end

local function tNumber(tab)

    i = 0
    for k,v in pairs(tab) do

        i = i + 1
    end
    return i
end

local function Counter()
    tBuildingsDisplay = {
    [1] = 1,
    [2] = 2,
    [3] = 3,
    [4] = 4,
    [5] = 5,
    [6] = 6,
    [7] = 7,
    [8] = 8,
    [9] = 9,
    [10] = 10,
    [11] = 11,
    [12] = 12,
    [13] = 13,
    [14] = 14,
    [15] = 15,
    [16] = 16,
    [17] = 17,
    [18] = 18
    }

    clear()
    cPrint("Coins: "..math.floor(tGameValues.Coins).." (+"..math.floor(tGameValues.ClickValue).." Per Click)")
    cPrint("Auto Coins: "..math.floor(tGameValues.AutoCPSValue).." Per 1s")
    --cPrint("Total Clicks: "..tGameValues.TotalClicks)
    for i = 1, w do
        term.write("-")
    end

    for building = 1, 4 do -- Show for buildings at a time

        for i = 1, 3 do

            term.setCursorPos(1,i+4*building-1)
            print(tBuildingsDisplay[i+3*building-3+(nBuildingScroll*3)] or "Coming Soon")

        end


        for x = 1, 20 do
            term.setCursorPos(x,3+4*building)
            term.write("-")
            term.setCursorPos(x,h)
            term.write("-")
        end

    end

end
-- Debug Functions/values

bDebug = false

local function dPrint(str, reason)

reason = reason or "Debugging"
str = str or ""

if bDebug then

    local sColor = term.getTextColor()
    term.setTextColor(colors.green)
    print("Debug Text\n"..reason..": ")
    term.setTextColor(colors.red)
    print(str.."\nPress any key to continue")
    term.setTextColor(sColor)
    os.pullEvent("key")
end

end
-- Game Save/load

local function intFiles()


    local bFirstTime = true

    if fs.exists(sGameDir) then

      bFirstTime = false
      dPrint("True", "Checking Directory Return")

      for k,v in pairs(tLocalFiles) do

       if fs.exists(sGameDir.."/"..k) then
         tLocalFiles[k] = true
       end

       if not tLocalFiles[k] then
         print(k.." Doesnt Exist, Creating")
         local file = fs.open(sGameDir.."/"..k, "a")
           file.write(sGameValues,a)
           file.close()
       end

      end

    else

      print("Creating Directory")
      fs.makeDir(sGameDir)
      for k,v in pairs(tLocalFiles) do
        local file = fs.open(sGameDir.."/"..k, "w")
        file.write(sGameValues)
        file.close()
        print("Created "..k)
      end

    end

end

local function loadSaves()

    local file = fs.open(sGameDir.."/SAVES", "r")
        sLoadGameValues = file.readAll()
        tLoadGameValues = textutils.unserialize(sLoadGameValues)
    file.close()

    clear()
    print("Loaded game values..")
    for k, v in pairs(tLoadGameValues) do -- Get all loaded values and put into current

        if tGameValues[k] then
            tGameValues[k] = v
        end

    end
    for k,v in pairs(tGameValues) do
        if type(v)=="table" then
            for k1, v1 in pairs(v) do
                print("Playing with "..k..k1..": "..v1)
            end
        else
            print("Playing With "..k..": "..v)
        end
    end


    print("Press any key to continue")
    os.pullEvent("key")
end

local function saveFile()

    local tSaveGameValues = tGameValues -- Grab current values
    sSaveGameValues = textutils.serialize(tSaveGameValues) -- Store to string
    local file = fs.open(sGameDir.."/SAVES", "w") -- Open save file
        file.write(sSaveGameValues) -- Overwrite save
    file.close()

end

-- Game functions/code

local function buyBuilding(building)
    local tBuilding = tGameValues[building]
    if tBuilding and type(tBuilding) == "table" then
        if tGameValues.Coins > tBuilding.Price then
            tBuilding.Owned = tBuilding.Owned + 1
            tGameValues.Coins = tGameValues.Coins - tBuilding.Price
            tBuilding.Price = tBuilding.Price * 1.15
        else
            dPrint("Not enough","Building not bought")
            return
        end
    else
        dPrint("Doesn't exist","Building not bought")
        return
    end
end

local function playerClick()

    tGameValues.TotalClicks = tGameValues.TotalClicks + 1
    tGameValues.Coins = tGameValues.ClickValue + tGameValues.Coins
    tGameValues.ClickValue = 1 + (0.01 * tGameValues.TotalClicks)

end

local function autoCPS()


    tGameValues.TotalAutoCPS = tGameValues.TotalAutoCPS + 1
    tGameValues.Coins = tGameValues.AutoCPSValue + tGameValues.Coins

    buyBuilding("B1")
    buyBuilding("B2")
    buyBuilding("B3")

    tGameValues.AutoCPSValue =
    1 + tGameValues.B1.Owned * tGameValues.B1.Value
      + tGameValues.B2.Owned * tGameValues.B2.Value
      + tGameValues.B3.Owned * tGameValues.B3.Value


end

clear()
intFiles()
loadSaves()
clear()
os.startTimer(1)

while true do
    Counter()
    e, p1, p2, p3 = os.pullEvent()
    -- Event, Button, X, Y for mouseclick
    term.setCursorPos(30,10)

    if e == "mouse_click" then
        if p2 >21 then
            playerClick()
        end

    elseif e == "timer" then
        os.startTimer(1)
        autoCPS()
    elseif e == "key" or "key_up" then

        if p1 == 200 and nBuildingScroll > 0 then

            nBuildingScroll = nBuildingScroll -1
        elseif p1 == 208 and nBuildingScroll < ((#tBuildingsDisplay/3) - 4) then
            nBuildingScroll = nBuildingScroll + 1
        end
    term.write(nBuildingScroll.."|")
    term.write(#tBuildingsDisplay/3)
    term.write("|"..e.."|"..p1)
    sleep(1)

    end



    saveFile()
end