#include <stdio.h>

#include <stdlib.h>

#include <time.h>

char r_user[5][5]; // globalbna tablica ruchow useera
char r_komp[5][5]; // globalbna tablica ruchow kompa
char w[2]; //cos globalnego. Aaa, wiem, do funkcji trans_2()
void trans_2(int a, char * w[2]) { //tlumaczy 1,2,3,4 na A1,A2,A3,B1 itp, modyfikuje globalna tablice
    //char w[2]={0};

    if (a == 1)
        strcpy(w, "A1");
    if (a == 2)
        strcpy(w, "A2");
    if (a == 3)
        strcpy(w, "A3");
    if (a == 4)
        strcpy(w, "B1");
    if (a == 5)
        strcpy(w, "B2");
    if (a == 6)
        strcpy(w, "B3");
    if (a == 7)
        strcpy(w, "C1");
    if (a == 8)
        strcpy(w, "C2");
    if (a == 9)
        strcpy(w, "C3");

}

int spr(char t[]) { //funckja sprawdza stan gry

    int wygrana = 0; //1 - wygral gracz; 2// wygral komp //0-gra sie toczy //3-remis
    if (t[1] == 'x' && t[5] == 'x' && t[9] == 'x')
        wygrana = 1;

    if (t[1] == 'o' && t[5] == 'o' && t[9] == 'o')
        wygrana = 2;

    if (t[3] == 'x' && t[5] == 'x' && t[7] == 'x')
        wygrana = 1;

    if (t[3] == 'o' && t[5] == 'o' && t[7] == 'o')
        wygrana = 2;

    //wyzej przekatne

    if (t[1] == 'o' && t[4] == 'o' && t[7] == 'o')
        wygrana = 2;

    if (t[2] == 'o' && t[5] == 'o' && t[8] == 'o')
        wygrana = 2;

    if (t[3] == 'o' && t[6] == 'o' && t[9] == 'o')
        wygrana = 2;
    if (t[1] == 'x' && t[4] == 'x' && t[7] == 'x')
        wygrana = 1;
    if (t[2] == 'x' && t[5] == 'x' && t[8] == 'x')
        wygrana = 1;
    if (t[3] == 'x' && t[6] == 'x' && t[9] == 'x')
        wygrana = 1;
    //poziom
    if (t[1] == 'o' && t[2] == 'o' && t[3] == 'o')
        wygrana = 2;

    if (t[4] == 'o' && t[5] == 'o' && t[6] == 'o')
        wygrana = 2;

    if (t[7] == 'o' && t[8] == 'o' && t[9] == 'o')
        wygrana = 2;
    if (t[1] == 'x' && t[2] == 'x' && t[3] == 'x')
        wygrana = 1;
    if (t[4] == 'x' && t[5] == 'x' && t[6] == 'x')
        wygrana = 1;
    if (t[7] == 'x' && t[8] == 'x' && t[9] == 'x')
        wygrana = 1;

    if (wygrana == 0) {
        wygrana = 3; //jesli zaden z powyzszych warunkow nie zostal spelniony to moze jeszcze
        //byc remis. Czyli cala tablica zapelniona
        int i;
        for (i = 1; i < 10; i++) {

            if (t[i] == '\0')
                wygrana = 0; //jesli nie - gra toczy sie dalej
        }

    }
    return wygrana; //return stan gry: 0,1,2 lub 3

}

