#include <stdio.h>
#include <time.h>
#define ROW 100
#define COLUMN 100

char player1[12],player2[12];
int WIN=3,i,k,j,l=0,row=3,column=3,tris[ROW][COLUMN& #93;,curr=0,player=0,check,lose1=0,lose2=0,losepc=0,score=0,score0=0,scorepc=0,s
core1=0,score2=0;
void Scan_player(){
     j=1;
     do{
        if (player!=0){
           printf("Digita '1' per modificare il nome del giocatore 1 o '0' per lasciarlo invariato\n");
           scanf("%d",&j);
           printf("\n");
           if (j!=0&&j!=1) printf("\nOpzione inesistente\n\n");
           }
        if (j==1){
           printf("\nScrivi il nome del giocatore 1 (max 12 caratteri)\n\n");
           _flushall();
           gets(player1);
           printf("\n\n");
           }
     }
     while(strlen(player2)>12&&j!=0);
     j=1;
     do{
        if (player!=0){
           printf("Digita '1' per modificare il nome del giocatore 2 o '0' per lasciarlo invariato\n");
           scanf("%d",&j);
           printf("\n");
           if (j!=0&&j!=1) printf("\nOpzione inesistente\n\n");
           }
        if (j==1){
           printf("\nScrivi il nome del giocatore 2 (max 12 caratteri)\n\n");
           _flushall();
           gets(player2);
           printf("\n\n");
           }
        }
     while(strlen(player2)>12&&j!=0);
}
void Score_clear(){
     score=0;
     scorepc=0;
     score0=0;
     score1=0;
     score2=0;
     losepc=0;
     lose1=0;
     lose2=0;
}
void Show_name(char player[]){
     j=0;
     while (j<strlen(player)){
           printf("%c",player[j]);
           j++;
           }
}
void Show_score(){
     printf("Numero totale di partite: [%d]\n\n",score);
     printf("Partite vinte da ");
     Show_name(player1);
     printf(": [%d]\n\n",score1);
     printf("Partite perse da ");
     Show_name(player1);
     printf(": [%d]\n\n",lose1);
     printf("Partite vinte da ");
     Show_name(player2);
     printf(": [%d]\n\n",score2);
     printf("Partite perse da ");
     Show_name(player2);
     printf(": [%d]\n\n",lose2);
     printf("Partite vinte dal computer: [%d]\n\n",scorepc);
     printf("Partite perse dal computer: [%d]\n\n",losepc);
     printf("Partite in parita': [%d]\n\n",score0);
}
int win_check(int row,int column,int WIN,int player){
    //controllo colonne
     check=0;
     i=0;
     while(i<row){
           k=0;
           while(k<column){
                           if (tris[i][k]==player){
                              check++;
                              if (check==WIN)return 1;
                              }else{
                              check=0;
                              }
                           k++;
                           }
           check=0;
           i++;
           }
     //controllo righe
     check=0;
     k=0;
     while(k<column){
           i=0;
           while(i<row){
                           if (tris[i][k]==player){
                              check++;
                              if (check==WIN)return 1;
                              }else{
                              check=0;
                              }
                           i++;
                           }
           check=0;
           k++;
           }
     //controllo inferiore diagonali (sx-dx)
     check=0;
     j=0;
     while(j<row){
           k=0;
           i=j;
           while((i<row)&&(k<column)){
                           if (tris[i][k]==player){
                              check++;
                              if (check==WIN)return 1;
                              }else{
                              check=0;
                              }
                           k++;
                           i++;
                           }
           check=0;
           j++;
           }
     //controllo superiore diagonali (sx-dx)
     check=0;
     j=1;
     while(j<row){
           k=j;
           i=0;
           while((i<row)&&(k<column)){
                           if (tris[i][k]==player){
                              check++;
                              if (check==WIN)return 1;
                              }else{
                              check=0;
                              }
                           k++;
                           i++;
                           }
           check=0;
           j++;
           }
     //controllo inferiore diagonali (dx-sx)
     check=0;
     j=0;
     while(j<column){
           k=column-1;
           i=j;
           while((i<row)&&(k<column)){
                           if (tris[i][k]==player){
                              check++;
                              if (check==WIN)return 1;
                              }else{
                              check=0;
                              }
                           k--;
                           i++;
                           }
           check=0;
           j++;
           }
     //controllo superiore diagonali (dx-sx)
     check=0;
     j=1;
     while(j<column){
           k=column-1-j;
           i=0;
           while((i<row)&&(k<column)){
                           if (tris[i][k]==player){
                              check++;
                              if (check==WIN)return 1;
                              }else{
                              check=0;
                              }
                           k--;
                           i++;
                           }
           check=0;
           j++;
           }
return 0;
}
void play(){
            check=curr+1;
            printf("Ora e' il turno di ");
            if (player==1){
               Show_name(player1);
               }else{
               Show_name(player2);
               }
            printf("\n\n");
            while (curr<check){
                  do {
                     printf("Inserisci un numero di riga\n");
                     scanf("%d",&i);
                     printf("Inserisci un numero di colonna\n");
                     scanf("%d",&k);
                     }
                     while (i>row||k>column);
                  if (tris[i-1][k-1]==player){
                     printf("Hai gia' selezionato questa casella\n");
                     printf("Eseguire un'altra selezione\n\n");
                     }
                  if ((tris[i-1][k-1]!=player)&&(tris[i-1][k-1]!=0)){
                     printf("La posizione selezionata e' gia' occupata da ");
                     if (player==1){
                        Show_name(player2);
                        }else{
                        Show_name(player1);
                        }
                     printf("\n\n");
                     printf("Eseguire un'altra selezione\n\n");
                     }
                  if (tris[i-1][k-1]==0){
                     printf("La posizione [%d,%d] e' ora occupata da ",i,k);
                     if (player==1){
                        Show_name(player1);
                        }else{
                        Show_name(player2);
                        }
                     printf("\n\n");
                     tris[i-1][k-1]=player;
                     curr++;
                     }
                  }
}
void pc_play(){
               check=curr+1;
               printf("Ora e' il turno del computer\n\n");
               while(curr<check){
                  srand(time(NULL));
                  i=rand()%row;
                  k=rand()%column;
                  if (tris[i][k]==0){
                     tris[i][k]=player;
                     curr++;
                     }
                  }
            printf("\nIl computer ha giocato\n\n");
}
void show(){
     i=0;
     k=0;
     printf("  ");
     while(k<column){
                 j=k+1;
                 printf(" ");
                 printf(" ");
                 printf("%d",j);
                 printf(" ");
                 printf(" ");
                 k++;
                 }
     printf("\n\n");
     while(i<row){
           j=i+1;
           printf("%d",j);
           if(j<10)printf(" ");
           k=0;
           while(k<column){
                 printf(" ");
                 printf("[");
                 if (tris[i][k]==0)
                 printf("_");
                 if (tris[i][k]==1)
                 printf("X");
                 if (tris[i][k]==2)
                 printf("O");
                 printf("]");
                 printf(" ");
                 k++;
                 }
           i++;
           printf("\n");
           printf("\n");
           }
}
void clear(){
     curr=0;
     i=0;
     while(i<row){
          k=0;
          while(k<column){
                tris[i][k]=0;
                k++;
                }
          i++;
          }
}

int main(){
    printf("Partita a Tris: vince chi riesce a mettere in fila %d dei suoi oggetti\n",WIN);
    printf("Il campo ha dimensioni %d per %d\n\n",row,column);
    printf("Il giocatore 1 usa il simbolo [X]\nil giocatore 2 usa il simbolo [O]\n");
    printf("Una casella vuota e' rappresentata dall'underscore: [_]\n\n");
    printf("La partita e' strutturata a turni\n\n");
    printf("E' possibile giocare in player vs player (modalita' due giocatori)\n\
o contro il pc (modalita' 1 giocatore)\n\n");
    Scan_player();
    player=1;
    int MODE=0;
    clear();
    while(MODE!=9){
                   MODE=0;
                   printf("\n\nDigita: \n\
             '1' per modalita' 1 giocatore\n\
             '2' per modalita' 2 giocatori\n\
             '3' per visualizzare i risultati\n\
             '4' per annullare i risultati\n\
             '5' per vedere un esempio\n\
             '6' per modificare il numero di oggetti in fila\n\
                 necessario per vincere\n\
             '7' per modificare il numero di righe e colonne\n\
             '8' per modificare il nome dei giocatori\n\
             '9' per uscire\n\n");
                 scanf("%d",&MODE);
                 printf("\n");
                 switch(MODE){
    case 1:
                clear();
                printf("Hai selezionato: modalita' 1 giocatore\n\n");
                while((curr<(row*column))&&(win_check(row,column,WIN,player)==0)){
                      if (player==1){
                         printf("Situazione attuale:\n");
                         show();
                         play();
                         if(win_check(row,column,WIN,player)==0)player=2;
                         }else{
                         pc_play();
                         if(win_check(row,column,WIN,player)==0)player=1;
                         }
                      }
                printf("Situazione finale:\n");
                show();
                printf("\n");
                if (win_check(row,column,WIN,player)){
                   if (player==1){
                      printf("Vince ");
                      Show_name(player1);
                      printf("\n\n");
                      score1++;
                      losepc++;
                      }else{
                      printf("Vince il pc");
                      scorepc++;
                      lose1++;
                      }
                   score++;
                   }
                if (curr==(row*column)){
                   printf("Partita patta\n\n");
                   score0++;
                   score++;
                   }
                break;
    case 2:
                clear();
                printf("Hai selezionato: modalita' 2 giocatori\n\n");
                while ((curr<(row*column))&&(win_check(row,column,WIN,player)==0)){
                      printf("Situazione attuale:\n");
                      show();
                      play();
                      if (win_check(row,column,WIN,player)==0){
                         if (player==1)
                         player=2;else player=1;
                         }
                      }
                printf("Situazione finale:\n");
                show();
                printf("\n");
                if (win_check(row,column,WIN,player)){
                   if (player==1){
                      printf("Vince ");
                      Show_name(player1);
                      printf("\n\n");
                      score1++;
                      lose2++;
                      }else{
                      printf("Vince ");
                      Show_name(player2);
                      printf("\n\n");
                      score2++;
                      lose1++;
                      }
                   score++;
                   }
                if (curr==(row*column)){
                   printf("Partita patta\n");
                   score0++;
                   score++;
                   }
                break;
    case 3:
                Show_score();
                break;
    case 4:
                Score_clear();
                break;
    case 5:
                clear();
                printf("Esempio in corso\n\n");
                do {
                   printf("Digita '1' per gioco continuo o '0' per partita turno per turno\n");
                   scanf("%d",&l);
                   printf("\n");
                   }
                while ((l!=0)&&(l!=1));
                while ((curr<(row*column))&&(win_check(row,column,WIN,player)==0)){
                      printf("Situazione attuale:\n");
                      show();
                      pc_play();
                      if (win_check(row,column,WIN,player)==0){
                         if(player==1)
                         player=2;else player=1;
                         }
                      if (l==0){
                         do {
                            printf("Digita '1' per continuare o '0' per chiudere\n");
                            scanf("%d",&j);
                            printf("\n");
                            if (j==0)curr=(row*column);
                            }
                         while ((j!=0)&&(j!=1));
                         }
                      }
                printf("Situazione finale:\n");
                show();
                printf("\n");
                if (win_check(row,column,WIN,player)){
                   printf("Vince il giocatore 'pc %d'\n",player);
                   }
                if(curr==(row*column))printf("Partita patta\n");
                break;
    case 6:
                printf("Digita il nuovo numero di oggetti\n");
                scanf("%d",&WIN);
                printf("\n");
                break;
    case 7:
                do    {
                      printf("Digita il nuovo numero di righe (<=%d)\n",ROW);
                      scanf("%d",&row);
                      printf("\n");
                      }
                while (row>100);
                do    {
                      printf("Digita il nuovo numero di colonne (<=%d)\n",COLUMN);
                      scanf("%d",&column);
                      printf("\n");
                      }
                while (column>100);
                printf("Il campo ha dimensioni %d per %d\n\n",row,column);
                break;
    case 8:
                Scan_player();
                break;
                }
    }
system("PAUSE");
return 0;
}

int WIN=3,i,k,j,l=0,row=3,column=3,tris[ROW][COLUMN& #93;,curr=0,player=0,check,lose1=0,lose2=0,losepc=0,score=0,score0=0,scorepc=0,s