var = tableau[i][j]
puissance = 0


#################################
######### DIAGONALE 2 ###########
#################################


#Diagonale haut droite
while [ i > 1 AND j < 7 ] OR [puissance != "rien"]
do
	i--
	j++
	if [ $tableau[i][j] = "var" ]
	then
		puissance++
	else
		puissance = "rien"
	fi
done
#Diagonale basse gauche
while [ i < 6 AND j > 1 ] OR [puissance != "rien"]
do
	i++
	j--
	if [ $tableau[i][j] = "var" ]
	then
		puissance++
	else
		puissance = "rien"
	fi
done
if [ puissance >= 3]
then
	#La partie est gagnée
else
	puissance = 0
fi


#################################
######### DIAGONALE 2 ###########
#################################


#Diagonale haut gauche
while [ i > 1 AND j > 1 ] OR [puissance != "rien"]
do
	i--
	j--
	if [ $tableau[i][j] = "var" ]
	then
		puissance++
	else
		puissance = "rien"
	fi
done

#Diagonale basse droite
while [ i < 6 AND j < 7 ] OR [puissance != "rien"]
do
	i++
	j++
	if [ $tableau[i][j] = "var" ]
	then
		puissance++
	else
		puissance = "rien"
	fi
done
if [ puissance >= 3]
then
	#La partie est gagnée
else
	puissance = 0
fi


#################################
######### LIGNE #################
#################################

#Ligne gauche
while [ j > 1 ] OR [ puissance != "rien"]
do
	j--
	if [ $tableau[i][j] = "var"]
	then
		puissance ++
	else
		puissance = "rien"
	fi
done
#Ligne droite
while [ j < 7 ] OR [ puissance != "rien"]
do
	j++
	if [ $tableau[i][j] = "var"]
	then
		puissance ++
	else
		puissance = "rien"
	fi
done
if [ puissance >= 3]
then
	#La partie est gagnée
else
	puissance = 0
fi

#################################
######### COLONNE ###############
#################################

#Colonne gauche
while [ i > 1 ] OR [ puissance != "rien"]
do
	i--
	if [ $tableau[i][j] = "var"]
	then
		puissance ++
	else
		puissance = "rien"
	fi
done

#Colonne bas
while [ i < 7 ] OR [ puissance != "rien"]
do
	i++
	if [ $tableau[i][j] = "var"]
	then
		puissance ++
	else
		puissance = "rien"
	fi
done
if [ puissance >= 3]
then
	#La partie est gagnée
else
	puissance = 0
fi