lua turtle makeOneTreeSpot 2

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

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(16)
        turtle.refuel(1)
    end
    if(count(16) == 0)then
        return false
    end
    return true
end




function init()
    if(count(16) == 0)then
        print("Besoin de fuel en slot 16, exit")
        return false
    end
    if(count(15) == 0)then
        print("Besoin du bois a placer en slot 15...")
        return false
    end
    if(testFuel()==false)then
        return false
    end
    return true
end



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

function whaitUp(i)
    if(i == null)then
        i=1
    end
    if(i> 60)then
        return false
    end
    if(up()==false)then
        turtle.digUp()
        sleep(1)
        return whaitUp(i+1)
    end
    testFuel()
    return true
end

function whaitDown(i)
    if(i == null)then
        i=1
    end
    if(i> 60)then
        return false
    end
    if(down()==false)then
        turtle.digDown()
        sleep(1)
        return whaitDown(i+1)
    end
    testFuel()
    return true
end


function whaitBack(i)
    if(i == null)then
        i=1
    end
    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 placeDown()
    local ifor = 1
    select(15)
    if(turtle.compareDown()==false)then
        if(turtle.detectDown()==true)then
            turtle.digDown()
        end
        for ifor = 1, 15 do
            if(count(ifor)>0)then
                select(ifor)
                if(turtle.compareTo(15)==true)then
                    if(turtle.placeDown()==false)then
                        print("placeDown == false")
                        return placeDown()
                    else
                        whaitBlock()
                        return true
                    end
                end
            end
        end
    end
end
function place()
    local ifor = 1
    select(15)

    if(turtle.compare()==false)then
        if(turtle.detect()==true)then
            turtle.dig()
        end
        for ifor = 1, 15 do
            if(count(ifor)>0)then
                select(ifor)
                if(turtle.compareTo(15)==true)then
                    if(turtle.place()==false)then
                        print("place == false")
                        return place()
                    else
                        whaitBlock()
                        return true
                    end
                end
            end
        end
    end
end

function whaitBlock()
    if(count(15)==0)then
        sleep(5)
        print("j'attend des block <3")
        return whaitBlock()
    end
end

function enderspot()
    for toto=0,2 do
        for titi=0,3 do
            whaitGo()
            placeRight()
        end
        place()
        left()
    end
end
function enderspot2()
    for toto=0,2 do
        for titi=0,3 do
            whaitGo()
            placeRight()
            placeDown()
        end
        place()
        left()
    end
end



function placeRight()
    right()
    place()
    left()
end


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


args = { ... }
if( args[1]==null)then
    args[1] = "r"
    --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
if (stop==false) then
    thei = 0
    thei2 = 0
    len = 9

    for thei2 = 0,3 do
        for thei=0,len do
            placeDown()
            whaitGo()
            if(turtle.detectUp()==true)then
                turtle.digUp()
            end
        end
        if(args[1] == "r")then
            right()
        else
            left()
        end
    end
    whaitGo()
    if(args[1] == "r")then
        right()
    else
        left()
    end
    whaitGo()
    whaitDown()
    if(args[1] == "r")then
        left()
    else
        right()
    end
    len = len -2
    while len > 0 do
        for thei2 = 0,3 do
            for thei=0,len do
                placeDown()
                whaitGo()
                if(turtle.detectUp()==true)then
                    turtle.digUp()
                end
            end
            if(args[1] == "r")then
                right()
            else
                left()
            end
        end
        whaitGo()
        if(args[1] == "r")then
            right()
        else
            left()
        end
        whaitGo()
        if(turtle.detectUp()==true)then
            select(15)
            if(turtle.compareDown()==false)then
                select(1)
                turtle.digUp()
            end
            select(1)
        end
        if(args[1] == "r")then
            left()
        else
            right()
        end
        len = len -2
    end

    placeDown()


    for y=0,2 do
        whaitUp()
    end
    whaitGo()
    left()
    left()
end

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