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

struct p
{
int x;
int y;
int stat;
};

struct p pp[400];
int z = 0; //계산 해야할 갯수

char pattern[3][3]={\'#\',\'#\',\'#\',\'#\',\'x\',\'x\',\'x\',\'#\',\'x\'};
struct p ppp[400];

char map[20][20];

int check() //이전 맵과 동일 한지 체크
{
 int i =0;
 int k =0;
 int y=0;
 int c=0;

 for(i = 0;i< 20;i++)
 {
  for(k = 0;k< 20;k++)
  {
   if( ((ppp[y].stat == 0) && (map[i][k] == \'x\')) || (( ppp[y].stat == 1) && (map[i][k] == \'#\')) )
   {
    c++;
   }
   y++;
  }
 }
 if(c==400)
  return 1;
 else
  return 0;

}
void update_map()//실제 맵에 그림
{
 int i = 0;
// printf("%d\\n",z);
 for(i=0;i<z;i++)
 {
  if(pp[i].stat == 1)
  {
   map[pp[i].x][pp[i].y] = \'#\';
  }
  else if(pp[i].stat == 0)
  {
   map[pp[i].x][pp[i].y] = \'x\';
  }
 }

}
void read_map() //체크하기 위한 읽기
{

 int i =0;
 int k =0;
 int y=0;

 for(i = 0;i< 20;i++)
 {
  for(k = 0;k< 20;k++)
  {
   if(map[i][k] == \'#\') ppp[y].stat = 1;
   else ppp[y].stat = 0;
   
   ppp[y].x = i;
   ppp[y].y = k;
   y++;
  }
 }
}

void input_p(int s_x,int s_y) //패턴을 맵에 삽입한다.
{
// pattern input
map[s_x-1][s_y-1] = pattern[0][0];
map[s_x-1][s_y  ] = pattern[0][1];
map[s_x-1][s_y+1] = pattern[0][2];
map[s_x  ][s_y-1] = pattern[1][0];
map[s_x  ][s_y  ] = pattern[1][1];
map[s_x  ][s_y+1] = pattern[1][2];
map[s_x+1][s_y-1] = pattern[2][0];
map[s_x+1][s_y  ] = pattern[2][1];
map[s_x+1][s_y+1] = pattern[2][2];
//
}

void draw()//완성된 맵을 출력한다.
{
 
//system("cls");
int i =0;
int k =0;

for(i = 0;i< 20;i++)
{
 for(k = 0;k< 20;k++)
 printf("%c",map[i][k]);

 printf("\\n");
}

}

void calc()//업데이트 해야할 배열을 검사한다.
{
 z=0;
 printf("\\n");
 int i=0;
 int k=0;
 int x=0;

 for(i = 0;i< 20;i++)
 {
  for(k = 0; k< 20; k++)
  { 
   x=0; 
   if((map[i-1][k-1] == \'#\')&&(i-1>0)&&(k-1>0)) x++;
   if((map[i-1][k  ] == \'#\')&&(i-1>0)) x++;
   if((map[i-1][k+1] == \'#\')&&(i-1>0)&&(k+1<40)) x++;
   if((map[i  ][k-1] == \'#\')&&(k-1>0)) x++;
   
   if((map[i  ][k+1] == \'#\')&&(k+1<40)) x++;
   if((map[i+1][k-1] == \'#\')&&(i+1<40)&&(k-1>0)) x++;
   if((map[i+1][k  ] == \'#\')&&(i+1<40)) x++;
   if((map[i+1][k+1] == \'#\')&&(i+1<40)&&(k+1<40)) x++;
  
   if(x>0)
    printf("i=%d k=%d x=%d\\n",i,k,x);
   

   if(((x> 1) || (x< 4) ) && (map[i][k] == \'#\')) //살아 있는 상태 유지  살아있는 세포가 2,3 개 있으면
   {
   
    pp[z].x = i;
    pp[z].y = k;
    pp[z].stat = 1;
   // z++;
   }
   if((map[i][k] == \'x\') && (x == 3)) //죽은 세포 주변에 3개의 살아있는 세포가 있으면 살아난다.
   {
    pp[z].x = i;
    pp[z].y = k;
    pp[z].stat = 1;
   // z++;
   }
  
   if(((x<2) || (x>3)) ) // 세포 주변에 0,1개, 4,5,6,7,8 개의 살아있는 세포가 있는 경우 그 세포는 죽는다.
   {
    pp[z].x = i;
    pp[z].y = k;
    pp[z].stat = 0;
   // z++;
   }
   
    z++;
  
 }
}
}

int main (void)
{
//# : alive
//x : dead

int i =0;
int k =0;

int x =0;
int y =0;

for(i = 0;i < 400; i++)
{
 x=(int)(i/20);
 y=(i%20);

 map[x][y] = \'x\';
}
/*
input_p(20,30);
input_p(10,20);
input_p(18,28);
input_p(20,28);
input_p(25,28);
136*/
input_p(28,38);
/*
input_p(23,33);
input_p(10,20);
input_p(20,27);
input_p(20,33);
input_p(23,30);
input_p(23,27);
input_p(17,27);
input_p(17,30);
input_p(17,33);
*/

draw();
printf("0번째 세대 \\n");

for(i=1; ; i++)
{
   
 read_map();
 calc();
 update_map();
// system("cls");
 draw();

 printf("%d번째 세대 \\n",i);
 if(1==check())
  break;
// Sleep(10);
 if(i==20)
 {
  printf("%d세대 까지 살아남으셨습니다 !!\\n",i);
  break;
 }
}
 return 0;
}
 

calc함수에서 변수선언이 안되서 에러뜨는데 왜 그런지 알려죠오오오오오