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

#define H 40
#define L 60
#define DELTA 1000000L
#define DELTO 1000L

void AfficheTab(int tab[H][L], int posx, int posy, int i, int j){
  couleur c;
      if(tab[i][j]==0){
	c=CouleurParNom("green");
	ChoisirCouleurDessin(c);
	RemplirRectangle(posx,posy,20,20);
      }

      if(tab[i][j]==1||tab[i][j]==6||tab[i][j]==7||tab[i][j]==8||tab[i][j]==9){
	c=CouleurParNom("yellow");
	ChoisirCouleurDessin(c);
	RemplirRectangle(posx,posy,20,20);
      }
}

void Affiche(int tab[H][L]){
  /*affichage du tableau pour rendu graphique*/
  int i,j,posx=0,posy=0;
  for(i=0;i<H;i++){
    for(j=0;j<L;j++){
      AfficheTab(tab, posx, posy, i, j);
      posx=posx+20;
    }
    posx=0;
    posy=posy+20;
  }
  posx=0;
  posy=0;


}

int CliqueTouche(void){
  int direction;
  switch(Touche()){
  case XK_Up:
    if(direction!=0){
      direction=2;
      return direction;
    }
  case XK_Down:
    if(direction!=2){
      direction=0;
      return direction;
    }
    break;
  case XK_Right:
    if(direction!=1){
      direction=3;
      return direction;
    }
    break;
  case XK_Left:
    if(direction!=3){
      direction=1;
      return direction;
    }
  }
}


void DessinerTimer(int n)
{
  couleur c;
  char buf[100];
  c=CouleurParNom("white");
  ChoisirCouleurDessin(c);
  RemplirRectangle(0,850,200,100);
  c=CouleurParNom("black");
  ChoisirCouleurDessin(c);
  snprintf(buf,100,"time : %d",n);
  EcrireTexte(50,900,buf,2);
}

void init(int tab[H][L]){
  InitialiserGraphique();
  CreerFenetre(10,10,1700,1000);
  couleur c;
  c=CouleurParNom("green");
  ChoisirCouleurDessin(c);
  int i,j;
  /*initialisation de la grille a 0(vert)*/
  for(i=0;i<H;i++){
    for(j=0;j<L;j++){
      tab[i][j]=0;
    }
  }
  /*initialisation du serpent*/
  tab[0][1]=0;
  tab[10][1]=1;
  for(i=0;i<10;i++){
    tab[i][1]=1;
  }
}

void Direction(int ){
  
}

int main(void){
  /*partie graphique*/

	int tab[H][L], direction;
	int n=0,sxmin=0,symin=1,sxmax=10,symax=1;
	unsigned long suivant,suivant2;
	suivant2=Microsecondes()+DELTO;
	suivant=Microsecondes()+DELTA;


	init(tab);



	  
	while(1){


	  Affiche(tab);

	  /*touche*/
	  if(ToucheEnAttente()==1){
	    direction=CliqueTouche();
	  }
	  
	  

	  /*timer*/
	  if(Microsecondes()>suivant){
	    n++;
	    DessinerTimer(n);
	    suivant=Microsecondes()+DELTA;
	  }

	  
	  if(Microsecondes()>suivant2){
	    /*haut*/
	    if(direction==2){
	      sxmax=sxmax-1;
	      tab[sxmax][symax]=1;
	    }
	    /*droite*/
	    if(direction==3){
	      symax=symax+1;
	      tab[sxmax][symax]=1;
	    }
	    /*gauche*/
	    if(direction==1){
	      symax=symax-1;
	      tab[sxmax][symax]=1;
	    }
	    /*bas*/
	    if(direction==0){
	      sxmax=sxmax+1;
	      tab[sxmax][symax]=1;
	    }
	    suivant2=Microsecondes()+DELTO;    
	  }  
	    
	  
	}
	  

	
}