/* http://www.mrwadlo.com */
#include <stdio.h>
#include <conio.h>
#include <math.h>
#include <time.h>

#define MAXPPL 5000

int right[MAXPPL][2];
int left[MAXPPL][2];

int total_l = 23;
int total_r = 23;

void initialize();
void display();
void cycle();
void addleft(int y);
void addright(int y);
int checkleft(int x, int y);
int checkright(int x, int y);

int main()
{
     initialize();
     display();

     do {

     cycle();

     } while ( 1 );



     getch();
     return 0;
}
void initialize()
{
     int i;

     clrscr();

     for ( i=0 ; i<23 ; i++ )
     {
          right[i][0] = 79;
          right[i][1] = i+2;
     }
     for ( i=0 ; i<23 ; i++ )   
     {
          left[i][0] = 2;
          left[i][1] = i+2;
     }
     for ( i=23 ; i<MAXPPL ; i++ )
     {
          right[i][0] = -1;
          left[i][0] = -1;
     }

}
void display()
{
     int i=0;


     clrscr();

     gotoxy(20,25);
     printf("X's: %d   ", total_l);

     gotoxy(50,25);
     printf("O's: %d   ", total_r);


     while ( i<MAXPPL )
     {
	  if ( right[i][0] != -1 )
	  {
	  	gotoxy(right[i][0],right[i][1]);
	  	printf("X");
     	  }
          i++;
     }

     i=0;

     while ( i<MAXPPL )
     {
	  if ( left[i][0] != -1 )
	  {
	  	gotoxy(left[i][0],left[i][1]);
	  	printf("O");
          }
          i++;
     }
}
void cycle()
{
     int i;

     for ( i=0 ; i<MAXPPL ; i++ )
     {
	  if ( random() && left[i][0] != -1 )
          {
	       if ( left[i][0] > 78 && left[i][0] != -1 )
               {
                   left[i][0] = 2;

		   if ( left[i][1] < 24 && checkleft(2, left[i][1]+1) )
		      addleft(left[i][1]+1);

		   if (left[i][1] > 2 && checkleft(2, left[i][1]-1) )
                      left[i][1]--;
               }
               else if ( left[i][0] != -1 )
               {
		   if ( lhit(left[i][0],left[i][1],i) )
			;
		   else
			left[i][0]++;
               }
          }
     }
     for ( i=0 ; i<MAXPPL ; i++ )
     {
          if ( random() && right[i][0] != -1 )
          {
	       if (right[i][0] < 3 && right[i][0] != -1)
	       {
		   right[i][0] = 79;

		   if ( right[i][1] < 24 && checkright(79, right[i][1]+1) )
                      addright(right[i][1]+1);

		   if (right[i][1] > 2 && checkright(79, right[i][1]-1) )
		      right[i][1]--;
               }
	       else if ( right[i][0] != -1 )
               {
		   if ( rhit(right[i][0],right[i][1],i) )
			;
		   else
		   	right[i][0]--;
               }
          }
     }

     display();
}
int random()
{
     int rnd;

     rnd = (rand() + time(NULL)) % 2;

     return rnd;
}
void addleft(int y)
{
     int i=0;

     while ( left[i][0] != -1 )
           i++;
     if ( i<MAXPPL )
     {
          left[i][0] = 2;
	  left[i][1] = y;
          total_l++;
     }
}
void addright(int y)
{
     int i=0;

     while ( right[i][0] != -1 )
           i++;
     if ( i<MAXPPL )
     {
	  right[i][0] = 79;
	  right[i][1] = y;
	  total_r++;
     }
}
int lhit( int x, int y, int n )
{
	int i;
	int hits = 0;

	for ( i=0 ; i<MAXPPL && right[i][0] > -1 ; i++ )
	{
		if ( right[i][0] == x && right[i][1] == y && right[i][0] != -1 )
		{
			if ( random() )
			{
				right[i][0] = -1;
				right[i][1] = -1;
                                total_r--;
			}
			else
			{
				left[n][0] = -1;
				left[n][1] = -1;
				hits = 1;
				total_l--;
			}
                }
	}
	return hits;
}
int rhit( int x, int y )
{
	int i;
	int hits = 0;

	for ( i=0 ; i<MAXPPL && left[i][0] > -1 ; i++ )
	{
		if ( left[i][0] == x && left[i][1] == y && left[i][0] != -1 )
		{
			if ( random() )
			{
				left[i][0] = -1;
				left[i][1] = -1;
				total_l--;
			}
			else
			{
				right[i][0] = -1;
				right[i][0] = -1;
				hits = 1;
				total_r--;
			}
                }
	}
        return hits;
}
int checkleft(int x, int y)
{
	int i;
	for ( i=0 ; i<MAXPPL ; i++ )
	{
		if ( left[i][0] == x && left[i][1] == y)
                	return 0;
	}
	return 1;
}
int checkright(int x, int y)
{
	int i;
	for ( i=0 ; i<MAXPPL ; i++ )
	{
		if ( right[i][0] == x && right[i][1] == y)
                	return 0;
	}
	return 1;
}