int ruch_programu(char t[], int pole) {
    int wybor = 0; //dokonany wybor
    int i; //do petli
    int dokonany = 0; //markowanie dokonanego wyboru



    // 1 2 3

    // A 1|2|3
    // -+-+-
    // B 4|5|6
    // -+-+-
    // C 7|8|9

    //tak wyglada rozmieszczenie pol tablicy. Zaowazamy ze na przekatnych
    //sa same niepatrzystane liczby, wiec latwo zrobic
    //zeby jako reagowal na ruch usera
    if (pole % 2 != 0) //jesli wybrane przez usera pole jest niepatzyste (znajduje sie na przekatnej)
    {
        if ((pole + 2) < 10 && t[pole + 2] == '\0') { //jezeli nastepne nieprzaste pole jest wolne i nie przekracza zakresu
            wybor = pole + 2; // to to jest wyborem
            dokonany = 1; //markujemy
        } else {
            //jesli nie
            if ((pole - 2) < 10 && (pole - 2) > 0 && t[pole - 2] == '\0') { //sprawdzamy poprzednie pole na przekatnej
                wybor = pole - 2;
                dokonany = 1;
            }

        }
    }
    if (dokonany == 0) //jesli ruch nie byl na przekatnej to
    {

        if (t[pole + 1] == '\0' && pole + 1 < 10) { //sprawdzamy czy wolne jest pole obok pola
            //wybranego przez usera
            wybor = pole + 1;
            dokonany = 1;
        }
        if (t[pole - 1] == '\0' && pole - 1 > 0) { //pole przed polem wybranym przez usera
            dokonany = 1;
            wybor = pole - 1;
        }

    }

    if (dokonany == 0) //jesli nadal wybor nie zostal dokonany to musi wkoncu cos wybrac
    {
        for (i = 1; i < 10; i++) {

            if (t[i] == '\0') { //wybiera pierwsze wolne pole
                wybor = i;
                break;
            }
        }

    }
    return wybor; //zwraca w formie int

}
int trans(char wybor[2]) { //zamienia A1,A2 na 1, 2 itp

    int g = -1;
    if (strcmp(wybor, "A1") == 0)
        g = 1;
    if (strcmp(wybor, "A2") == 0)
        g = 2;
    if (strcmp(wybor, "A3") == 0)
        g = 3;
    if (strcmp(wybor, "B1") == 0)
        g = 4;
    if (strcmp(wybor, "B2") == 0)
        g = 5;
    if (strcmp(wybor, "B3") == 0)
        g = 6;
    if (strcmp(wybor, "C1") == 0)
        g = 7;
    if (strcmp(wybor, "C2") == 0)
        g = 8;
    if (strcmp(wybor, "C3") == 0)
        g = 9;

    return g;
}
int dodaj(char wybor[2], char t[], int * ruchy) { //dodajemy x lub o
    int koniec;
    int pole = trans(wybor); //tlumaczymy wybor usera na pole tablicy
    t[pole] = 120; //wstawimy x w wybrane pole (120 to w ASCII x)
    strcat(r_user[ * ruchy + 1], wybor); //wybor usera zapamietujemy w globalnej tablicy
    ( * ruchy) ++; //zwiekszamy ruch (zaczynamy od 0)
    int zarodek = time(NULL);
    srand(zarodek);

    int pole2 = ruch_programu(t, pole); //generujemy ruch programu w zaleznosci od ruchu usera
    t[pole2] = 111; //wstawimy o

    trans_2(pole2, w); //ruch komputera tlumaczymy na A1, A2 itp
    strcat(r_komp[ * ruchy + 1], w); //wrzucamy do tablicy posuniec
    koniec = spr(t); //sprawdzamy czy gra nadal sie toczy
    if (koniec != 0) //jesli nie
        return koniec; // to zwroc status gry
}

void plansza(char t[], int ile) //rysowanie planszy
{
    int i;
    int l = 0;
    char g = 65;
    printf("--------------------------------\n"); //pseudo obramowanie;d
    printf(" "); //spacje <lol2>
    for (l = 0; l < ile; l++) {
        //ile to ilosc wykonanych ruchow.
        printf("%d ", l + 1); //numer ruchu

    }
    printf("\nRuch usera: ");

    for (l = 0; l < ile; l++) {

        printf("%s", r_user[l + 1]); //listowanie ruchow usera

    }

    printf("\nRuch kompa: ");

    for (l = 0; l < ile; l++) {

        printf("%s", r_komp[l + 1]); //listowanie ruchow kompa

    }
    printf("\n\n");

    printf(" 1 2 3\n");
    for (i = 1; i <= 9; i++) //rysowanie planszy
    {
        if (i == 1)
            printf(" %c ", g);

        printf("%c ", t[i]);
        if (i % 3) printf("|");
        else if (i != 9) {
            g++;
            printf("\n---+---+------\n %c ", g);
        } else printf("\n");
    }

    printf("\n--------------------------------\n");

}

int main() {
    char p[10] = {
        ""
    }; //tablica wartosci
    char wybor[3]; //wybor dokonany przez usera

    int h = 0;
    int g = 0;

    while (h < 1) {
        plansza(p, g); //pokazujemy plansze
        printf("Ruch %d: ", g + 1); //prosimy o ruch
        scanf("%s", wybor); //wczytujemy wybor w formie A1,A2..
        h = dodaj(wybor, p, & g); //dodajemy wartosc do pola, zwracajac stan gry przy okazji
        if (h == 1 || h == 2)
            plansza(p, g);


    }

    if (h == 1)
        printf("WYGRALES!");
    if (h == 2)
        printf("WYGRAL KOMPUTER!");
    if (h == 3)
        printf("REMIS!");
    return EXIT_SUCCESS;
}