lua turtle 1tree

--   _____
--  |  ___|   _ _ __   ___
--  | |_ | | | | '_ \ / __|
--  |  _|| |_| | | | | (__
--  |_|   \__,_|_| |_|\___|
--

left = function()
    return turtle.turnLeft()
end

right = function()
    return turtle.turnRight()
end

up = function()
    return turtle.up()
end

down = function()
    return turtle.down()
end

back = function()
    return turtle.back()
end

go = function()
    return turtle.forward()
end

fuel = function()
    return turtle.getFuelLevel()
end

select = function(id)
    return turtle.select(id)
end

count = function(id)
    return turtle.getItemCount(id)
end

move = function(id, nb)
    return turtle.transferTo(id, nb)
end

function testFuel()
    if(fuel() < 16)then
        print('Plus de coco, test de refuel')
        select(1)
        turtle.refuel(1)
    end
    if(count(1) == 0)then
        return false
    end
    return true
end


function videInv()
    left()
    for i = 2,15 do
        if(i ~= 5 and count(i)>0)then
            turtle.select(i)
            checkSapling()
            turtle.drop()
        end
    end
    select(1)
    right()
    return true
end

function checkSapling()
    if(turtle.compareTo(16) == true)then
        if(count(16) < 64) then
            turtle.transferTo(16, turtle.getItemSpace(16))
        end
    end
end

function checkInv()
    for i = 2,15 do
        if(i ~= 5 and count(i)>0)then
            videInv()
            return true
        end
    end
    return false
end



function init()
    if(count(1) == 0)then
        print("Besoin du bois a comparer en slot 1, exit")
        return false
    end
    if(count(16) == 0)then
        print("Besoin de sapling en slot 16...")
    end
    select(1)
    return true
end



function whaitGo(i)
    if(i> 60)then
        return false
    end
    if(i> 10)then
        turtle.attack()
    end
    if(go()==false)then
        sleep(2)
        return whaitGo(i+1)
    end
    testFuel()
    return true
end

function whaitUp(i)
    if(i> 60)then
        return false
    end
    if(up()==false)then
        sleep(2)
        return whaitUp(i+1)
    end
    testFuel()
    return true
end

function whaitDown(i)
    if(i> 60)then
        return false
    end
    if(down()==false)then
        sleep(2)
        return whaitDown(i+1)
    end
    testFuel()
    return true
end


function whaitBack(i)
    if(i> 60)then
        return false
    end
    if(i> 10)then
        turtle.attack()
    end
    if(back()==false)then
        sleep(2)
        return whaitBack(i+1)
    end
    testFuel()
    return true
end

function coupe()
    turtle.dig()
    if(whaitGo(0)==false)then
        return false
    end
    while (turtle.compareUp()==true) do
        turtle.digUp()
        if(whaitUp(0)==false)then
            return false
        end
    end
    while (turtle.detectDown()==false) do
        if(whaitDown(55)==false)then
            return false
        end
    end

    if(whaitBack(0)==false)then
        return false
    end
    return true
end

--  __  __       _        ____
-- |  \/  | __ _(_)_ __  / /\ \
-- | |\/| |/ _` | | '_ \| |  | |
-- | |  | | (_| | | | | | |  | |
-- |_|  |_|\__,_|_|_| |_| |  | |
--                       \_\/_/


args = { ... }
if( args[1]==null)then
    args[1] = 16
    --print("Début de 'tree', par defaut, "..args[1].." blocks")
else
    --print("Début de 'tree', "..args[1].." blocks")
end

stop=false
if(init()==false) then
    stop=true
end

tourne = "droite"
while(stop==false)do
    turtle.suck()
    turtle.suckUp()
    select(1)
    if(turtle.detect()==false)then
        if(count(16)==0)then
            print("plus sapling. sleep(180)")
            sleep(180)
            if(count(16)==0)then
                stop = true
            else
                select(16)
                turtle.suck()
                turtle.suckUp()
                sleep(30)
                turtle.suck()
                turtle.suckUp()
                sleep(30)
                turtle.suck()
                turtle.suckUp()
                sleep(30)
                turtle.suck()
                turtle.suckUp()
                sleep(30)
                turtle.suck()
                turtle.suckUp()
                sleep(30)
                turtle.suck()
                turtle.suckUp()
                sleep(30)
                turtle.suck()
                turtle.suckUp()
                sleep(30)


                turtle.place()
                select(1)
            end
        else
            select(16)
            turtle.suck()
            turtle.suckUp()
            sleep(30)

            turtle.suck()
            turtle.suckUp()
            sleep(30)

            turtle.suck()
            turtle.suckUp()
            sleep(30)

            turtle.suck()
            turtle.suckUp()
            sleep(30)

            turtle.suck()
            turtle.suckUp()
            sleep(30)

            turtle.suck()
            turtle.suckUp()
            sleep(30)

            turtle.suck()
            turtle.suckUp()
            sleep(30)


            turtle.place()
            select(1)
        end
    end
    if(turtle.compare()==true)then
        if(coupe()==false)then
            print("coupe() == false")
            stop = true
        end
    elseif(count(5)>0)then
        select(5)
        if(turtle.compare()==true)then
            if(coupe()==false)then
                print("coupe() == false")
                stop = true
            end
        end
        select(1)
    end


    checkInv()
    sleep(10)
end


print('End')
if(fuel() == 0) then
  print('Ya plus de coco mon coco !')
end