miningLIB

-----------------
--Name: miningLIB
--Version: 1.0.0
--Requires: riewestLIB
--By: Riewest (AKA Riewest14)
-----------------

os.loadAPI("riewestLIB")
lib = riewestLIB

--junk item array
junkItems = {"stone", "gravel", "dirt", "sand"}

function test()
  --strip(10, true, false, 15)
  branchMine(10, 2, 2, true, 16, 15, true)
  --lib.turnAround()
  --dropJunk()
end

--Veinmine the block in front
--Returning to the starting position
function veinMine()
  --TODO
end

--Does a branch mine
--Length: length of the mine
--spaceBet: space between branches
--branchLength: length of branches
--retStart: returns to start if true
--chestSlot: if not nil will dump items
--            into that chest
--fuelSlot: slot to attempt refueling
--          from if not nil

function branchMine(length, spaceBet, branchLength, retStart, fuelSlot, chestSlot, dropjunk)
  if not length then
    length = 15
  end
  if not spaceBet then
    spaceBet = 1
  end
  if not branchLength then
    branchLength = 5
  end
  if not retStart then
    retStart = false
  end
  if not fuelSlot then
    fuelSlot = false
  end
  if not chestSlot then
    chestSlot = false
  end
  local count = 0
  local lengthLeft = length
  for i = 1, length do
    if count > 100 then
      count = 0
    end
    if lengthLeft < spaceBet then
      strip(lengthLeft, false, fuelSlot, chestSlot)
      break
    end
    local moved = strip(spaceBet + 1, false, fuelSlot, chestSlot)
    i = i + moved
    count = count + math.fmod(moved, 100)
    lengthLeft = lengthLeft - moved
    turtle.turnLeft()
    local s1 = strip(branchLength, true, fuelSlot, false)
    local s2 = strip(branchLength, true, fuelSlot, false)
    count = count + (math.fmod(s1, 100) + math.fmod(s2, 100))
    print("Count: " .. count)
    doChestG(chestSlot, count, 100, fuelSlot, dropjunk)
    turtle.turnRight()
  end
  if retStart then
    lib.turnAround()
    lib.tMoveF(length)
  end
end

--Drops junk items
function dropJunk(fuelSlot, chestSlot)
  local slotsToKeep = {}
  if fuelSlot then
    table.insert(fuelSlot)
  end
  if chestSlot then
    table.insert(chestSlot)
  end
  for k, v in pairs(junkItems) do
    lib.dropItem(v, slotsToKeep, "bottom")
  end
end

--Method to check if chest should be
--placed above and empty the inventory
--chestSlot: slot the chest is in if nil
--           will not empty inventory
--dist: Distance the turtle has traveled
--interval: interval inventory should
--          be checked
--fuelSlot: optional fuelslot
--dropjunk: drops the junk items
function doChest(chestSlot, dist, interval, fuelSlot, dropjunk)
  if chestSlot and (math.fmod(dist, interval) == 0) and (turtle.getItemCount(chestSlot) > 0 ) then
    local oldSlot = turtle.getSelectedSlot()
    turtle.select(chestSlot)
    local chestData = turtle.getItemDetail()
    lib.tMoveU()
    turtle.digUp()
    lib.tMoveD()
    while not turtle.placeUp() do
      turtle.digUp()
      sleep(.1)
    end
    local slotsToKeep = {chestSlot}
    if fuelSlot then
      lib.sortItem(fuelSlot)
      table.insert(slotsToKeep, fuelSlot)
    end
    if dropjunk then
      dropJunk()
    end
    lib.emptyInvExcept(slotsToKeep, "top")
    turtle.select(chestSlot)
    if not (chestData.name == "minecraft:chest") then
      while not turtle.digUp() do
        sleep(.1)
      end
    end
    turtle.select(oldSlot)
  end
end

--Slight variation on do chest where
-- it does the function if blocks
-- moved is greater than chest interval
-- takes same parameters
function doChestG(chestSlot, dist, interval, fuelSlot, dropjunk)
  if not chestSlot then
    return
  end
  if dist > interval then
    dist = interval
  end
  doChest(chestSlot, dist, interval, fuelSlot, dropjunk)
end

--Mine a 1b wide 3b tall tunnel
--for length passed. Returns to
-- the start if retStart is true
-- chestSlot: if not nil will dump items
--             into that chest
-- fuelSlot: if not nill will refuel from
--            that slot.
function strip(length, retStart, fuelSlot, chestSlot, dropjunk)
  if not length then
    length = 5
  end
  if not retStart then
    retStart = false
  end
  if not chestSlot then
    chestSlot = false
  end
  if not fuelSlot then
    fuelSlot = false
  end

  for i = 1, length do
    lib.tMoveF()
    turtle.digUp()
    turtle.digDown()
    if fuelSlot then
      lib.tRefuel(fuelSlot)
    end
    doChest(chestSlot, i, 100, fuelSlot, dropjunk)
  end
  if retStart then
    lib.turnAround()
    lib.tMoveF(length)
  end
  return length
end




test()