miningnether 1.12.2 / 1.16.5

local id = 6 -- id du monitor qui recois
local cobalt = "Cobalt" --1.12.2 1.16.5
local cnb = 0
local ardite = "Ardite" -- 1.12.2
local anb = 0
local vibranium = "Vibranium" -- 1.16.5
local vnb = 0
local debris = "Debris" -- 1.16.5
local dnb = 0
-- local ressources = {
--   {nom = "Cobalt", quantite = 0},
--   {nom = "Ardite", quantite = 0},
--   {nom = "Vibranium", quantite = 0},
--   {nom = "Debris", quantite = 0}
-- }
-- local cobaltCount = ressources[1].quantite
local ligne = 0
local colonne = 0
local profondeur = 0
local premierSlot = 1
local dernierSlot = 13
local chestNetherrack = 14
local chestCharbon = 15
local charbonSlot = 16
local dir = 0
local ligneEnCour = 0
local idChannel = 8899 -- n'est pas utiliser
local esquive = 0
local EnvoieRednet = {}
local Etat = "En cours"
local Mob = "Pas de Mob"
local z = 0 -- 0
local y = 0 -- 0
local tourne = ""
local descend = ""
local MAX_ITEMS_TO_SUCK = 30
local MIN_ITEMS_TO_KEEP = 5

local version = "1.12.2"
local modem = peripheral.find("modem") -- Remplacez "modem" par le nom de votre modem
rednet.open("left")

function printText(txt1, color1)
    local oldColor = term.getTextColor() -- sauvegarde de la couleur courante
  term.setTextColor(color1)
  print(txt1)
  term.setTextColor(oldColor) -- restauration de la couleur courante
end

function printDoubleText(txt1, color1, txt2, color2)
    local oldColor = term.getTextColor() -- sauvegarde de la couleur courante
  term.setTextColor(color1)
  term.write(txt1)
  term.setTextColor(color2)
  term.write(txt2)
  term.setTextColor(oldColor) -- restauration de la couleur courante
  print("")
end

function printCenter(txt,color)
    local w, h = term.getSize()
    paintutils.drawFilledBox(math.floor(w/2-txt:len()/2+.5-1),6,math.floor(w/2+txt:len()/2+.5),8,colors.cyan)
    term.setCursorPos(math.floor(w/2-txt:len()/2+.5),h/2+1)
    local oldColorTxt = term.getTextColor() -- sauvegarde de la couleur courante
    --local oldColorBackground = term.getBackgroundColor() -- sauvegarde de la couleur courante
    term.setTextColor(color)
    print(txt)
    sleep(2)
    term.setBackgroundColor(colors.gray)
    term.setTextColor(oldColorTxt) -- restauration de la couleur courante
end
-- initialiser le tableau des blocs minés
local blocks = {}

local printerPageSize = 21 -- nombre maximum de lignes que peut afficher une page sur l'imprimante

