SUDOKU NIVEAU FACIL, MOYEN DIFFICILE (GOOGLE) PAS AU PLUS

#include "appli.h"

main()
{ 
	FILE *fp;
	coord point;
	coord temp[100];
	int tab[9][9][10][2];
	int i,j,k,l;
	int ii,jj,ll,kk;
	int count=0;
	int compteur;
	char rep;
	int choix;
	char nom[20];
	int bloquer=0, bl, retry=0, tempo;

	printf("\nOuvrir un sudoku existant ? taper 1. ");
	printf("\nEntrer manuellement un nouveau Sudoku ? taper 2. ");
	scanf("%d",&choix);
	
	if(choix==1)
	{
		printf("\n Entrer nom du Sudoku :");
		scanf("%s",&nom);
debut:
		fp=fopen(nom,"r");
		if(fp==NULL) exit(0);
		
		for(i=0; i<9; i++)
		{
			for(j=0; j<9; j++)
			{
				fscanf(fp,"%d",&tab[i][j][9][0]);
				for(k=0; k<9; k++)
				{
					tab[i][j][k][0]=k+1;
				}
			}
		}
		fclose(fp);
	}

	if(choix==2)
	{
		choix=1;
		printf("\nEntrer un nom: ");
		scanf("%s",&nom);
		l=11;
		for(i=0;i<9;i++)
		{	for(j=0;j<9;j++)
			{	tab[i][j][9][0]=l;
				for(k=0; k<9; k++)
				{
					tab[i][j][k][0]=k+1;
				}
				l++;
			}
		}
	}
/////////////
	//printf("bloquer = %d\n",bloquer);
	//system("pause");
	if(bloquer >= 1)
	{	for(bl=0; bl<retry;bl++)
		{
			i=temp[bl].x;
			j=temp[bl].y;
			kk= temp[bl].k;
			tab[i][j][kk][0] = 10;
			for(kk=0; kk<9; kk++)
			{
				//printf("tab[%d][%d][%d][%d] = %d\n",i,j,kk,0, tab[i][j][kk][0]);
				//system("pause");
			}
		}
	}

/////////////

		i=0; j=0;
		while(point.test != 1)
		{
			point=bouger(tab, i,j);
			if(point.test==0)
			{
				tab[point.x][point.y][9][0] = point.val;
				i=point.x; j=point.y;
			}
		}
		
		fp=fopen(nom,"w+");
		for(i=0; i<9; i++)
		{
			for(j=0; j<9; j++)
			{
				fprintf(fp,"%d ",tab[i][j][9][0]);
			}
		}
		fclose(fp);
	
		
	while(1)//coord point;   tab[][][9] contient la valeur unique de la case tab[][]
	{
		for(i=0; i<9; i++)
		{	for(j=0; j<9; j++)
			{	if(tab[i][j][9][0]<=9)
				{	for(kk=0;kk<9;kk++)
					{
						tab[i][j][kk][0]=10;
		}	}	}	}

		k=0;
		for(i=0; i<9; i++) // Initialise les compteurs ...
		{	for(j=0; j<9; j++)
			{	for(kk=0; kk<10; kk++)
				{	tab[i][j][kk][1]=0; // ...à zero
		}	}	}

		//lignes
		for(i=0; i<9; i++)// scanne les lignes pour enlever des possibilités les chiffres rencontrés.
		{	for(j=0; j<9; j++)
			{	for(kk=0; kk<9; kk++)
				{	for(ii=0; ii<9; ii++)
					{	if( tab[i][j][kk][0] == tab[ii][j][9][0] )
						{	tab[i][j][kk][0] = 10;
		}	}	}	}	}

		//colonnes
		for(i=0; i<9; i++)// scanne les colonnes pour faire de meme.
		{	for(j=0; j<9; j++)
			{	for(kk=0; kk<9; kk++)
				{	for(jj=0; jj<9; jj++)
					{	if( tab[i][j][kk][0] == tab[i][jj][9][0] )
						{	tab[i][j][kk][0] = 10;
		}	}	}	}	}

		for(i=0;i<9;i++) // Plus complexe: scanne les blocs un par un. Ecarte les possibilités égalements.
		{	for(j=0;j<9;j++)
			{	if(tab[i][j][9][0]<10) // si valeur de la case est comprise entre 1 et 9
				{	if(i<3)
					{	if(j<3)
						{	for(ii=0; ii<3; ii++)
							{	for(jj=0;jj<3;jj++)
								{	if(i==ii && j==jj) kk=0;
									else
									{	for(ll=0; ll<9; ll++)
										{	if(tab[ii][jj][ll][0]==tab[i][j][9][0])
											{	tab[ii][jj][ll][0]=10;
						}	}	}	}	}	}
						if(j>=3 && j<6)
						{	for(ii=0; ii<3; ii++)
							{	for(jj=3;jj<6;jj++)
								{	if(i==ii && j==jj) kk=0;
									else
									{	for(ll=0; ll<9; ll++)
										{	if(tab[ii][jj][ll][0]==tab[i][j][9][0])
											{	tab[ii][jj][ll][0]=10;
						}	}	}	}	}	}
						if(j>=6)
						{	for(ii=0; ii<3; ii++)
							{	for(jj=6;jj<9;jj++)
								{	if(i==ii && j==jj) kk=0;
									else
									{	for(ll=0; ll<9; ll++)
										{	if(tab[ii][jj][ll][0]==tab[i][j][9][0])
											{	tab[ii][jj][ll][0]=10;
					}	}	}	}	}	}	}
					if(i>=3 && i<6)
					{
						if(j<3)
						{	for(ii=3; ii<6; ii++)
							{	for(jj=0;jj<3;jj++)
								{	if(i==ii && j==jj) kk=0;
									else
									{	for(ll=0; ll<9; ll++)
										{	if(tab[ii][jj][ll][0]==tab[i][j][9][0])
											{	tab[ii][jj][ll][0]=10;
						}	}	}	}	}	}
						if(j>=3 && j<6)
						{	for(ii=3; ii<6; ii++)
							{	for(jj=3;jj<6;jj++)
								{	if(i==ii && j==jj) kk=0;
									else
									{	for(ll=0; ll<9; ll++)
										{	if(tab[ii][jj][ll][0]==tab[i][j][9][0])
											{	tab[ii][jj][ll][0]=10;
						}	}	}	}	}	}
						if(j>=6)
						{	for(ii=3; ii<6; ii++)
							{	for(jj=6;jj<9;jj++)
								{	if(i==ii && j==jj) kk=0;
									else
									{	for(ll=0; ll<9; ll++)
										{	if(tab[ii][jj][ll][0]==tab[i][j][9][0])
											{	tab[ii][jj][ll][0]=10;
					}	}	}	}	}	}	}
					if(i>=6)
					{	if(j<3)
						{	for(ii=6; ii<9; ii++)
							{	for(jj=0;jj<3;jj++)
								{	if(i==ii && j==jj) kk=0;
									else
									{	for(ll=0; ll<9; ll++)
										{	if(tab[ii][jj][ll][0]==tab[i][j][9][0])
											{	tab[ii][jj][ll][0]=10;
						}	}	}	}	}	}
						if(j>=3 && j<6)
						{	for(ii=6; ii<9; ii++)
							{	for(jj=3;jj<6;jj++)
								{	if(i==ii && j==jj) kk=0;
									else
									{	for(ll=0; ll<9; ll++)
										{	if(tab[ii][jj][ll][0]==tab[i][j][9][0])
											{
												tab[ii][jj][ll][0]=10;
						}	}	}	}	}	}
						if(j>=6)
						{	for(ii=6; ii<9; ii++)
							{	for(jj=6;jj<9;jj++)
								{	if(i==ii && j==jj) kk=0;
									else
									{	for(ll=0; ll<9; ll++)
										{	if(tab[ii][jj][ll][0]==tab[i][j][9][0])
											{	tab[ii][jj][ll][0]=10;
				}	}	}	}	}	}	}	}

			
				if(tab[i][j][9][0]>9)//  Compte dans les blocs les nombres de fois que l'on rencontre une possibilité.
				{
					k=0;
					if(i<3)
					{	if(j<3)
						{	for(kk=0; kk<9; kk++)
							{	if( tab[i][j][kk][0] != 10 )
								{	for(ii=0; ii<3; ii++)
									{	for(jj=0;jj<3;jj++)
										{	if( (tab[ii][jj][9][0]>10) )
											{	if(tab[i][j][kk][0] == tab[ii][jj][kk][0])
												{
													tab[i][j][kk][1]++;
						}	}	}	}	}	}	}

						if(j>=3 && j<6)
						{	for(kk=0; kk<9; kk++)
							{	if( tab[i][j][kk][0] != 10 )
								{	for(ii=0; ii<3; ii++)
									{	for(jj=3;jj<6;jj++)
										{	if( (tab[ii][jj][9][0]>10) )
											{	if(tab[i][j][kk][0] == tab[ii][jj][kk][0])
												{
													tab[i][j][kk][1]++;
						}	}	}	}	}	}	}

						if(j>=6)
						{	for(kk=0; kk<9; kk++)
							{	if( tab[i][j][kk][0] != 10 )
								{	for(ii=0; ii<3; ii++)
									{	for(jj=6;jj<9;jj++)
										{	if( (tab[ii][jj][9][0]>10) )
											{	if(tab[i][j][kk][0] == tab[ii][jj][kk][0])
												{
													tab[i][j][kk][1]++;
						}	}	}	}	}	}	}
					}
					if(i>=3 && i<6)
					{	if(j<3)
						{	for(kk=0; kk<9; kk++)
							{	if( tab[i][j][kk][0] != 10 )
								{	for(ii=3; ii<6; ii++)
									{	for(jj=0;jj<3;jj++)
										{	if( (tab[ii][jj][9][0]>10) )
											{	if(tab[i][j][kk][0] == tab[ii][jj][kk][0])
												{
													tab[i][j][kk][1]++;
						}	}	}	}	}	}	}

						if(j>=3 && j<6)
						{	for(kk=0; kk<9; kk++)
							{	if( tab[i][j][kk][0] != 10 )
								{	for(ii=3; ii<6; ii++)
									{	for(jj=3;jj<6;jj++)
										{	if( (tab[ii][jj][9][0]>10) )
											{	if(tab[i][j][kk][0] == tab[ii][jj][kk][0])
												{
													tab[i][j][kk][1]++;
						}	}	}	}	}	}	}

						if(j>=6)
						{	for(kk=0; kk<9; kk++)
							{	if( tab[i][j][kk][0] != 10 )
								{	for(ii=3; ii<6; ii++)
									{	for(jj=6;jj<9;jj++)
										{	if( (tab[ii][jj][9][0]>10) )
											{	if(tab[i][j][kk][0] == tab[ii][jj][kk][0])
												{
													tab[i][j][kk][1]++;
						}	}	}	}	}	}	}
					}
					if(i>=6)
					{	if(j<3)
						{	for(kk=0; kk<9; kk++)
							{	if( tab[i][j][kk][0] != 10 )
								{	for(ii=6; ii<9; ii++)
									{	for(jj=0;jj<3;jj++)
										{	if( (tab[ii][jj][9][0]>10) )
											{	if(tab[i][j][kk][0] == tab[ii][jj][kk][0])
												{
													tab[i][j][kk][1]++;
						}	}	}	}	}	}	}

						if(j>=3 && j<6)     //bloc test.
						{	for(kk=0; kk<9; kk++)
							{	if( tab[i][j][kk][0] != 10 )
								{	for(ii=6; ii<9; ii++)
									{	for(jj=3; jj<6; jj++)
										{	if( (tab[ii][jj][9][0]>10) )
											{	if(tab[i][j][kk][0] == tab[ii][jj][kk][0])
												{
													tab[i][j][kk][1]++;
						}	}	}	}	}	}	}

						if(j>=6)
						{	for(kk=0; kk<9; kk++)
							{	if( tab[i][j][kk][0] != 10 )
								{	for(ii=6; ii<9; ii++)
									{	for(jj=6;jj<9;jj++)
										{	if( (tab[ii][jj][9][0]>10) )
											{	if(tab[i][j][kk][0] == tab[ii][jj][kk][0])
												{
													tab[i][j][kk][1]++;
						}	}	}	}	}	}	}
					}
				}
			}
		}//fin du comptage des possibilités des blocs.

		for(i=0; i<9; i++) // Affectation de la valeur mise en évidence par le comptage.
		{	for(j=0; j<9; j++)
			{	if(tab[i][j][9][0] > 9)
				{	for(kk=0; kk<9; kk++)
					{	if( (tab[i][j][kk][1]==1) && (tab[i][j][kk][0]!=10) )
						{
							tab[i][j][9][0] = tab[i][j][kk][0];
							goto fin;
		}	}	}	}	}

		for(i=0; i<9; i++) // Reinitialise a zero le comptage...
		{	for(j=0; j<9; j++)
			{	for(kk=0; kk<10; kk++)
				{	tab[i][j][kk][1]=0;
		}	}	}

		for(i=0; i<9; i++)        // 2eme comptage. Cette fois, au niveau des lignes. 
		{	for(j=0; j<9; j++)
			{	if(tab[i][j][9][0] > 9)
				{	for(ii=0; ii<9; ii++)
					{	if(tab[ii][j][9][0] > 9)
						{	for(kk=0; kk<9; kk++)
							{	if( tab[i][j][kk][0] < 10 )
								{
									if(tab[i][j][kk][0] == tab[ii][j][kk][0])
									{
										tab[i][j][kk][1]++;
		}	}	}	}	}	}	}	}

		for(i=0; i<9; i++) // 2eme affectation des valeurs trouvées. 
		{	for(j=0; j<9; j++)
			{	if(tab[i][j][9][0] > 9)
				{	for(kk=0; kk<9; kk++)
					{	if( (tab[i][j][kk][1]==1) && (tab[i][j][kk][0]!=10) )
						{
							tab[i][j][9][0] = tab[i][j][kk][0];
							goto fin;
		}	}	}	}	}



		for(i=0; i<9; i++) // 2eme réinitialisation des compteurs
		{	for(j=0; j<9; j++)
			{	for(kk=0; kk<9; kk++)
				{	tab[i][j][kk][1]=0;
		}	}	}

		for(i=0; i<9; i++) // 3eme comptage. Au niveau des colonnes.
		{	for(j=0; j<9; j++)
			{	if(tab[i][j][9][0] > 9)
				{	for(jj=0; jj<9; jj++)
					{	if( tab[i][jj][9][0] > 9 )
						{	for(kk=0; kk<9; kk++)
							{	if( tab[i][j][kk][0] != 10 )
								{
									if(tab[i][j][kk][0] == tab[i][jj][kk][0])
									{
										tab[i][j][kk][1]++;
									}
		}	}	}	}	}	}	}

		for(i=0; i<9; i++) // 3eme affectation des valeurs. La réinitialisation aura lieu au debut
		{	for(j=0; j<9; j++) // de la boucle generale.
			{	if(tab[i][j][9][0] > 9)
				{	for(kk=0; kk<9; kk++)
					{	if( (tab[i][j][kk][1]==1) && (tab[i][j][kk][0]!=10) )
						{
							tab[i][j][9][0] = tab[i][j][kk][0];
	 						goto fin;
		}	}	}	}	}
		
		for(i=0; i<9; i++)
		{	for(j=0; j<9; j++)
			{
				compteur = 0;
				for(kk=0; kk<9; kk++)
				{
					if(tab[i][j][kk][0] != 10)
					{
						temp[99].val = tab[i][j][kk][0];
						temp[99].x =i;
						temp[99].y =j;
						compteur++;
					}
				}
				if(compteur == 1)
				{
					tab[temp[99].x][temp[99].y][9][0]= temp[99].val;
					goto fin;
				}
			}
		}
fin:		
		count=0;
		for (i=0;i<9;i++) // compte le nombre de possibilités restantes.
		{	for(j=0;j<9;j++) 
			{	if(tab[i][j][9][0]>=10)
				{	
					count++;					
		}	}	}	

		
/////////////////////////////////
		if(tempo==count)
		{	for(i=0; i<9; i++)
			{	for(j=0; j<9; j++)
				{	if(tab[i][j][9][0]>9)
					{	for(kk=0; kk<9; kk++)
						{	if(tab[i][j][kk][1]==2)
							{
								if(bloquer>=1)
								{
									for(bl=0; bl<bloquer; bl++)
									{
										if(i!= temp[bl].x && j!=temp[bl].y && kk!= temp[bl].k)
										{
											tab[i][j][9][0]=tab[i][j][kk][0];
											temp[bloquer].x=i;
											temp[bloquer].y=j;
											temp[bloquer].k=kk;
											bloquer++;
											goto fin2;
										}
									}
								}
								else
								{
									tab[i][j][9][0]=tab[i][j][kk][0];
									temp[bloquer].x= i;
									temp[bloquer].y= j;
									temp[bloquer].k= kk;
								//	for(kk=0; kk<9; kk++)printf("\n\ntab[%d][%d][%d][%d]= %d\n\n",i,j,kk,0,tab[i][j][kk][0]);
									bloquer++;
							//		printf("\a");
							//		system("pause");
									goto fin2;
								}
		}	}	}	}	}	}
		if(tempo == count && bloquer>=1)
		{
			if(count==0) goto fin2;
			retry++;
		//	printf("\a");
			goto debut;
		}
		tempo=count;
fin2:
			
		//printf("\n>>%d<<\n",count);
		if(count==0) 
		{ 
			printf("\n");
			affiche(0,0,tab, 0);
			system("pause");
			return 0;
		}
		
/////////////////////////////////
	
		//printf("continuer  ? (o/n)");
		//rep=fgetc(stdin);
		if(rep=='n') return 0;
		if(rep=='a') 
		{
			point=bouger(tab, 0, 0);
			if(point.test==0)
			{
				tab[point.x][point.y][9][0]=point.val;
			}
		}
		if(rep=='r')
		{
			retry++;
			goto debut;
		}
	}
}

fin(char *pMsg)
{
  puts(pMsg);
}