getlavaplus

local tArgs = {...}
-- Mine in a quarry pattern until we hit something we can't dig
local size = tonumber(tArgs[1])
local mdepth
if #tArgs >= 2 then
    mdepth = tonumber(tArgs[2])
else
    mdepth = 1
end
if size < 1 then
    print("Excavate diameter must be positive")
    return
end
if mdepth < 1 then
    print("Excavate depth must be positive")
    return
end

local depth = 0
local collected = 0
local filled = false

local xPos, zPos = 0, 0
local xDir, zDir = 0, 1

function refuel( ammount )
    local fuelLevel = turtle.getFuelLevel()
    if fuelLevel == "unlimited" then
        return true
    end

    local needed = ammount or (xPos + zPos + depth + 2)
    if turtle.getFuelLevel() < needed then
        local fueled = false
        for n=1,16 do
            if turtle.getItemCount(n) > 0 then
                turtle.select(n)
                if turtle.refuel(1) then
                    while turtle.getItemCount(n) > 0 and turtle.getFuelLevel() < needed do
                        turtle.refuel(1)
                    end
                    if turtle.getFuelLevel() >= needed then
                        turtle.select(1)
                        return true
                    end
                end
            end
        end
        turtle.select(1)
        return false
    end

    return true
end

local function tryForwards()
    if not refuel() then
        print("Not enough Fuel")
        returnSupplies()
    end

    while not turtle.forward() do
        if turtle.detect() then
            turtle.dig()
        end
    end

    xPos = xPos + xDir
    zPos = zPos + zDir
    return true
end

local function tryDown()
    if not refuel() then
        print("Not enough Fuel")
    end

    while not turtle.down() do
        if turtle.detectDown() then
            turtle.digDown()
        end
    end

    depth = depth + 1
    return true
end

local function turnLeft()
    turtle.turnLeft()
    xDir, zDir = -zDir, xDir
end

local function turnRight()
    turtle.turnRight()
    xDir, zDir = zDir, -xDir
end

function goTo(x, y, z, xd, zd)
    while depth > y do
        if turtle.up() then
            depth = depth - 1
        else
            turtle.digUp()
        end
    end

    if xPos > x then
        while xDir ~= -1 do
            turnLeft()
        end
        while xPos > x do
            if turtle.forward() then
                xPos = xPos - 1
            else
                turtle.dig()
            end
        end
    elseif xPos < x then
        while xDir ~= 1 do
            turnLeft()
        end
        while xPos < x do
            if turtle.forward() then
                xPos = xPos + 1
            else
                turtle.dig()
            end
        end
    end

    if zPos > z then
        while zDir ~= -1 do
            turnLeft()
        end
        while zPos > z do
            if turtle.forward() then
                zPos = zPos - 1
            else
                turtle.dig()
            end
        end
    elseif zPos < z then
        while zDir ~= 1 do
            turnLeft()
        end
        while zPos < z do
            if turtle.forward() then
                zPos = zPos + 1
            else
                turtle.dig()
            end
        end
    end

    while depth == y do
        if turtle.down() then
            depth = depth + 1
        else
            turtle.digDown()
        end
    end

    while zDir ~= zd or xDir ~= xd do
        turnLeft()
    end
end

function collect()
    turtle.placeUp()
    if turtle.refuel() then
        collected = collected +1
    end
    turtle.place()
    if turtle.refuel() then
        collected = collected +1
    end
    turtle.placeDown()
    if turtle.refuel() then
        collected = collected +1
    end
    if turtle.getFuelLevel() >= 99999 then
        filled = true
    end
    return filled
end


-- Start Collecting --

if not refuel() then
    print("Out of Fuel")
    return
end

print("Collecting...")


local alternate = 0
local done = false
while not done do
    for n = 1, size do
        for m = 1, size - 1 do
            done = collect()
            if not tryForwards() then
                done = true
                break
            end
        end
        if done then
            break
        end
        if n < size then
            if math.fmod(n + alternate, 2) == 0 then
                done = collect()
                turnLeft()
                if not tryForwards() then
                    done = true
                    break
                end
                turnLeft()
            else
                done = collect()
                turnRight()
                if not tryForwards() then
                    done = true
                    break
                end
                turnRight()
            end
        end
    end
    if done then
        break
    end


    if size > 1 then
        if math.fmod(size, 2) == 0 then
            turnRight()
        else
            if alternate == 0 then
                turnLeft()
            else
                turnRight()
            end
            alternate = 1 - alternate
        end
    end
    done = collect()
    if not tryDown() then
        done = true
        break
    end
    if depth >= mdepth then
        done = true
    end
end

goTo(0, -1, 0, 0, 1)

print("Collected [" .. (collected * 1000) .. "] fuel in total.")
print("Now at [" .. turtle.getFuelLevel() .. "]")