Turtle Strip chest

Args = {...}
x,y = 0,0
dir = { [1]="+X", [2]="+Y", [3]="-X", [4]="-Y" }
nDir = 1

function printUsage()
	print("Usage:")
	print("strip <BLOCKS> <WIDE> <left/right>")
	print("Strip mines <BLOCKS> blocks infront and <WIDE> blocks to the side.")
end

function printFail()
	print("Failed at a task.")
end

function hasSpace()
	local space = false
	for i=1,16 do
		if turtle.getItemCount(i) == 0 then
			space = true
		end
	end
	return space
end

function getFuel()
	return turtle.getFuelLevel()
end

function dropOff()
	print("Dropping off items, fuel: "..getFuel())
	oldx = x
	oldy = y
	oldDir = nDir
	goY(0)
	goPos(0,0)
	for i=1,16 do
		turtle.select(i)
		turtle.drop()
	end
	turtle.select(1)
	goPos(oldx,oldy)
	while oldDir ~= nDir do
		turnRight()
	end
end

function goDirFor(bool)
	if bool then
		if dir[nDir] == "+X" then x = x + 1 elseif
		dir[nDir] == "-X" then x = x - 1 elseif
		dir[nDir] == "+Y" then y = y + 1 elseif
		dir[nDir] == "-Y" then y = y - 1 end
	else
		if dir[nDir] == "+X" then x = x - 1 elseif
		dir[nDir] == "-X" then x = x + 1 elseif
		dir[nDir] == "+Y" then y = y - 1 elseif
		dir[nDir] == "-Y" then y = y + 1 end
	end
end

function mineFor()
	while turtle.detect() do
		turtle.dig()
		os.sleep(0.5)
	end
	if not hasSpace() then dropOff() end
	return true
end

function mineUp()
	while turtle.detectUp() do
		turtle.digUp()
		os.sleep(0.5)
	end
	if not hasSpace() then dropOff() end
	return true
end

function mineDown()
	turtle.digDown()
	if not hasSpace() then dropOff() end
	return true
end

function goFor()
	if turtle.forward() then
		goDirFor(true)
	else
		return false
	end
end

function goBack()
	if turtle.back() then
		goDirFor(false)
	else
		return false
	end
end

function turnRight()
	turtle.turnRight()
	if nDir < 4 then
		nDir = nDir + 1
	else
		nDir = 1
	end
end

function turnLeft()
	turtle.turnLeft()
	if nDir > 1 then
		nDir = nDir - 1
	else
		nDir = 4
	end
end

function mine()
	mineFor()
	mineUp()
	mineDown()
	goFor()
end

function stripFor()
	if dirFor then
		while x < blocksfor do
			mineFor()
			mineUp()
			mineDown()
			goFor()
		end
	else
		while x > 0 do
			mineFor()
			mineUp()
			mineDown()
			goFor()
		end
	end
end

function goX(dx)
	if dx > x then
		while dir[nDir] ~= "+X" do
			turnRight()
		end
	else
		while dir[nDir] ~= "-X" do
			turnRight()
		end
	end
	while x ~= dx do
		goFor()
	end
end

function goY(dy)
	if dy > y then
		while dir[nDir] ~= "+Y" do
			turnRight()
		end
	else
		while dir[nDir] ~= "-Y" do
			turnRight()
		end
	end
	while y ~= dy do
		goFor()
	end
end

function goPos(dx,dy)
	if dx > x then
		while dir[nDir] ~= "+X" do
			turnRight()
		end
	else
		while dir[nDir] ~= "-X" do
			turnRight()
		end
	end
	while x ~= dx do
		goFor()
	end
	if dy > y then
		while dir[nDir] ~= "+Y" do
			turnRight()
		end
	else
		while dir[nDir] ~= "-Y" do
			turnRight()
		end
	end
	while y ~= dy do
		goFor()
	end
	while dir[nDir] ~= "-X" do
		turnRight()
	end
end

function stripMine(num)
	for i=1,num do
		stripFor()
		if i < num then
			print("Turning around, fuel: "..getFuel())
			if boolTurnRight then
				turnRight()
				mine()
				turnRight()
			else
				turnLeft()
				mine()
				turnLeft()
			end
			boolTurnRight = not boolTurnRight
			dirFor = not dirFor
		end
	end
	mineUp()
	mineDown()
	print("Going back to start, fuel: "..getFuel())
	goPos(0,0)
	dropOff()
	print("Job done, fuel: "..getFuel())
end

if #Args == 0 then
	printUsage()
else
	if tonumber(Args[1]) == 0 or tonumber(Args[2]) == 0 then
		printUsage()
	else
		if Args[3] == "right" or Args[3] == "left" then
			if Args[3] == "right" then
				boolTurnRight = true
			else
				boolTurnRight = false
			end
			blocksfor = tonumber(Args[1]) - 1
			dirFor = true
			stripMine(tonumber(Args[2]))
		end
	end
end