View difference between Paste ID: bHtJ7DL8 and sPwKrheM

 local args = {...}
 --slot id:
 --1 = mining well, 2=tesseract wtih shiny dust, 3 pipes
 print("Dont forget to shiny dust the tesseract to retain their setting upon destroy");
 local zz=turtle
-placeAt(0,0,0,1);--well
+
-turnRight();
+
-placeAt(0,0,0,1);--well
+
 local currentZ=0 -- depth
 
-placeAt(0,0,0,1);--well
+local isUndroppable={};
 function setCurrentItemsUndroppable()
-placeAt(1,0,0,2);  --pipe
+isUndroppable={};
-turnRight();
+for undroppableItems=1,16 do
-placeAt(1,0,0,3);--tesseract
+local data = turtle.getItemDetail(undroppableItems);
-turnRight();
+
-placeAt(1,0,0,2);--pipe
+	     isUndroppable[data.name..data.damage]=true;
-goToCord(0,0,0);
+	 end
-placeUpAt(0,0,0,2);--pipe
+
 end
 
 local memorizedItemInventory={};
-goToCord(0,0,0);
+function memorizeItemSlot()
-turtle.select(1);
+memorizedItemInventory={};
-turtle.dig(); -- well
+for slotIDMemory=1,16 do
-turnRight();
+local data = turtle.getItemDetail(slotIDMemory);
-turtle.dig(); -- well
+
 	     memorizedItemInventory[data.name..data.damage]=slotIDMemory;
 	 end
-turtle.dig(); --well
+
-turtle.digUp()--pipe
+
-turtle.select(1);
+
-goToCord(1,0,0);
+function sortInventoryByMemory()
-turtle.dig();--pipe
+for slotIDMemory=1,16 do
-turnRight();
+local data = turtle.getItemDetail(slotIDMemory);
-turtle.dig();--tesseract
+     if data and memorizedItemInventory[data.name..data.damage] > 0 then
-turnRight();--pipe
+	     turtle.select(slotIDMemory);
-turtle.dig();
+	     turtle.transferTo(memorizedItemInventory[data.name..data.damage]);
-goToCord(0,0,0);
+	 end
 end
 end
 
 
-  if i ~=2 then
+
 placeAt(1,0,0,1);--well
 turnLeft();
 placeAt(1,0,0,1);--well
 turnLeft();
-           until turtle.drop() or turtle.dropDown();
+placeAt(1,0,0,1);--well
 turnLeft();
 placeAt(1,0,0,1);--well
 turnLeft();
 placeDownAt(1,0,0,1);--bottom well
 goToCord(2,0,0);--turtle resting spot
 placeDownAt(2,0,0,2);--tesseract
 
 end
 
 function loadSystems()
-return peripheral.call("front","hasWork")
+
 end
 function dumpAllItems()
 
 for i=1,16 do
   if  true then
    local data = turtle.getItemDetail(i);
      if data and not isUndroppable[data.name..data.damage] then
 	goToCord(2,0,0);
            repeat
                 turtle.select(i);
            until turtle.dropDown();
 
      end
    end
   end
 end
 
  function dumpAllItemsAndReturnToWork()
 local rememberCordX=currentX;
 local rememberCordY=currentY;
 local rememberCordZ=currentZ;
 for iDropReturn=1,16 do
   if  true then
    local data = turtle.getItemDetail(iDropReturn);
     if data and not isUndroppable[data.name..data.damage] then
 	 print("trying at "..iDropReturn,currentX,currentY,currentZ);
 	goToCord(2,0,0);
            repeat
                 turtle.select(iDropReturn);
            until turtle.dropDown();
 
      end
    end
   end
 goToCord(rememberCordY,rememberCordX,rememberCordZ);
 end
 
 
 
 function isStillWorking()
 return peripheral.call("bottom","hasWork")
 end
 
 
 local currRad=1 -- 0 is the right, 1 is default (original direction), 2 is the left, 3 is the back
 local cacheSlot = {}
 function place(slotID)
                 zz.select(slotID)
                 if zz.getItemCount()>0 then
                         return zz.place()
                 end
      return false
 end
 function placeUp(slotID)
                 zz.select(slotID)
                 if zz.getItemCount()>0 then
                         return zz.placeUp()
                 end
      return false
 end
 function placeDown(slotID)
                 zz.select(slotID)
                 if zz.getItemCount()>0 then
                         return zz.placeDown()
                 end
      return false
 end
 function refuel(amount)
         while zz.getFuelLevel()<=math.abs(amount) do
                 zz.select(16)
                 zz.refuel(1)
                                 print("Refueling")
         end
 end
 function turnRight()
         while zz.turnRight() do
                 currRad=(currRad-1)%4
                 break
         end
 end
 function turnLeft()
         while zz.turnLeft() do
                 currRad=(currRad+1)%4
                 break
         end
 end
 function turnToRad(r)
         if currRad==r then
                 return true
         end
         while currRad~=r do
                 if currRad>r then
                         turnRight()
                 elseif currRad<r then
                         turnLeft()
                 end
         end
 end
 function alertForProblem(stringCauseOfProblem)
         zz.turnRight()
         zz.turnRight()
         zz.turnRight()
         zz.turnRight()
         print(stringCauseOfProblem)
 end
 function moveByX(ox)
         local x=currentX+ox
         turnToRad(0)
         refuel(ox)
         while ox~=0 do
                 if ox<0 then
                         if zz.back() then
                                 ox=ox+1
                                 currentX=currentX-1
                         else
                                 alertForProblem("can not move - check fuel or obstacle")
                                 moveByX(ox)
                                 break
                         end
                 else
                         if zz.forward() then
                                 ox=ox-1
                                 currentX=currentX+1
                         else
                                 alertForProblem("can not move - check fuel or obstacle")
                                 moveByX(ox)
                                 break
                         end
                 end
         end
 end
 function moveByZ(oz)
         local z=currentZ+oz
         turnToRad(1)
         refuel(oz)
         while oz~=0 do
                 if oz<0 then
                         if zz.back() then
                                 oz=oz+1
                                 currentZ=currentZ-1
                         else
                                 alertForProblem("can not move - check fuel or obstacle")
                                 moveByZ(oz)
                                 break
                         end
                 else
                         if zz.forward() then
                                 oz=oz-1
                                 currentZ=currentZ+1
                         else
                                 alertForProblem("can not move - check fuel or obstacle")
                                 moveByZ(oz)
                                 break
                         end
                 end
         end
 end
 function moveByY(oy)
         local y=currentY+oy
         refuel(oy)
         while oy~=0 do
                 if oy<0 then
                         if zz.down() then
                                 oy=oy+1
                                 currentY=currentY-1
                         else
                                 alertForProblem("can not move down - check fuel or obstacle")
