function Down()
	if turtle.detectDown() then
		turtle.digDown();
	end
	turtle.down();
end

function Up()
	while turtle.detectUp() do
		turtle.digUp();
	end
	turtle.up();
end

function Forward()
	while turtle.detect() do
		turtle.dig();
	end
	turtle.forward();
end


function Excrete_netherrack()
	local holder = turtle.getSelectedSlot();
	for i=1,16,1 do
		local x = turtle.getItemDetail(i);
		if x == nil or x["name"] == "minecraft:ancient_debris" or x["name"] == "minecraft:gold_nugget" or x["name"] == "minecraft:quartz" then
			-- literally just do not do anything...
		else
			turtle.select(i);
			turtle.drop();
		end
	end
	turtle.select(holder);
end

local exvac = true;

function Begin()
	turtle.select(1);
	turtle.refuel();
	turtle.turnLeft();

	for x = 1, 16, 1 do

		for i = 1, 16, 1 do
			Forward();
		end

		if exvac then
			turtle.turnRight(); Forward(); turtle.turnRight();
		else
			turtle.turnLeft(); Forward(); turtle.turnLeft();
		end
		exvac = not exvac;
		Excrete_netherrack();

	end

	--[[ return to position ]]
	turtle.turnLeft();
	for i=1, 16, 1 do
		turtle.forward();
	end
	turtle.turnLeft(); turtle.turnLeft();
	Dump_to_big_cheese();
	Wait();
end

function Dump_to_big_cheese()
	for i=1,16,1 do
		turtle.drop();
	end
end


function Wait()
	while true do
		local event = os.pullEvent("redstone");
		Up();
		Begin();
	end
end

while true do
	local event = os.pullEvent("redstone");
	Begin();
end