local y = 2
local z = 0
local i = 0
local function tf() while not turtle.forward() turtle.attack() end
local function td()
local gooditem = true
	for z = 1, y do
	turtle.digDown()
	while not turtle.down() do
		turtle.digDown()
		turtle.attackDown()
	end
	FullStorage()
	RefuelDigger()
	for i = 1, 4 do
		gooditem = true
		for t = 1, 4 do
			turtle.select(t)
			if turtle.compare() then
				gooditem = false
			end
		end
		if gooditem then
			turtle.select(1)
			turtle.dig()
		end
	    turtle.turnRight()
		end
	end -- added end
for z = 1, y do
while not turtle.up() do
	turtle.digUp()
	turtle.attackUp()
end
end
tf()
end
function RefuelDigger()
if turtle.getFuelLevel() < 30 then
  if turtle.getItemCount(16) == 1 then
   turtle.select(16)
   turtle.refuel(1)
   turtle.select(15)
   if turtle.placeUp()then
    turtle.select(16)
    turtle.suckUp()
    turtle.select(15)
    turtle.digUp()
   end
  else
   turtle.select(16)
   turtle.refuel(1)
  end
end
end

function FullStorage()
if turtle.getItemCount(13) > 0 then
  turtle.select(14)
  if turtle.placeUp() then
   for i = 5, 13 do
    turtle.select(i)
    turtle.dropUp()
   end
   turtle.select(14)
   turtle.digUp()
  end
end
end
local tn = turtle.turnRight
local tCom = {tf,tf,tf,tf,td,tf,tf,tf,tf,td,tf,tf,tf,tf,td,tf,tf,tf,tf,td,tf,tf,tf,tf,td}
local function arrayShift(tMyArray)
for i=1,2 do
  table.insert(tMyArray,1,tMyArray[#tMyArray])
  table.remove(tMyArray,#tMyArray)
end
return tMyArray
end
local function myDoit(tArray,dir)
if dir ~= 0 then
  for i=1,#tArray do
  tArray[i]()
  end
else
    for i=#tArray,1, -1 do
    tArray[i]()
  end
end
end
tf()
for i=1,25 do
myDoit(tCom,i%2)
tCom = arrayShift(tCom)
if i%2 == 0 then
  tn = turtle.turnLeft
else
  tn = turtle.turnRight
end
tn()
tf()
tn()
tf()
end