#include <iostream>

struct ListOfRows {
    int SizeOfList = 0;
    struct RowOfSteps {
        int IndexOfRow = 0;
        int SizeOfRow = 0;
        struct Step {
            int x1;
            int y1;
            int x2;
            int y2;
            bool murder;
            Step* pNext;
        };
        RowOfSteps* pNext = nullptr;
        Step* HeadOfRow = nullptr;
        void AddStep(int x1, int y1, int x2, int y2, bool murder) {
            Step* X = new Step;
            X->murder = murder;
            X->pNext = nullptr;
            if (HeadOfRow == nullptr) {
                HeadOfRow = X;
            }
            else {
                Step* Last = HeadOfRow;
                while (Last->pNext) {
                    Last = Last->pNext;
                }
                Last->pNext = X;
            }
            X->x1 = x1;
            X->y1 = y1;
            X->x2 = x2;
            X->y2 = y2;
            ++SizeOfRow;
        }
        Step* Get(int index) {
            Step* Current = HeadOfRow;
            int k = 0;
            while (k < index) {
                Current = Current->pNext;
                ++k;
            }
            return Current;
        }
        void PrintAllSteps() {
            Step* Current = HeadOfRow;
            while (Current) {
                if (Current->murder) {
                    std::cout << Current->x1 << ":" << Current->y1 << "->(Murder)" <<//Together
                        Current->x2 << ":" << Current->y2 << "|"; //Together
                }
                else {
                    std::cout << Current->x1 << ":" << Current->y1 //Together
                        << "->" << Current->x2 << ":" << Current->y2 << "|"; //Together
                }
                Current = Current->pNext;
            }
        }
    };
    RowOfSteps* HeadOfList = nullptr;
    RowOfSteps* TailOfList = nullptr;
    RowOfSteps* GetPtrOfRow(int index) {
        RowOfSteps* Current = HeadOfList;
        int k = 0;
        while (k < index) {
            Current = Current->pNext;
            ++k;
        }
        return Current;
    }
    void AddRow(int index) {
        RowOfSteps* X = new RowOfSteps;
        X->IndexOfRow = index;
        X->pNext = nullptr;
        if (HeadOfList == nullptr) {
            HeadOfList = X;
        }
        else {
            RowOfSteps* Last = HeadOfList;
            while (Last->pNext) {
                Last = Last->pNext;
            }
            Last->pNext = X;
        }
        TailOfList = X;
        ++SizeOfList;
    }
    void PrintAllRows() {
        RowOfSteps* Current = HeadOfList;
        while (Current) {
            std::cout << "(Row " << Current->IndexOfRow << "): ";
            Current->PrintAllSteps();
            Current = Current->pNext;
        }
    }
};

int main() {
    int numberofcells;
    std::cout << "Input size of table: ";
    std::cin >> numberofcells; std::cout << "\n";
    //
    char** mTable = new char*[numberofcells];
    for (int i = 0; i < numberofcells; ++i) {
        mTable[i] = new char[numberofcells];
        for (int j = 0; j < numberofcells; ++j) {
            mTable[i][j] = '-';
        }
    }
    //Создание матрицы^
    int k = 0;
    for (int i = 0; i < numberofcells/2 - 1; ++i) {
        ++k;
        for (int j = 0; j < numberofcells; ++j) {
            if (k % 2 == 0) {
                mTable[i][j] = 'B';
            }
            ++k;
        }
    }
    //Заполнение матрицы черными шашками^
    k = -1;
    for (int i = numberofcells - 1; i > numberofcells / 2; --i) {
        ++k;
        for (int j = 0; j < numberofcells; ++j) {
            if (k % 2 == 0) {
                mTable[i][j] = 'W';
            }
            ++k;
        }
    }
    //Заполнение матрицы белыми фигурами^
    for (int i = 0; i < numberofcells; ++i) {
        for (int j = 0; j < numberofcells; ++j) {
            std::cout << mTable[i][j] << " ";
        }
        std::cout << "\n";
    }
    //Вывод матрциы^
    std::cout << "\n";
    ListOfRows ListPlayer1;
    ListOfRows ListPlayer2;
    ListPlayer1.AddRow(1);
    bool playing = true;
    bool whiteturn = true;
    int answer;
    while (playing) {
        std::cout << "Input action ( 1-Step; 2-Exit ): ";
        std::cin >> answer;
        if (answer == 1) {
            int x1, x2, y1, y2;
            std::cout << "Input x1 y1 -> x2 y2 : "; std::cin >> x1 >> y1 >> x2 >> y2; std::cout << "\n";
            bool murder = false;
            //
            if (x1 + 2 == x2 && y1 + 2 == y2) {
                if (mTable[x1 + 1][y1 + 1] != mTable[x1][x2]) {
                    mTable[x1 + 1][y1 + 1] = '-';
                    murder = true;
                }
            }
            else if (x1 + 2 == x2 && y1 - 2 == y2) {
                if (mTable[x1 + 1][y1 - 1] != mTable[x1][x2]) {
                    mTable[x1 + 1][y1 - 1] = '-';
                    murder = true;
                }
            }
            else if (x1 - 2 == x2 && y1 + 2 == y2) {
                if (mTable[x1 - 1][y1 + 1] != mTable[x1][x2]) {
                    mTable[x1 - 1][y1 + 1] = '-';
                    murder = true;
                }
            }
            else if (x1 - 2 == x2 && y1 - 2 == y2) {
                if (mTable[x1 - 1][y1 - 1] != mTable[x1][x2]) {
                    mTable[x1 - 1][y1 - 1] = '-';
                    murder = true;
                }
            }
            //Проверка на убийство^
            if (mTable[x1][y1] == 'B' && whiteturn == true) {
                whiteturn = false;
                ListPlayer2.AddRow(ListPlayer2.SizeOfList + 1);
                ListPlayer2.TailOfList->AddStep(x1, y1, x2, y2, murder);
                mTable[x2][y2] = 'B';
            }
            else if (mTable[x1][y1] == 'W' && whiteturn == false) {
                whiteturn = true;
                ListPlayer1.AddRow(ListPlayer1.SizeOfList + 1);
                ListPlayer1.TailOfList->AddStep(x1, y1, x2, y2, murder);
                mTable[x2][y2] = 'W';

            }
            else if (mTable[x1][y1] == 'B' && whiteturn == false) {
                ListPlayer2.TailOfList->AddStep(x1, y1, x2, y2, murder);
                mTable[x2][y2] = 'B';
            }
            else if (mTable[x1][y1] == 'W' && whiteturn == true) {
                ListPlayer1.TailOfList->AddStep(x1, y1, x2, y2, murder);
                mTable[x2][y2] = 'W';
            }
            //Запись хода в историю^
            mTable[x1][y1] = '-';
        }
        else {
            playing = false;
        }
        std::cout << "Player1: "; ListPlayer1.PrintAllRows(); std::cout << "\n";
        std::cout << "Player2: "; ListPlayer2.PrintAllRows(); std::cout << "\n";
        //Вывод истории^
        for (int i = 0; i < numberofcells; ++i) {
            for (int j = 0; j < numberofcells; ++j) {
                std::cout << mTable[i][j] << " ";
            }
            std::cout << "\n";
        }
        //Вывод матрицы^
    }
}