-  unloadSystems()
+
                                 break
                         end
                 else
                         if zz.up() then
-	turnLeft();
+
-
+
-  turtle.select(2);
+
-   turtle.digUp();
+
-   goToCord(1,0,0);
+
-  dumpAllItems();
+
-  loadSystems();
+
                 end
-    turtle.forward();
+
 end
 function goToCord(y,x,z)
         local differenceX=x-(currentX)
         local differenceY=y-currentY
         local differenceZ=z-currentZ
         if differenceX~=0 then moveByX(differenceX) end
         if differenceY~=0 then moveByY(differenceY) end
         if differenceZ~=0 then moveByZ(differenceZ) end
 end
 
 function placeAt(y,x,z,slotID)
         goToCord(y,x,z)
         if place(slotID) then return true
         else
                 alertForProblem("can not place ahead - must be air ahead or do I have a material to place")
                 placeAt(y,x,z,slotID)
         end
 end
 function placeUpAt(y,x,z,slotID)
         goToCord(y,x,z)
         if placeUp(slotID) then return true
         else
                 alertForProblem("can not place up - must be air ahead or do I have a material to place")
                 placeUpAt(y,x,z,slotID)
         end
 end
 
 function placeDownAt(y,x,z,slotID)
         goToCord(y,x,z)
         if placeDown(slotID) then return true
         else
                 alertForProblem("can not place down - must be air ahead or do I have a material to place")
                 placeUpAt(y,x,z,slotID)
         end
 end
 
 
 local repeatUntil=1;
 
 setCurrentItemsUndroppable();
 memorizeItemSlot();
 if (#args==1) and tonumber(args[1])>1 then
 repeatUntil=tonumber(args[1]);
 end
 for zd=1,repeatUntil do
   unloadSystems();
   turtle.select(4);
   goToCord(2,1,0);
   repeat
      os.sleep(1);
   until not isStillWorking();
 
 --finished work, lets pack it up here
    dumpAllItemsAndReturnToWork();
    turtle.select(1);
 	turtle.digDown();
     goToCord(2,0,1);
   repeat
      os.sleep(1);
   until not isStillWorking();
    dumpAllItemsAndReturnToWork();
     turtle.select(1);
     turtle.digDown();
     goToCord(2,-1,0);
   repeat
      os.sleep(1);
   until not isStillWorking();
    dumpAllItemsAndReturnToWork();
     turtle.select(1);
    turtle.digDown();
     goToCord(2,0,-1);
   repeat
      os.sleep(1);
   until not isStillWorking();
    dumpAllItemsAndReturnToWork();
    turtle.select(1);
    turtle.digDown();
     goToCord(2,0,0);
     turtle.select(2);
    turtle.digDown();
   goToCord(1,0,0);
    turtle.select(1);
    turtle.digDown();--destroying bottom well
  goToCord(0,0,0);
   if repeatUntil>1 then
 	local moveForward=0;
     repeat
 	  if turtle.forward() then moveForward=moveForward+1; end
 	until moveForward==3;
   end
 end
 print("done");