#include <stdio.h>
#include <stdlib.h>

/* On appelle les fonctions */

void init_carte (int tab[20][20]);
void affiche_carte (int tab[20][20],int perso[2]);
int deplace_perso (int a,int tab [20][20], int perso[2]);

/* Programme principal */
int main()
{
  int tab[20][20];
  int perso[2];
  int a;
  int b;
  int or=0;
  int l;
  int vie=0;
  int i;
  int j;
  int clef=0;
  int h;

 printf(" Veuillez taper sur l'un des numéros suivants\n");
 printf(" pour effectuer un déplacement: 8=haut ,2=bas ,4=gauche ,6=droite\n");

  perso[0]=0;
  perso[1]=0;

  init_carte (tab);
  affiche_carte (tab,perso);

  printf("Combien de pièces d'OR avez-vous trouvez :0\n");
  printf("Vies restantes :10\n");
  printf("Nombre de clef(s):0\n");

  do{

  a=deplace_perso (a,tab, perso);
  i=perso[0];
  j=perso[1];
  /* On empêche le personnage de sortir de la map sur l'axe x et on affiche une erreur si l'utilisateur tente de le faire */
    if (perso[0]<0)
     {
       affiche_carte (tab,perso);
       printf("Désolé, déplacement impossible car vous allez sortir de la map\n");
       perso[0]=0;
     }
    else if(perso[0]>19)
     {
       affiche_carte (tab,perso);
       printf("Désolé, déplacement impossible car vous allez sortir de la map\n");
       perso[0]=19;
     }
  /* On empêche le personnage de sortir de la map sur l'axe y et on affiche une erreur si l'utilisateur tente de le faire */
    else if(perso[1]<0)
     {
       affiche_carte (tab,perso);
       printf("Désolé, déplacement impossible car vous allez sortir de la map\n");
       perso[1]=0;
     }
    else if(perso[1]>19)
     {
       affiche_carte (tab,perso);
       printf("Désolé, déplacement impossible car vous allez sortir de la map\n");
       perso[1]=19;
     }
    else
     {
       affiche_carte (tab,perso);
     }

    if(tab[perso[1]][perso[0]]==5)
     {
       tab[perso[1]][perso[0]]=0; /* Quand la position du personnage est sur 5, on ajoute une pièce d'or */
       b=1;
       or=b+or;
     }

    if(tab[perso[1]][perso[0]]==4)
     {
       tab[perso[1]][perso[0]]=0; /* Quand la position du personnage est sur 4, on ajoute une clef */
       h=1;
       clef=h+clef;
     }

    if((tab[perso[1]][perso[0]]==7) || (tab[perso[1]][perso[0]]==8))
     { /* Quand la position du personnage est sur 7 ou 8, on enleve une vie */
       if((tab[perso[1]][perso[0]]==7) || (tab[perso[1]][perso[0]]==8))
        {
          tab[perso[1]][perso[0]]=0;
          tab[i][j] = 0;
        }
       l=1;
       vie=vie+l;
     }

  if((tab[perso[1]][perso[0]]==6))
     { /* Quand la position du personnage est sur 6, on enleve une clef */
       if((tab[perso[1]][perso[0]]==6))
        {
          tab[perso[1]][perso[0]]=0;
          tab[i][j] = 0;
        }
      h=1;
      clef=clef-h;
     }

     printf("Combien de pièces d'OR avez-vous trouvez :%d\n",or);
     printf("Vies restantes : %d\n",(10-vie));
     printf("Nombre de clef(s):0%d\n",(0+clef));

   }while( (a!=0) && (or!=10) && ( (10-vie)!=0) );

    if(or==10)
     {
       printf("Bien jouer, vous avez gagnez\n");
     }

    if((10-vie)==0)
     {
       printf("Perdu,retentez votre chance\n");
     }

    if(a==0)
     {
       printf("Au revoir, merci d'avoir jouer\n");
     }

 return 0;

}
/* Fonctions qui seront utilisées dans le main */

/* Initialisation de la map */

void init_carte (int tab[20][20])
{
  int i,j;
  system("clear");

//Initialisation de la map
  for(i=0; i<20; i++)
   {
     for(j=0; j<20; j++)
      {
        tab[i][j]=0;
      }
   }

//Rendu 'aléatoire'

 for(i=0; i<20; i++)
   {
     for(j=0; j<20; j++)
      {

	tab[i][j]=(i*j)%10;

      }
   }

  for(i=10; i<11; i++)
   {
     for(j=0; j<20; j++)
      {

	tab[i][j]=3;

      }
   }

for(i=0; i<20; i++)
   {
     for(j=10; j<11; j++)
      {

	tab[i][j]=3;

      }
   }
	tab[10][5]=6;
	tab[10][15]=6;
	tab[5][10]=6;
	tab[5][15]=6;
//Zone de sécurité
 for(i=1; i<3; i++)
   {
     for(j=1; j<3; j++)
      {

	tab[i][j]=0;

      }
   }
}



/* Affichage de la map */

void affiche_carte (int tab[20][20],int perso[2])
{
  int i,j;

  if ((perso[0]<0) || (perso[1]<0) || (perso[1]>19) || (perso[0]>19))
    {
      printf("Erreur\n");
    }
  else
    {
      system("clear");
      for(i=0 ; i<20 ;i++)
       {
         for(j=0 ; j<20 ; j++)
          {
            if((j==perso[0]) && (i==perso[1]))
             {
               printf("X ");
             }
            else
             {
              printf("%d ",tab[i][j]);
             }
          }
         printf("\n");
       }
    }
}

/* Déplacement du personnage */

int deplace_perso (int a,int tab[20][20],int perso[2])
{
  scanf("%d", &a);
  int clef;
  if(a==6)
   {
     if((tab[perso[1]][perso[0]+1]==2) || (tab[perso[1]][perso[0]+1]==3) || ((tab[perso[1]][perso[0]+1]==6) && clef>0))
      {
        perso[0]=perso[0];
      }
     else
      {
        perso[0]=perso[0]+1;
        perso[1]=perso[1];
      }
   }

  if(a==4)
   {
     if((tab[perso[1]][perso[0]-1]==2) || (tab[perso[1]][perso[0]-1]==3) || ((tab[perso[1]][perso[0]-1]==6) && clef>0))
      {
        perso[0]=perso[0];
      }
     else
      {
        perso[0]=perso[0]-1;
        perso[1]=perso[1];
      }
   }

  if (a==8)
   {
     if((tab[perso[1]-1][perso[0]]==2) || (tab[perso[1]-1][perso[0]]==3)|| ((tab[perso[1]][perso[0]-1]==6) && clef>0))
      {
        perso[1]=perso[1];
      }
     else
      {
        perso[0]=perso[0];
        perso[1]=perso[1]-1;
      }
   }

  if (a==2)
   {
     if((tab[perso[1]+1][perso[0]]==2) || (tab[perso[1]+1][perso[0]]==3)|| ((tab[perso[1]][perso[0]+1]==6) && clef>0))
      {
        perso[1]=perso[1];
      }
     else
      {
        perso[0]=perso[0];
        perso[1]=perso[1]+1;
      }
   }

  return a;
}