%Ce programme permet de detecter la victoire en detectant une diagonale de 4
%fiches de la même entité

function var = detection_diag(L)
    var = "r";
    for l = 1:3
        for c = 1:4
            if (L(l,c)== "o" && L(l+1,c+1)== "o" && L(l+2,c+2)== "o" && L(l+3,c+3)== "o")
                var = "o";
            end
            if (L(l,c)== "j" && L(l+1,c+1)== "j" && L(l+2,c+2)== "j" && L(l+3,c+3)== "j")
                var = "j";
            end
        end
    end
    for l = 1:3
        for c = 4:7
            if (L(l,c)== "o" && L(l+1,c-1)== "o" && L(l+2,c-2)== "o" && L(l+3,c-3)== "o")
                var = "o";
            end
            if (L(l,c)== "j" && L(l+1,c-1)== "j" && L(l+2,c-2)== "j" && L(l+3,c-3)== "j")
                var = "j";
            end
        end
    end
end