-- fonction pour imprimer les pages
local function printPages(blockList)
  local printer = peripheral.find("printer")
  if printer then
    local pageCount = math.ceil(#blockList/printerPageSize) -- nombre de pages nécessaires
    -- vérifier que l'utilisateur veut vraiment imprimer autant de pages
    local confirm = false
    while not confirm do
      term.clear()
      term.setCursorPos(1,1)
      print("Number of pages: " .. pageCount)
      print("Ink required: " .. pageCount*5 .. " units")
      print("Paper required: " .. pageCount .. " sheets")
      write("Print? (y/n): ")
      local answer = read()
      if answer == "y" then
        if not printer.newPage() then
            --printText("need ink and paper",colors.red)
            printCenter("Need ink and paper",colors.red)
            sleep(2)
            return
        else
            confirm = true
            --printText("success",colors.green)
            printCenter("Success",colors.green)
            sleep(2)
        end
      elseif answer == "n" then
        answer = ""
        return
      end
    end
    -- imprimer chaque page
    local page = 1
    while page <= pageCount do
      printer.newPage()
      printer.setCursorPos(1,1)
      printer.write("Blocks Mined (Page " .. page .. "/" .. pageCount .. "):")
      for i = (page-1)*printerPageSize+1,math.min(page*printerPageSize,#blockList) do
        printer.setCursorPos(1,i%printerPageSize+1)
        printer.write("- " .. blockList[i])
      end
      printer.endPage()
      page = page + 1
      -- demander si l'utilisateur veut imprimer la page suivante
      if page <= pageCount then
        local confirm = false
        while not confirm do
          term.clear()
          term.setCursorPos(1,1)
          write("Print page " .. page .. "? (y/n): ")
          local answer = read()
          if answer == "y" then
            if not printer.newPage() then
                    --printText("need ink and paper",colors.red)
                    printCenter("Need ink and paper",colors.red)
                    sleep(2)
                    return
                else
                    confirm = true
                    --printText("success",colors.green)
                    printCenter("Success",colors.green)
                    sleep(2)
                end
          elseif answer == "n" then
            return
          end
        end
      end
    end
  else
    --print("No printer found.")
    --printText("No printer found",colors.red)
    printCenter("No printer found!",colors.red)
    sleep(2)
  end
end
-------------------------------------
--fonction pour afficher les blocs et leur quantité avec pagination
local function displayBlocks(blocks)
  local page = 1
  local pageSize = 8
  local blockList = {}
  for block, data in pairs(blocks) do
  print(block)
  local colonIndex = string.find(block, ":", 1, true)
  print(colonIndex)
  local name = string.sub(block, 1, colonIndex - 1)
  print(name)
  local metadata = string.sub(block, colonIndex + 1)
  print(metadata)
  local count = data.count
  print(count)
  -- local metadata = getBlockMetadata(block)
  -- print(metadata)
  -- if block.name == "tconstruct:ore" then --1.12.2
  --   if block.metadata == 0 then
  --     name = "Cobalt"
  --   elseif block.metadata == 1 then
  --     name = "Ardite"
  --   end
  -- end

  -- return name
  --table.insert(blockList, name .. " (Type: " .. metadata .. ") x" .. count)
  table.insert(blockList, metadata .. " x" .. count)
  end
  sleep(2)
  while true do
    --afficher la page courante
    term.clear()
    term.setCursorPos(1,1)
    --print(blockList)
    local totalPages = math.ceil(#blockList / pageSize)
    print("Blocks Mined (Page " .. page .. " of " .. totalPages .. "):")
    for i = (page-1)*pageSize+1,page*pageSize do
      if blockList[i] then
        print("- " .. blockList[i])
      else
        break
      end
    end
    term.setCursorPos(1,11)
    printText("press 'enter' for print menu",colors.yellow)
    term.setCursorPos(1,12)
    printText("press 'q' for quit",colors.red)
    --attendre une entrée clavier pour passer à la page suivante ou précédente
    local event, key = os.pullEvent("key")
    if key == keys.right and #blockList > page*pageSize then
      page = page + 1
    elseif key == keys.left and page > 1 then
      page = page - 1
    elseif key == keys.enter then
    -- Appeler la fonction pour imprimer les pages
    printPages(blockList)
    --else
    elseif key == keys.q then
      printCenter("Terminer",colors.red)
      sleep(2)
      break
      --return displayMenu()
    end
  end
end

local function getBlockMetadata(block)
  if not block then
    return 0
  end
  return block.metadata or 0
end

local function displayMenu()
  term.clear()
  term.setCursorPos(1,1)
  printText("=== MENU ===",colors.yellow)
  --print("=== MENU ===")
  print("Press 1 for Blocks Mined")
  print("Press 2 for Printer")
  while true do
    local event, key = os.pullEvent("key")
    if key == keys.one then
      displayBlocks(blocks)
      break
    elseif key == keys.two then
      displayPrinterMenu() -- pas functionnel
      break
    end
  end
end

-- fonction pour afficher les blocs et leur quantité sans pagination
-- local function displayBlocks(blocks)
--   print("Blocks Mined:")
--   for block, count in pairs(blocks) do
--     local colonIndex = string.find(block, ":", 1, true)
--  local name = string.sub(block, colonIndex + 1)
--  print("-" .. name .. " x" .. count)
--   end
-- end

 -- fonction pour envoyer les données au moniteur
local function sendBlocks(blocks)
  local message = textutils.serializeJSON(blocks)
  modem.transmit(1, 1, message)
end

function envoie()
  while true do
    EnvoieRednet = {Tourne=tourne,Descend=descend,NivFuel=turtle.getFuelLevel(),Monstre=Mob,
    Cobalt=cnb,Ardite=anb,Vibranium=vnb,Debris=dnb,LigneEnCour=ligneEnCour,Colonne=z,Profondeur=y,Etat=Etat,
    ProfondeurMax=profondeur,colonneMax=colonne,ligneMax=ligne,Charbon=turtle.getItemCount(charbonSlot),slot=scantest()}

    rednet.send(id,textutils.serialise(EnvoieRednet))
    --rednet.broadcast(textutils.serialise(EnvoieRednet), channel) -- envoyer les données sur le canal personnalisé
    sleep(0.5)
  end
end

-- Table des minerais à éviter
-- local oresToAvoid = {
--   ["tconstruct:ore"] = {
--     [0] = "cobalt_ore", -- 1.12.2
--     [1] = "ardite_ore"  -- 1.12.2
--   },
--   ["minecraft:ancient_debris"] = true, -- 1.16.5
--   ["allthemodium:vibranium_ore"] = true -- 1.16.5
-- }

-- Fonction pour vérifier si un minerai doit être évité
-- function shouldAvoidOre(oreName, oreMetadata)
--   if not oresToAvoid[oreName] then
--     return false
--   end
--   if type(oresToAvoid[oreName]) == "boolean" then
--     return true
--   end
--   return oresToAvoid[oreName][oreMetadata] ~= nil
-- end

function esquive()
    turtle.turnRight()
    turtle.dig()
    turtle.forward()
    turtle.turnLeft()
    turtle.dig()
    turtle.forward()
    turtle.dig()
    turtle.forward()
    turtle.turnLeft()
    turtle.dig()
    turtle.forward()
    turtle.turnRight()
    ligneEnCour = ligneEnCour +2
end

function scantest()
local items ={}
    for i = premierSlot,dernierSlot do
local data = turtle.getItemDetail(i)
        if data then
            items[i]={name=data.name,count=data.count}
        end
    end
    return items
end

function refuel()
    if turtle.getFuelLevel() < 10 then
      turtle.select(charbonSlot)
          turtle.refuel(5)
          rechargeCharbon()
    end
    turtle.select(premierSlot)
end

function ifItemCharbonSlot() -- il faut regarder si ces autre que du charbon
    if turtle.getItemCount() >= 1 then
        local item = turtle.getItemDetail()
    if item and item.name == "minecraft:coal" then
            return true
        --elseif item.name == "thermalfoundation:material" and item.damage == 802 then --1.12.2 coal coke
    --  return true
    else
            turtle.drop()
            return false
        end
    end
end

-- Fonctions
local function checkInventory()
    if turtle.getItemCount() <= MIN_ITEMS_TO_KEEP then
        return true
    end
    return false
end

local function suckItems(direction, maxItems)
    for i = 1, maxItems do
        if not turtle.suck(direction) then
            break
        end
    end
end

function rechargeCharbon()
Etat = "rechargeCharbon"
turtle.select(charbonSlot)
    if checkInventory() then
        if not turtle.digUp() then
            turtle.digDown()
            turtle.select(chestCharbon)
            turtle.placeDown()
            turtle.select(charbonSlot)
            ifItemCharbonSlot()
            turtle.suckDown(MAX_ITEMS_TO_SUCK)
            turtle.select(chestCharbon)
            turtle.digDown()
            turtle.select(premierSlot) -- pas obliger a voir
            sleep(0.5)
        else
            turtle.select(chestCharbon)
            turtle.placeUp()
            turtle.select(charbonSlot)
            ifItemCharbonSlot()
            turtle.suckUp(MAX_ITEMS_TO_SUCK)
            turtle.select(chestCharbon)
            turtle.digUp()
            turtle.select(premierSlot) -- pas obliger a voir
            sleep(0.5)
        end
    end
    refuel() -- pas obliger a voir
  Etat = "En cours"
end

-- Chat gpt
-- function Attack()
  -- local hasAttacked = false
  -- while not hasAttacked do
    ----Move forward and attempt to attack any mobs in the way
    -- if turtle.detect() then
      -- turtle.attack()
      -- hasAttacked = true
    -- elseif not turtle.forward() then
      ----If turtle cannot move forward, stop attacking
      -- hasAttacked = true
    -- end
  -- end
  -- print(ligneEnCour)
  -- print(z)
  -- print(y)
  -- getFuelLevel()
-- end

 function Attack()
    if turtle.attack() then
        turtle.attack()
        sleep(0.5)
        turtle.attack()
        sleep(0.5)
        turtle.attack()
        sleep(0.5)
        turtle.attack()
        sleep(0.5)
        turtle.attack()
        sleep(0.5)
        turtle.attack()
        sleep(0.5)
        turtle.attack()
        sleep(0.5)
        turtle.attack()
        sleep(0.5)
        turtle.attack()
        sleep(0.5)
        turtle.attack()
        sleep(0.5)
        turtle.attack()
        sleep(0.5)
        turtle.attack()
        sleep(0.5)
    else
    print("je ne peut pas attaquer")
    sleep(1)
    end
    print("menace eliminer")
    --refuel() -- pas obliger a voir
 end


function forward()
  turtle.select(premierSlot)
  turtle.dig()
  --print("je creuse")
    if not turtle.forward() then
      Mob = "Il y a un mob"
      Attack()
      Mob = "Plus de Mob"
      --turtle.forward()
    else
        return true
    end
end

function videInventaire()
    Etat = "videInventaire"
    turtle.select(chestNetherrack)
    if not turtle.placeUp() then
        print("Je ne peux pas enlever en haut je place en bas")
        turtle.digDown()
        turtle.placeDown()
        vidageDown()
    else
        print("Je peux placer en haut")
        vidageUp()
    end
  --turtle.digDown()
  --turtle.placeDown()
  --vidageDown()
end

function vidageUp()
local slot
    for slot=premierSlot,dernierSlot do
        turtle.select(slot)
        while turtle.getItemCount(slot) > 0 do
            turtle.dropUp(turtle.getItemCount(slot))
        end
    end
    turtle.select(chestNetherrack)
    sleep(0.5)
    print("je recupere la turtle")
    turtle.digUp()
    Etat = "En cours"
end

function vidageDown()
local slot
    for slot=premierSlot,dernierSlot do
        turtle.select(slot)
        while turtle.getItemCount(slot) > 0 do
            turtle.dropDown(turtle.getItemCount(slot))
        end
    end
    turtle.select(chestNetherrack)
    sleep(0.5)
    print("je recupere la turtle")
    turtle.digDown()
    Etat = "En cours"
end

function scan()
  local success, i = turtle.inspect()
    if success then
        local block = i.name
            if i.state and i.state.type then
                block = block .. ":" .. i.state.type
            end
            if not blocks[block] then
                blocks[block] = { count = 0 }
            end
            blocks[block].count = blocks[block].count + 1
    end
    -- Code pour vérifier si un minerai doit être évité et appeler la fonction esquive() si nécessaire
    -- if shouldAvoidOre(i.name, i.metadata) then
    --  print(i.name .. " : je ne le mine pas")
    --  esquive()
    if i.name == "tconstruct:ore" and i.metadata == 0 then --1.12.2
  --if i.name == "tconstruct:cobalt_ore" then -- 1.16.5
    print(i.name,cobalt)
    print("je mine pas le cobalt")
    cnb = cnb + 1
    esquive()
  elseif i.name == "tconstruct:ore" and i.metadata == 1 then --1.12.2
    print(i.name,ardite)
    print("je mine pas l'ardite")
    anb = anb + 1
    esquive()
  elseif i.name == "minecraft:ancient_debris" then --1.16.5
    print(i.name,debris)
    print("je mine pas l'ancien debris")
    dnb = dnb + 1
    esquive()
  elseif i.name == "allthemodium:vibranium_ore" then -- 1.16.5
    print(i.name,vibranium)
    print("je mine pas le vibranium")
    vnb = vnb + 1
    esquive()
    else
    forward()
    if turtle.getItemCount(dernierSlot) >= 1 then
      print("videInventaire")
      videInventaire()
    end
    ligneEnCour = ligneEnCour +1
  end
end

function changeDir()
  if dir == 0 then
    turtle.turnRight()
    turtle.dig()
    turtle.forward()
    turtle.turnRight()
    dir = dir+1
    tourne = "je vais a droite"
    --sleep(2)
    tourne = "Je fais rien"
  elseif dir == 1 then
    turtle.turnLeft()
    turtle.dig()
    turtle.forward()
    turtle.turnLeft()
    dir = dir-1
    tourne = "je vais a gauche"
    --sleep(2)
    tourne = "Je fais rien"
  end
end

function changeDirBottom()
    turtle.turnRight()
    turtle.turnRight()
    turtle.digDown()
    turtle.down()
    descend = "je descend"
    --sleep(2)
    descend = "Je fais rien"
end

-- function videInventaire()
  -- Etat = "videInventaire"
  -- local slot
  -- turtle.select(chestNetherrack)
  -- while not turtle.placeUp() do
    -- sleep(0.1)
    -- print("je peut pas placer en haut")
    -- if not turtle.attackUp() then turtle.digUp() end
  -- end
  -- for slot=premierSlot,dernierSlot do
    -- turtle.select(slot)
    -- while turtle.getItemCount(slot) > 0 do
      -- turtle.dropUp(turtle.getItemCount(slot))
      -- if turtle.getItemCount(slot) > 0 then
        -- sleep(0.5)
      -- end
    -- end
  -- end
  -- turtle.select(chestNetherrack)
  -- turtle.digUp()
  -- Etat = "En cours"
-- end

function deplacement()
if turtle.getFuelLevel() == 0 then -- check if we ran out of fuel
    rechargeCharbon()
end
turtle.inspect()
turtle.dig()
turtle.forward()
  for i=1, profondeur do
    --print("debut while profondeur")
    for j=1, colonne do
    z = j
      --print("debut while colonne")
      ligneEnCour = 1
      while ligneEnCour <= ligne-1 do
        --print('debut while ligne')
        refuel()
        --print("Fuel: " ..turtle.getFuelLevel())
        scan()
        --print('fin du scan')
      end
     -- print('fin while ligne')
      if j ~= colonne then
        changeDir()
        --print("Colonne: " ..j)
        --print('fin while colonne')
      end
      --print('je tourne')
    end
    rechargeCharbon()
    y = i
    changeDirBottom()
    --print("Profondeur: " ..i)
    --print("je dessens")
  end
    --print("debut while profondeur")
    for j=1, colonne do
    z = j
      --print("debut while colonne")
      ligneEnCour = 1
      while ligneEnCour <= ligne-1 do
        --print('debut while ligne')
        refuel()
        --print("Fuel: " ..turtle.getFuelLevel())
        scan()
        --print('fin du scan')
      end
      --print('fin while ligne')
      if j ~= colonne then
        changeDir()
        --print("Colonne :" ..j)
        --print('fin while colonne')
      end
      --print('je tourne')
    end
    rechargeCharbon()
end

--------------------------------------------
--------------- Programme ------------------
--------------------------------------------
function prog()
term.setBackgroundColor(colors.gray)
term.clear()
term.setCursorPos(1,1)

printDoubleText("La version est : ", colors.yellow, version, colors.green)

paintutils.drawFilledBox(2,2,2,2,colors.white)
paintutils.drawFilledBox(3,2,3,2,colors.white)
paintutils.drawFilledBox(4,2,4,2,colors.white)
paintutils.drawFilledBox(5,2,5,2,colors.white)

paintutils.drawFilledBox(2,3,2,3,colors.white)
paintutils.drawFilledBox(3,3,3,3,colors.white)
paintutils.drawFilledBox(4,3,4,3,colors.white)
paintutils.drawFilledBox(5,3,5,3,colors.white)

paintutils.drawFilledBox(2,4,2,4,colors.white)
paintutils.drawFilledBox(3,4,3,4,colors.white)
paintutils.drawFilledBox(4,4,4,4,colors.white)
paintutils.drawFilledBox(5,4,5,4,colors.white)

paintutils.drawFilledBox(2,5,2,5,colors.white)
paintutils.drawFilledBox(3,5,3,5,colors.white)
paintutils.drawFilledBox(4,5,4,5,colors.white)
paintutils.drawFilledBox(5,5,5,5,colors.white)
term.setBackgroundColor(colors.gray)

local items ={}
    for i = 14,16 do
local data = turtle.getItemDetail(i)
    if data then
        if turtle.getItemCount(14) >= 1 then
            items[i]={name=data.name,count=data.count}
            if data.name == "minecraft:coal" then -- test
                paintutils.drawFilledBox(5,5,5,5,colors.black)
                term.setBackgroundColor(colors.gray)
                --term.setCursorPos(1,6)
                --name = "coal x" .. data.count -- test
                --print(name)
            elseif data.name == "enderstorage:ender_storage" then -- test
                paintutils.drawFilledBox(3,5,3,5,colors.yellow)
                paintutils.drawFilledBox(4,5,4,5,colors.brown)
                term.setBackgroundColor(colors.gray)
                --term.setCursorPos(1,7)
                --name = "ender chest x" .. data.count -- test
                --print(name)

            else
                term.setCursorPos(2,6)
                print(data.name .. " x" .. data.count)
                paintutils.drawFilledBox(5,5,5,5,colors.red)
            end
        end
    else
    paintutils.drawFilledBox(5,5,5,5,colors.white)
    term.setBackgroundColor(colors.gray)
    term.setCursorPos(1,7)
    printText("mettre les items:", colors.red)
    printText("enderchest dans slot 14", colors.red)
    printText("enderChestCharbon dans slot 15", colors.red)
    printText("coal dans slot 16", colors.red)
    sleep(10)
    os.reboot()
    end
end


term.setBackgroundColor(colors.gray)
term.setCursorPos(1,8)
printText("Entrez les dimensions de la zone a miner:", colors.yellow)
print("")
printText("ligne (en face): ", colors.yellow)
ligne = tonumber(read())
printText("colonne (vers la droite): ", colors.yellow)
colonne = tonumber(read())
printText("profondeur (en dessous): ", colors.yellow)
profondeur = tonumber(read())

printText("lignes: "..ligne.."  colonne: "..colonne.."  profondeur: "..profondeur, colors.yellow)
local sum2 = (ligne * colonne)
local sum3 = (ligne * colonne * profondeur)
printDoubleText("carré de ", colors.green, sum2.. " m2", colors.yellow)
printDoubleText("cube de ", colors.green, sum3.. " m3", colors.yellow)
printText("Valider les données? (oui/non) : ", colors.yellow)

while not confirm2 do
local valider = read()
    if valider == "oui" or valider == "Oui" then
        term.clear()
        confirm2 = true
    elseif valider == "non" then
        --valider = ""
        --return
        os.reboot()
    end
end

rechargeCharbon()

if turtle.getFuelLevel() >= 64 then -- (profondeur*ligne*colonne)
    deplacement()
else
    print("je reprend du charbon")
    rechargeCharbon()
    print("Fuel: " ..turtle.getFuelLevel())
    deplacement()
    if turtle.getItemCount(dernierSlot) >= 1 then
        videInventaire()
    end
end
    print("fin while profondeur")
    videInventaire()
    Etat = "Terminer"
    turtle.select(premierSlot)
    sleep(1)
end
parallel.waitForAny(prog,envoie)

-- envoyer les données au moniteur
sendBlocks(blocks)
-- afficher le Menu
displayMenu()
-- afficher les blocs et leur quantité
--displayBlocks(blocks)