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(15) == 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
			returnHome()
			emptyInventory()
			continue()
		end
		up()
	end
end

function returnHome()
	right()
	forward()
	down()
	right()
	for i=1,distance do
		forward()
	end
	right()
	up()
	forward()
	right()
end

function continue()
	forward(distance)
	return true
end

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

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

mine(var)
returnHome()
emptyInventory()