#include <iostream.h>
#include "ttt.h"

void TicTacToe::Comp_Move(char symbol)
{
cout<<"Computer is making a move..."<<endl;
char symbol2;
if (symbol=='X')
   symbol2='O';
else
   symbol2='X';

//Check to see if X or O wins
   if (board[0][0]==symbol && board[0][2]==symbol && board[0][1]==' ')
      {board[0][1]=symbol; return;}
   if (board[0][0]==symbol && board[0][1]==symbol && board[0][2]==' ')
      {board[0][2]=symbol; return;}
   if (board[0][0]==symbol && board[2][2]==symbol && board[1][1]==' ')
      {board[1][1]=symbol; return;}  //may be able to leave out
   if (board[0][0]==symbol && board[1][1]==symbol && board[2][2]==' ')
      {board[2][2]=symbol; return;}
   if (board[0][0]==symbol && board[1][0]==symbol && board[2][0]==' ')
      {board[2][0]=symbol; return;}
   if (board[0][1]==symbol && board[2][1]==symbol && board[1][1]==' ')
      {board[1][1]=symbol; return;}
   if (board[0][1]==symbol && board[1][1]==symbol && board[2][1]==' ')
      {board[2][1]=symbol; return;}
   if (board[0][0]==symbol && board[2][0]==symbol && board[1][0]==' ')
      {board[1][0]=symbol; return;}
   if (board[1][1]==symbol && board[1][2]==symbol && board[1][0]==' ')
      {board[1][0]=symbol; return;}
   if (board[1][0]==symbol && board[1][2]==symbol && board[1][1]==' ')
      {board[1][1]=symbol; return;}
   if (board[0][2]==symbol && board[1][2]==symbol && board[2][2]==' ')
      {board[2][2]=symbol; return;}
   if (board[0][1]==symbol && board[0][2]==symbol && board[0][0]==' ')
      {board[0][0]=symbol; return;}
   if (board[1][1]==symbol && board[1][2]==symbol && board[1][0]==' ')
      {board[1][0]=symbol; return;}
   if (board[1][0]==symbol && board[1][1]==symbol && board[1][2]==' ')
      {board[1][2]=symbol; return;}
   if (board[2][0]==symbol && board[2][2]==symbol && board[2][1]==' ')
      {board[2][1]=symbol; return;}
   if (board[0][2]==symbol && board[1][1]==symbol && board[2][0]==' ')
      {board[2][0]=symbol; return;}
   if (board[2][0]==symbol && board[1][1]==symbol && board[0][2]==' ')
      {board[0][2]=symbol; return;}
   if (board[1][0]==symbol && board[2][0]==symbol && board[0][0]==' ')
      {board[0][0]=symbol; return;}
   if (board[0][2]==symbol && board[2][0]==symbol && board[1][1]==' ')
      {board[1][1]=symbol; return;}
   if (board[1][2]==symbol && board[2][2]==symbol && board[0][2]==' ')
      {board[0][2]=symbol; return;}
   if (board[1][1]==symbol && board[2][2]==symbol && board[0][0]==' ')
      {board[0][0]=symbol; return;}
   if (board[2][0]==symbol && board[2][1]==symbol && board[2][2]==' ')
      {board[2][2]=symbol; return;}
   if (board[0][2]==symbol && board[2][2]==symbol && board[1][2]==' ')
      {board[1][2]=symbol; return;}
   if (board[2][1]==symbol && board[2][2]==symbol && board[2][0]==' ')
      {board[2][0]=symbol; return;}

//Can't win?  Check for blocks
   if (board[0][0]==symbol2 && board[0][2]==symbol2 && board[0][1]==' ')
     {board[0][1]=symbol; return;}
   if (board[0][0]==symbol2 && board[0][1]==symbol2 && board[0][2]==' ')
     {board[0][2]=symbol; return;}
   if (board[0][0]==symbol2 && board[2][2]==symbol2 && board[1][1]==' ')
     {board[1][1]=symbol; return;}  //may be able to leave out
   if (board[0][0]==symbol2 && board[1][1]==symbol2 && board[2][2]==' ')
     {board[2][2]=symbol; return;}
   if (board[0][0]==symbol2 && board[1][0]==symbol2 && board[2][0]==' ')
     {board[2][0]=symbol; return;}
   if (board[0][1]==symbol2 && board[2][1]==symbol2 && board[1][1]==' ')
     {board[1][1]=symbol; return;}
   if (board[0][1]==symbol2 && board[1][1]==symbol2 && board[2][1]==' ')
     {board[2][1]=symbol; return;}
   if (board[0][0]==symbol2 && board[2][0]==symbol2 && board[1][0]==' ')
     {board[1][0]=symbol; return;}
   if (board[1][1]==symbol2 && board[1][2]==symbol2 && board[1][0]==' ')
     {board[1][0]=symbol; return;}
   if (board[1][0]==symbol2 && board[1][2]==symbol2 && board[1][1]==' ')
     {board[1][1]=symbol; return;}
   if (board[0][2]==symbol2 && board[1][2]==symbol2 && board[2][2]==' ')
     {board[2][2]=symbol; return;}
   if (board[0][1]==symbol2 && board[0][2]==symbol2 && board[0][0]==' ')
     {board[0][0]=symbol; return;}
   if (board[1][1]==symbol2 && board[2][1]==symbol2 && board[0][1]==' ')
     {board[0][1]=symbol; return;}
   if (board[1][0]==symbol2 && board[1][1]==symbol2 && board[1][2]==' ')
     {board[1][2]=symbol; return;}
   if (board[2][0]==symbol2 && board[2][2]==symbol2 && board[2][1]==' ')
     {board[2][1]=symbol; return;}
   if (board[0][2]==symbol2 && board[1][1]==symbol2 && board[2][0]==' ')
     {board[2][0]=symbol; return;}
   if (board[2][0]==symbol2 && board[1][1]==symbol2 && board[0][2]==' ')
     {board[0][2]=symbol; return;}
   if (board[1][0]==symbol2 && board[2][0]==symbol2 && board[0][0]==' ')
     {board[0][0]=symbol; return;}
   if (board[0][2]==symbol2 && board[2][0]==symbol2 && board[1][1]==' ')
     {board[1][1]=symbol; return;}
   if (board[1][2]==symbol2 && board[2][2]==symbol2 && board[0][2]==' ')
     {board[0][2]=symbol; return;}
   if (board[1][1]==symbol2 && board[2][2]==symbol2 && board[0][0]==' ')
     {board[0][0]=symbol; return;}
   if (board[2][0]==symbol2 && board[2][1]==symbol2 && board[2][2]==' ')
     {board[2][2]=symbol; return;}
   if (board[0][2]==symbol2 && board[2][2]==symbol2 && board[1][2]==' ')
     {board[1][2]=symbol; return;}
   if (board[2][1]==symbol2 && board[2][2]==symbol2 && board[2][0]==' ')
     {board[2][0]=symbol; return;}

   if (level>1) { //Advanced moves and blocks
     if (level>2) {
      if (board[1][1]==symbol) {
         if (board[0][0]==symbol) {
            if (board[0][1]==' ' && board[0][2]==' ') {
               if (board[2][1]==' ') {board[0][1]=symbol; return;}
               if (board[2][0]==' ') {board[0][2]=symbol; return;}
               }
            if (board[1][0]==' ' && board[2][0]==' ') {
               if (board[1][2]==' ') {board[1][0]=symbol; return;}
               if (board[0][2]==' ') {board[2][0]=symbol; return;}
               }
         }
         if (board[0][2]==symbol) {
            if (board[0][1]==' '&& board[0][0]==' ') {
               if (board[2][1]==' ') {board[0][1]=symbol; return;}
               if (board[2][2]==' ') {board[0][0]=symbol; return;}
               }
            if (board[1][2]==' ' && board[2][2]==' ') {
               if (board[1][0]==' ') {board[1][2]=symbol; return;}
               if (board[0][0]==' ') {board[2][2]=symbol; return;}
               }
           }
        if (board[2][0]==symbol) {
           if (board[0][0]==' ' && board[1][0]==' ') {
              if (board[1][2]==' ') {board[1][0]=symbol; return;}
              if (board[2][2]==' ') {board[0][0]=symbol; return;}
              }
           if (board[2][1]==' ' && board[2][2]==' ') {
              if (board[0][1]==' ') {board[2][1]=symbol; return;}
              if (board[0][0]==' ') {board[2][2]=symbol; return;}
              }
           }
        if (board[2][2]==symbol) {
           if (board[0][2]==' ' && board[1][2]==' ') {
              if (board[1][0]==' ') {board[1][2]=symbol; return;}
              if (board[2][0]==' ') {board[0][2]=symbol; return;}
              }
           if (board[2][0]==' ' && board[2][1]==' ') {
              if (board[0][1]==' ') {board[2][1]=symbol; return;}
              if (board[0][2]==' ') {board[2][0]=symbol; return;}
              }
           }
      }
     }
      if ((board[0][0]==symbol2 && board[2][2]==symbol2) || (board[0][2]==symbol2 && board[2][0]==symbol2)) {
         if (board[0][1]==' ') {board[0][1]=symbol; return;}
         else if (board[1][0]==' ') {board[1][0]=symbol; return;}
         else if (board[1][2]==' ') {board[1][2]=symbol; return;}
         else if (board[2][1]==' ') {board[2][1]=symbol; return;} 
         }

      if (((board[0][0]==symbol2 && board[1][1]==symbol) || (board[0][0]==symbol && board[1][1]==symbol2)) && board[2][2]==' ')
         {board[2][2]=symbol; return;}
      if (((board[2][2]==symbol2 && board[1][1]==symbol) || (board[2][2]==symbol && board[1][1]==symbol2)) && board[0][0]==' ')
         {board[0][0]=symbol; return;}
      if (((board[1][1]==symbol2 && board[2][0]==symbol) || (board[1][1]==symbol && board[2][0]==symbol2)) && board[0][2]==' ')
         {board[0][2]=symbol; return;}
      if (((board[1][1]==symbol2 && board[0][2]==symbol) || (board[1][1]==symbol && board[0][2]==symbol2)) && board[2][0]==' ')
         {board[2][0]=symbol; return;}

      if (((board[0][2]==symbol && board[2][1]==symbol) || (board[0][2]==symbol2 && board[2][1]==symbol2)) && board[2][2] ==' ')
         {board[2][2]=symbol; return;}
      if (((board[0][0]==symbol && board[2][1]==symbol) || (board[0][0]==symbol2 && board[2][1]==symbol2)) && board[2][0] ==' ')
         {board[2][0]=symbol; return;}
      if (((board[1][2]==symbol && board[2][0]==symbol) || (board[1][2]==symbol2 && board[2][0]==symbol2)) && board[2][2] ==' ')
         {board[2][2]=symbol; return;}
      if (((board[0][1]==symbol && board[2][2]==symbol) || (board[0][1]==symbol2 && board[2][2]==symbol2)) && board[0][2] ==' ')
         {board[0][2]=symbol; return;}
      if (((board[1][0]==symbol && board[2][2]==symbol) || (board[1][0]==symbol2 && board[2][2]==symbol2)) && board[2][0] ==' ')
         {board[2][0]=symbol; return;}
      if (((board[1][2]==symbol && board[2][1]==symbol) || (board[1][2]==symbol2 && board[2][1]==symbol2)) && board[2][2] ==' ')
         {board[2][2]=symbol; return;}
   }

   //Take middle if it's open
   if (board[1][1]==' ') {board[1][1]=symbol; return;}

   //Take a corner
   if (board[0][0]==' ') {board[0][0]=symbol; return;}
   if (board[0][2]==' ') {board[0][2]=symbol; return;}
   if (board[2][0]==' ') {board[2][0]=symbol; return;}
   if (board[2][2]==' ') {board[2][2]=symbol; return;}

   //Take a middle block
   if (board[0][1]==' ') {board[0][1]=symbol; return;}
   if (board[1][0]==' ') {board[1][0]=symbol; return;}
   if (board[1][2]==' ') {board[1][2]=symbol; return;}
   if (board[2][1]==' ') {board[2][1]=symbol; return;}

   //Error!
   cout<<"Error in Computer Move code."<<endl; 
   exit(1);
}


