lua turtle make1treeSpot

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

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
    whaitDown()
    whaitDown()
    whaitGo()
    whaitGo()
    place()
    left()
    whaitGo()
    placeRight()
    whaitGo()
    placeRight()
    place()
    left()
    enderspot()

    whaitGo()
    placeRight()
    whaitGo()
    placeRight()
    whaitDown()
    placeRight()

    whaitGo()
    placeRight()
    whaitGo()
    placeRight()
    place()
    left()
    enderspot()

    whaitGo()
    placeRight()
    whaitGo()
    placeRight()
    whaitDown()
    placeRight()
    placeDown()



    whaitGo()
    placeRight()
    placeDown()
    whaitGo()
    placeRight()
    placeDown()
    place()
    left()
    enderspot2()


    whaitGo()
    placeRight()
    placeDown()
    left()
    whaitGo()
    placeDown()
    right()

    for tyty = 0,2 do
        for tttt = 0, 3 do
            whaitGo()
            if(tyty == 0)then
                placeDown()
            end
            whaitGo()
            if(tyty == 0)then
                placeDown()
            end
            left()
        end
        if( tyty < 2 )then
            whaitUp()
        end
    end
    whaitGo()
    left()
    whaitGo()
    whaitDown()
    whaitDown()
    placeDown()
    for y=0,5 do
        whaitUp()
    end
    whaitGo()
    left()
    left()
end

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