#include <iostream.h>
#include <dos.h>
#include <conio.h>

void tecla(int &s)
{
  REGS en, sal;
  en.h.ah=1;
  int86(22,&en,&sal);
  if(!(sal.x.flags&64))
  {
    en.h.ah=0;
    int86(22,&en,&sal);
    s=sal.h.ah;
  }
}

void escribe(int x, int y, char c)
{
    gotoxy(x,y);
    cout<<c;
}

void gnrcn(char cuadro[50][25])
{
  int i,j,k,l,suma;
  char temp[50][25];
  for (j=0; j<50;j++)
    for (k=0; k<25; k++)
      temp[j][k]=' ';
  for (i=0; i<50; i++)
    for (j=0; j<25; j++)
    {
      suma=0;
      for (k=0; k<3; k++)
        for (l=0; l<3; l++)
        {
          if (!(k==1 && l==1))
          {
            if (cuadro[(i+49+k)%50][(j+24+l)%25]=='O')
              suma++;
          }
        }
      if (cuadro[i][j]=='O')
      {
        if (suma<2 || suma>3)
          temp[i][j]=' ';
        else
          temp[i][j]='O';
      }
      else
        if ((cuadro[i][j]==' ') && (suma==3))
          temp[i][j]='O';
    }
  for (i=0; i<50; i++)
    for (j=0; j<25; j++)
      cuadro[i][j]=temp[i][j];
}

void main()
{
  gotoxy(28,10);
  cout<<"Conway's Game of Life";
  delay(1000);
  clrscr();
  gotoxy(1,1);
  cout<<"- Utilice las flechas direccionales para ubicarse en la posicion a poner una ficha\n";
  cout<<"- Utilice la barra espaciadora para poner la ficha\n";
  cout<<"- Utilize la tecla de retorno para quitar la ficha\n";
  cout<<"- Presione la tecla enter para iniciar la simulacion\n";
  cout<<"- Presione la tecla escape para terminar la simulacion\n";
  cout<<"- Presione cualquier tecla para cerrar el programa\n\n";
  cout<<"Nota: tenga paciencia para ubicar las fichas, no es 100% eficiente\n";
  cout<<"Presione cualquier tecla para iniciar";
  getche();
  clrscr();
  int i,j,k,s,cont=1;
  char cuadro[50][25];
  for (j=0; j<50;j++)
    for (k=0; k<25; k++)
      cuadro[j][k]=' ';
  int x=1,y=1;
  for (i=0;i<25;i++)
    escribe(51, i+1, '|');
  do
  {
    s=0;
    gotoxy(x,y);
    tecla(s);
    switch(s)
    {
      case 72: y--; break;
      case 80: y++; break;
      case 75: x--; break;
      case 77: x++; break;
      case 57: cout<<"O"; cuadro[x-1][y-1]='O'; break;
      case 14: cout<<" "; cuadro[x-1][y-1]=' '; break;
    };
  }while(s!=28);
  REGS en, sal;
  en.h.ah=1;
  en.h.ch=32;
  int86(0x10,&en,&sal);
  gotoxy(60,9);
  cout<<"Generacion No.:";
  do
  {
    for (i=0; i<50; i++)
      for (j=0; j<25; j++)
        escribe(i+1,j+1,cuadro[i][j]);
    gnrcn(cuadro);
    gotoxy(60,10);
    cout<<cont++;
    delay(500);
    tecla(s);
  }while(s!=1);
  getche();
}