void TicTacToe::Player_Move(char symbol, int turn)
{
char x,y;
int row;
int col;
bool valid=false;
bool valid2=false;
while (!valid || !valid2) {
   row=0;
   col=0;
   valid=false;
   valid2=false;
   cout<<"Player #"<<turn<<", Enter your move ROW : ";
   cin>>x;
   cout<<"            Enter you move COL : ";
   cin>>y;
   switch (x) {
      case '1' : row=0; valid=true; break;
      case '2' : row=1; valid=true; break;
      case '3' : row=2; valid=true; break;
      default  : valid=false; break;
      }
   switch (y) {
      case '1' : col=0; valid2=true; break;
      case '2' : col=1; valid2=true; break;
      case '3' : col=2; valid2=true; break;
      default  : valid2=false; break;
      }
if (valid && valid2)
   if (Check_Validity(row,col)) 
      board[row][col]=symbol;
   else
      valid=false;
if (!valid || !valid2)
   cout<<"Invalid choice.  Try again."<<endl;
}
}

inline bool TicTacToe::Check_Validity (int row, int column)
{
if (board[row][column]==' ') return true;
return false;
}


void TicTacToe::Make_Move(int& turn)
{
   int i,x;
   int checksum=0;
   for (i=0; i<3; i++)
      for (x=0; x<3; x++)
         if (board[i][x]=='X')
            checksum+=1;
         else if (board[i][x]=='O')
            checksum-=1;
   if (checksum==0) turn=1;
   if (checksum==1) turn=2;
   
   char symbol;
   if (turn==1)
      symbol='X';
   else
      symbol='O';
   switch (players) {
      case 0  : Comp_Move(symbol); break;
      case 1  : if (turn==1) 
                   if (first==PLAYER) 
                       Player_Move(symbol, turn);
                   else 
                      Comp_Move(symbol);
                else
                   if (first==PLAYER)
                      Comp_Move(symbol);
                   else
                      Player_Move(symbol, turn);
                break;
      case 2  : Player_Move (symbol, turn); break;
      default : cout<<"Error in Make_Move."<<endl; exit(1);
      }
   if (turn==1) 
      turn=2;
   else 
      turn =1;
}


