mineTunnel

local delay = 0.25
local counter = 0
local distance = 0

function left(q)
    if q == nil then q = 1 end
    for i=1,q do
        turtle.turnLeft()
    end
    return true
end

function right(q)
    if q == nil then q = 1 end
    for i=1,q do
        turtle.turnRight()
    end
    return true
end

function up(q)
    if q == nil then q = 1 end
    for i=1,q do
        while not turtle.up() do
            digUp()
            turtle.up()
            sleep(delay)
        end
    end
    return true
end

function down(q)
    if q == nil then q = 1 end
    for i=1,q do
        while not turtle.down() do
            digDown()
            turtle.attackDown()
            sleep(delay)
        end
    end
    return true
end

function forward(q)
    if q == nil then q = 1 end
    for i=1,q do
        while not turtle.forward() do
            turtle.dig()
            turtle.attack()
            sleep(delay)
        end
    end
    return true
end

function back()
    right()
    right()
    forward()
    left()
    left()
    return true
end

function dig()
    while turtle.detect() do
        turtle.dig()
        sleep(delay)
    end
    return true
end

function digUp()
    while turtle.detectUp() do
        turtle.digUp()
        sleep(delay)
    end
    return true
end

function digDown()
    while turtle.detectDown() do
        turtle.digDown()
        sleep(delay)
    end
    return true
end

function placetorch()
    if counter == 8 then
        right()
        turtle.select(1)
        turtle.place()
        left()
        counter = 0
    end
end

function checkIfFull()
    if turtle.getItemCount(16) == 0 then
        return false
    end
    return true
end

function mine(var)
    for i=1,var do
        distance = distance + 1
        counter = counter + 1
        dig()
        forward()
        digUp()
        digDown()
        up()
        left()
        dig()
        right(2)
        dig()
        down()
        dig()
        left(2)
        dig()
        down()
        dig()
        right(2)
        dig()
        placetorch()
        left()
        if checkIfFull() == true then
   up()
            returnHome()
            emptyInventory()
            continue()
        end
        up()
    end
end

function goToChest()
    right()
    forward()
    right()
    forward(distance)
    right()
    up()
    forward()
    right()
end

function returnHome()
    right()
    forward()
    down()
    right()
    forward(distance)
    right()
    up()
    forward()
    right()
end

function continue()
    right()
    down()
    forward()
    left()
    forward(distance)
    left()
    forward()
    right()
end

function emptyInventory()
    right(2)
    down()
    for i=2,16 do
        turtle.select(i)
        turtle.drop()
    end
 turtle.select(1)
    up()
    right(2)
end

print("Hello Sir!\nHow far would you like me to mine?")
local var = read()

mine(var)
returnHome()
emptyInventory()