DONNE TOUT LES PARALLILIOGRAMME DANS UN RECTANGLE

/***************************************************************************/
/*El Antri Abdellah                                                        */
/*Djillali Liabes university, Informatic departement (Algeria)             */
/*Email: El_Emir_2002@yahoo.fr                                             */
/*Compiled with TC3 ++                                                     */
/***************************************************************************/

/*
(ext_g_h_x , ext_g_h_y)
	   ***************************************************
	   *                       *                         *
	   *                       *                         *
	   *                       *                         *
	   ***************************************************
			       1 seul devision
	   ***************************************************
	   *            *            *           *           *
	   *            *            *           *           *
	   *            *            *           *           *
	   ***************************************************
			       3 divisions

*/

#include<dos.h>
#include<conio.h>
#include<stdio.h>
#include<graphics.h>
#include<stdlib.h>

#define MAX_SOM 500


typedef struct point{int x, y;};
typedef struct para{point a,b,c,d;};

void empiler(para p,para tab[], int *som)
{
if(*som < MAX_SOM)
  {
  tab[*som] = p;
  *som = *som + 1;
  }
   else {
	 printf("\n\r Erreur interne: PILE PLEINE");
	 getch();
	 exit(1);
	}
}

void depiler(para *p, para tab[], int *som)
{
if(*som > 0)
  {
  *som=*som-1;
  *p = tab[*som];
  }
  else
      {
      printf("\n\rEreur interne: PILE VIDE");
      getch();
      exit(1);
      }

}

int A(int n)
{
if( n == 0 )
  return(1);
  else return (A(n-1) + n + 1);
}

int nbr_para(int n)
{
int d = 0;

for(int i=0; i<= n-1;i++)
    d = d + A(i);
return (A(n) + 2*d);
}

void init()
{
int gdriver = DETECT, gmode, errorcode;

initgraph(&gdriver, &gmode, "d:\\tc\\bgi");
errorcode = graphresult();
if (errorcode != grOk)
{
   printf("Erreur graphique: %s\n", grapherrormsg(errorcode));
   printf("Tapper sur  une touche pour dortir:");
   getch();
   exit(1);
}

}

void main()
{
point mat_point[2][22];
para p, tab[MAX_SOM];
int L;

int som                ;
int n                  ;     /* Nombre de devision */
int ext_g_h_x=10,ext_g_h_y=10;


clrscr();
som = 0;

printf("\n\r Entrer le nombre de devision (<20):");
do {fflush(stdin);scanf("%d",&n);}while(n <= 0 || n > 20);

/* Longueur du rectangle*/
L = 600 - 600%(n+1);// (600%(n+1) pour avoir des rectangle de longueur identique

printf(" \n\r Le nombre de parallilograme est: %d", nbr_para(n));
textcolor(RED+BLINK);
cprintf("\n\r Tapper une touche pour continuer!");
getch();

/* Sauvgarde les coordonnees des points d'intersections dans une matrice de points*/
for(int i = 0; i <= n+1; i ++)
   {
   mat_point[0][i].x = ext_g_h_x + i*L/(n+1)            ;
   mat_point[0][i].y = ext_g_h_y                        ;
   mat_point[1][i].x = ext_g_h_x + i* L/(n+1)           ;
   mat_point[1][i].y = ext_g_h_y + 100*n/4              ;
   }

for( i = 0; i<= n; i++)
    {
    for(int j = i+1; j <= n+1; j++)
	{
	if(kbhit())if(getch() == 2)exit(1);
	/* parallologrammes dans le sens direct*/
	if(j <= (n+1) - 1)
	   for( int k=j; k <= n; k= k+ (j-i))
	      {
	      if(k +(j-i) <= n+1)
		{
		 p.a = mat_point[0][i];
		 p.b = mat_point[0][j];
		 p.c = mat_point[1][k+(j-i)];
		 p.d = mat_point[1][k];
		 empiler(p,tab,&som);
		}
	       }
	 }
     }

for( i = 0; i<= n; i++)
    {
    for(int j = i+1; j <= n+1; j++)
	{
	if(kbhit())if(getch()==27)exit(1);
	/* parallilograme dans le sens inverse */
	if(i >= 1)
	  for( int k=i; k >= 1;k = k -(j-i))
	     {
	      if(k - (j-i) >= 0)
		{
		 p.a = mat_point[0][i];
		 p.b = mat_point[0][j];
		 p.c = mat_point[1][k];
		 p.d = mat_point[1][k-(j-i)];
		 empiler(p,tab,&som);
		 }
	     }
	 }
     }

for( i = 0; i<= n; i++)
    {
    for(int j = n+1; j > i; j--)
	{
	if(kbhit())if(getch()==27)exit(1);
	/* Les rectangles*/
	p.a = mat_point[0][i];
	p.b = mat_point[0][j];
	p.c = mat_point[1][j];
	p.d = mat_point[1][i];
	empiler(p,tab,&som);
	}
    }




init();

while( som > 0)
     {
     depiler(&p,tab,&som);
     for(i=0; i<2; i++)
     {
     if(kbhit())if(getch()==27)exit(1);
     if(i==0)
	{
	setcolor(LIGHTRED);
	sound(1000);delay(50);nosound();
	}
	 else {setcolor(WHITE);delay(1500);}
     line(p.a.x, p.a.y, p.b.x, p.b.y);
     delay(500);
     line(p.b.x, p.b.y, p.c.x, p.c.y);
     delay(500);
     line(p.c.x, p.c.y, p.d.x, p.d.y);
     delay(500);
     line(p.d.x, p.d.y, p.a.x, p.a.y);
     }
     if(i == 1)delay(500);
     }
getch();
cleardevice();
}