char TicTacToe::Evaluate()
{    
   int i,x,y;
   int checksum[8]={0};
   int vals[3][3];
   for (i=0; i<3; i++)
      for (x=0; x<3; x++)
         if (board[i][x] == 'X')  vals[i][x]=1;
         else if (board[i][x] == 'O') vals[i][x]=-1;
         else vals[i][x]=0;
   for (i=0; i<3; i++)
      for (x=0; x<3; x++){
         checksum[i]+=vals[i][x];
         checksum[i+3]+=vals[x][i];
         }
   checksum[6]=vals[0][0]+vals[1][1]+vals[2][2];
   checksum[7]=vals[0][2]+vals[1][1]+vals[2][0];
   i=0;
   x=0;
   for (y=0; y<8; y++) {
      if (checksum[y]==3)  x++;
      if (checksum[y]==-3) i++;
      }
   if (x>1 || i>1 || (x>=1 && i>=1)) return 'E';
   if (x==1) return 'X';
   if (i==1) return 'O';
   for (i=0; i<3; i++)
      for (x=0; x<3; x++)
         if (vals[i][x]==0) return ' ';
   return 'C';
}

TicTacToe::TicTacToe (char Board[][3], int Level, int Players, int First) 
{
   //board=Board;
   players=Players;
   first=First;
   level=Level;
   int i,x;
   for (i=0; i<3; i++)
      for (x=0; x<3; x++) {
         if (Board[i][x] != 'X' && Board[i][x] != 'O')
            Board[i][x]='-';
         if (Board[i][x]=='-')
            Board[i][x]=' ';
         board[i][x]=Board[i][x];
      }
}

void TicTacToe::Display()
{
   int i,x;
   for (i=0; i<3; i++) {
      for (x=0; x<3; x++) {
         cout<<board[i][x]<<' ';
         if (x!=2) cout<<"| ";
         }
      cout<<endl;
      if (i!=2) cout<<"=========";
      cout<<endl;
   }
}