function discharge() --throws all stuff under turtle
 for slot = 1, 9 do
  turtle.select(slot)
  turtle.dropDown()
 end
end

function isempty()
 local empty = true
 for slot = 1, 9 do
  empty = empty and (turtle.select(getItemCount(slot))
 end
end

function redblinc() --gives out redcurrent on all faces
 for k,v in pairs(rs.getSides()) do
  rs.setOutput(k, true)
 end
 os.sleep(0.5)
 for k,v in pairs(rs.getSides()) do
  rs.setOutput(k, false)
 end
end

function deposit()
 turtle.back()
 turtle.back()
 discharge()
 redblink()
 turtle.forward()
 turtle.forward()
end


 repeat
  shell.run(excavate, 3)
  deposit()
 until isempty()