Tunel

local direction = 0                                     -- direction
local drapeauBedrock = false                            -- indicateur pour savoir si on est arrivé à la bedrock
local profondeur = 0                                    -- indique de combien on a creusé
local niveauFuelMini = 15                               -- niveau de déplacements auquel on doit refaire le plein de fuel
local niveauCharbonMini = 5                             -- quantité de charbons restants à laquelle on doit refaire le plein de charbon

local premierSlot = 4                                   -- premier slot où se trouve le minerai ramassé
local dernierSlot = 13                                  -- dernier slot à surveiller pour enclencher le vidage de l'inventaire
local enderchestSlot = 14                               -- slot où se trouve l'enderchest pour les minerais
local enderchestCharbonSlot = 15                        -- slot où se trouve l'enderchest pour le charbon
local charbonSlot = 16                                  -- slot ou est stocké le charbon


function compare_mine()                                 -- fonction qui compare et mine, tourne à droite et direction++

    local slot = 0
    for slot=1,3 do
            turtle.select(slot)
            if turtle.compare() then
                return false
            end
    end
    return true
end


function verifFuel()                                    -- vérifie si on a assez de fuel (déplacements) en réserve.
  -- 1 charbon = 80 deplacements; on vérifie le niveau de fuel

            if (turtle.getFuelLevel() < niveauFuelMini) then -- On a besoin de faire le plein
                    if (turtle.getItemCount(charbonSlot) < niveauCharbonMini) then
                        if turtle.dig() == false then -- si on n'arrive pas à creuser, alors c'est la bedrock
                             print("bedrock !")
                        end
                        videInventaire()
                        turtle.select(enderchestCharbonSlot)
                        turtle.place()
                        turtle.select(charbonSlot)
                        turtle.suck()
                        turtle.select(enderchestCharbonSlot)
                        turtle.dig()
                    end
                    turtle.select(charbonSlot)
                    turtle.refuel(1) -- on recharge pour 96 deplacements
            end

end

function videInventaire()                               -- vide l'inventaire de la tortue dans l'enderchest dédié à ça


    if (turtle.getItemCount(dernierSlot-1) > 0) then  -- on vérifie si on doit vider l'inventaire de la tortue
        print("vidage inventaire rech_charbon1; prof "..profondeur.." ; nbitem ds slot "..dernierSlot.." : "..turtle.getItemCount(dernierSlot).." ; ")
        if turtle.dig() == false then -- si on n'arrive pas à creuser, alors c'est la bedrock
            print("bedrock !")
        end
        local slot
        turtle.select(enderchestSlot)
        turtle.place()
        for slot=premierSlot,dernierSlot do
                turtle.select(slot)
                while turtle.getItemCount(slot) > 0 do
                        turtle.drop(turtle.getItemCount(slot))
                        if turtle.getItemCount(slot) > 0 then
                                sleep(0.5)
                        end
                end
        end
        turtle.select(enderchestSlot)
        turtle.dig()
    end

end

--********************************************--
--********** Programme principal *************--
--********************************************--

local nbtrou = 1

while nbtrou~=0  do

    drapeauBedrock = false --avant tout, on reset ce flag
    profondeur = 0

    while drapeauBedrock == false do
		print("profondeur :"..profondeur)

        if turtle.detectDown() == true then     -- on vérifie si il y a un bloc en dessous
            if turtle.digDown() == false then   -- si on n'arrive pas à creuser en dessous, alors c'est la bedrock
                drapeauBedrock = true
            else
                sleep(0.1)
                turtle.down()                   --descend d'un cran
                profondeur = profondeur+1
                verifFuel()

                direction=0
                while direction~=4 do
                    if compare_mine() then
                        turtle.dig()
                        videInventaire()
                    end
                    turtle.turnRight()
                    direction = direction +1
                end
            end
        else
            turtle.down()                       --sinon on descend simplement
            profondeur = profondeur+1
        end
    end

    print("fin de la boucle "..profondeur)
        -- ici je remonte à la surface
        while profondeur ~= 0 do
				turtle.digUp()
                turtle.up()
                profondeur = profondeur-1
                verifFuel()
        end

        turtle.turnRight()
        turtle.dig()
        turtle.forward()
        turtle.dig()
        turtle.forward()
        turtle.dig()
        turtle.forward()
        turtle.turnLeft()
        nbtrou = nbtrou-1
end