mine3.lua

if not turtle then
    error("Turtle required!")
end

write("Miner initializing")
textutils.slowPrint("...", 5)

local DEBUG = true

local resume = not DEBUG and fs.exists(fs.combine("database", shell.getRunningProgram(), "state"))
local running = false

local Aware2 = require("Aware2")
local aware = Aware2.new()

local Miner2 = require("Miner2")
local miner = Miner2.new(aware)

function setup()
    local branchCount, branchLength, branchGap, verticalGap, startX, startY, startZ, facing, minY, maxY

    if DEBUG then
        branchCount = 16
        branchLength = 16
        branchGap = 0
        verticalGap = 1
        startX = 1071
        startY = 65
        startZ = -33
        facing = 4
        minY = 16
        maxY = 20
    else
        while branchCount == nil do
            print("");
            print("How many branches should be mined?")

            local input = read();
            branchCount = tonumber(input)

            if branchCount == nil then
                print("'" .. input .. "' should be a number")
            end
        end

        while branchLength == nil do
            print("");
            print("How long should each branch be?")

            local input = read();
            branchLength = tonumber(input)

            if branchLength == nil then
                print("'" .. input .. "' should be a number")
            end
        end

        if branchCount > 1 then
            while branchGap == nil do
                print("");
                print("How many block gap should there be between branches?")

                local input = read();
                branchGap = tonumber(input)

                if branchGap == nil then
                    print("'" .. input .. "' should be a number")
                end
            end
        end

        while verticalGap == nil do
            print("");
            print("How much space between floors?")

            local input = read();
            verticalGap = tonumber(input)

            if verticalGap == nil then
                print("'" .. input .. "' should be a number")
            end
        end

        if not miner.aware.state.hasGPS then
            while startX == nil do
                print("");
                print("What is the startX of the turtle?")

                local input = read();
                startX = tonumber(input)

                if startX == nil then
                    print("'" .. input .. "' should be a number")
                end
            end

            while startY == nil do
                print("");
                print("What is the startY of the turtle?")

                local input = read();
                startY = tonumber(input)

                if startY == nil then
                    print("'" .. input .. "' should be a number")
                end
            end

            while startZ == nil do
                print("");
                print("What is the startZ of the turtle?")

                local input = read();
                startZ = tonumber(input)

                if startZ == nil then
                    print("'" .. input .. "' should be a number")
                end
            end
        end

        while facing == nil do
            print("");
            print("What is the facing? 1=north, 2=east, 3=south, 4=west")

            local input = read();
            facing = tonumber(input)

            if facing == nil then
                print("'" .. input .. "' should be a number")
            end
        end

        while minY == nil do
            print("");
            print("What is the minY?")

            local input = read();
            minY = tonumber(input)

            if minY == nil then
                print("'" .. input .. "' should be a number")
            end
        end

        while maxY == nil do
            print("");
            print("What is the maxY?")

            local input = read();
            maxY = tonumber(input)

            if maxY == nil then
                print("'" .. input .. "' should be a number")
            end
        end
    end

    miner.aware.state.pos.x = startX
    miner.aware.state.pos.y = startY
    miner.aware.state.pos.z = startZ
    miner.aware.state.pos.f = facing

    miner.aware:setHome(miner.aware.state.pos)

    miner.aware.state.branchCount = branchCount
    miner.aware.state.branchLength = branchLength
    miner.aware.state.branchGap = branchGap
    miner.aware.state.verticalGap = verticalGap
    miner.aware.state.minY = minY
    miner.aware.state.maxY = maxY

    -- set initial target y level
    miner.aware.state.yLevel = minY

    -- setup the GUI frame
    miner:guiFrame()

    running = true

    miner.aware:saveState(miner.aware.state)
end

function main()
    if not resume then
        setup()
    end

    running = true

    miner:useFuel(1000)

    if not miner.aware:equip("minecraft:diamond_pickaxe", "right") then
        error()
    end

    miner:setCurrentAction("descend")

    -- descend to target y level
    miner.aware:moveToY(miner.aware.state.yLevel, true)

    local keepGoing = true

    -- as long as we're at or below the max y level, we branch mine
    while keepGoing do
        miner:setCurrentBranch(1)

        -- execute each branch mine for the current y level
        for i = (miner.aware.state.currentBranch), miner.aware.state.branchCount do
            local isEvenBranch = i % 2 == 0

            miner:setCurrentBranch(i)

            miner:branchMine({
                f = isEvenBranch and 4 or 2, -- face right for odd branches, face left for even ones, because we're coming back the other direction
                l = miner.aware.state.branchLength - 1,
                b = 1,
                left = false,
                right = false,
                up = false
            })

            -- get in position for the next branch
            if i < miner.aware.state.branchCount then
                miner:turnTo(1)

                for _ = 1, miner.aware.state.branchGap + 1 do
                    miner:dig()
                    miner:move()
                end
            end
        end

        -- go back to the vertical shaft
        miner:goTo(
                {
                    x = miner.aware.state.home.x,
                    y = miner.aware.state.pos.y,
                    z = miner.aware.state.home.z,
                    f = 1
                },
                true,
                (miner.aware.state.home.f == 1 or miner.aware.state.home.f == 3) and "xzy" or "zxy"
        )

        local nextY = miner.aware.state.pos.y + miner.aware.state.verticalGap + 1

        if nextY >= miner.aware.state.home.y or nextY > miner.aware.state.maxY then -- no more floors to mine out
            keepGoing = false
        else -- move up the shaft to the next level to branch mine
            miner.aware.state.yLevel = nextY
            miner.aware:saveState(miner.aware.state)
            miner.aware:moveToY(miner.aware.state.yLevel)
        end
    end

    miner:setCurrentAction("home")
    miner.aware:goHome((miner.aware.state.home.f == 1 or miner.aware.state.home.f == 3) and "xzy" or "zxy", true)
    miner:unload("up")
    miner:setCurrentAction("done")
    miner.aware:deleteState()
end

function listen()
    while true do
        local event = os.pullEvent()

        if event == "stateSaved" and running then
            miner:guiStats()
        end
    end
end

parallel.waitForAny(main, listen)