/**
 * fifteen.c
 *
 * CS50 AP
 * Fifteen
 *
 * Implements Game of Fifteen (generalized to d x d).
 *
 * Usage: fifteen d
 *
 * whereby the board's dimensions are to be d x d,
 * where d must be in [DIM_MIN,DIM_MAX]
 *
 * Note that usleep is obsolete, but it offers more granularity than
 * sleep and is simpler to use than nanosleep; `man usleep` for more.
 *
 * Extra features including printing an actual grid to make it look more
 * tile-like, and using ANSI color sequences for some additional customizing
 *
 * Implement init./Implement draw./Implement move./Implement won.
 **/

#define _XOPEN_SOURCE 500

#include <cs50.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>

// constants
#define DIM_MIN 3
#define DIM_MAX 9

// ansi escape sequence to print grid color
// replace the number beteen [ and m with 31 for red, 32 for green, 33 for brown,
// 34 for blue, 35 for purple, 36 for cyan, 37 for gray
#define COLOR "\033[32m"

// board
int board[DIM_MAX][DIM_MAX];
int b1[DIM_MAX][DIM_MAX];
//_ thing at the end
string u = "_";
int a;
int b;

// dimensions
int d;

// saved locations of the blank tile
int blank_row;
int blank_col;

// prototypes
void clear(void);
void greet(void);
void init(void);
void draw(void);
bool move(int tile);
bool won(void);
void swap(int *a, int *b);
void print_grid_row(int d);
void print_tile(int tile);

int main(int argc, string argv[])
{
    // ensure proper usage
    if (argc != 2)
    {
        printf("Usage: fifteen d\n");
        return 1;
    }

    // ensure valid dimensions
    d = atoi(argv[1]);
    if (d < DIM_MIN || d > DIM_MAX)
    {
        printf("Board must be between %i x %i and %i x %i, inclusive.\n",DIM_MIN, DIM_MIN, DIM_MAX, DIM_MAX);
        return 2;
    }

    // open log
    FILE *file = fopen("log.txt", "w");
    if (file == NULL)
    {
        return 3;
    }

    // greet user with instructions
    greet();

    // initialize the board
    init();

    // accept moves until game is won
    while (true)
    {
        // clear the screen
        clear();

        // draw the current state of the board
        draw();

        // log the current state of the board (for testing)
        for (int i = 0; i < d; i++)
        {
            for (int j = 0; j < d; j++)
            {
                fprintf(file, "%i", board[i][j]);
                if (j < d - 1)
                {
                    fprintf(file, "|");
                }
            }
            fprintf(file, "\n");
        }
        fflush(file);

        // check for win
        if (won())
        {
            printf("ftw!\n");
            break;
        }

        // prompt for move
        printf("Tile to move: ");
        int tile = get_int();

        // quit if user inputs 0 (for testing)
        if (tile == 0)
        {
            break;
        }

        // log move (for testing)
        fprintf(file, "%i\n", tile);
        fflush(file);

        // move if possible, else report illegality
        if (!move(tile))
        {
            printf("\nIllegal move.\n");
            usleep(500000);
        }

        // sleep thread for animation's sake
        usleep(50000);
    }

    // close log
    fclose(file);

    // success
    return 0;
}

/**
 * Clears screen using ANSI escape sequences.
 */
void clear(void)
{
    printf("\033[2J");
    printf("\033[%d;%dH", 0, 0);
}

/**
 * Greets player.
 */
void greet(void)
{
    clear();
    printf("WELCOME TO GAME OF FIFTEEN\n");
    usleep(2000000);
}

/**
 * Initializes the game's board with tiles numbered 1 through d*d - 1       d = int dimensions
 * (i.e., fills 2D array with values but does not actually print them).
 */
void init(void)
{
    int value = d*d - 1;
    //int a;
    //int b;

    //rows (except the last row)
    for (a=0; a < d-1; a++) //repeats how many rows there are (d number of times
    {
        for (b = 0; b < d; b ++) //assign number in just 1 row and column
        {
            board[a][b] = value--;
        }
    }
    //last row except _
    for (b = 0; b < d-1; b ++) //assign number in just 1 row and column
    {
        board[a][b] = value--;
    }
    //IF D IS EVEN, SWAP 2 AND 1
    int x;
    if (d%2 == 0)
    {
        x = board[d-1][d-3];            //store variable
        board[d-1][d-3] = board[d-1][d-2];    //swap unstored variable to right place
        board[d-1][d-2] = x;
    }
}

/**
 * Prints the board in its current state.
 **/
void draw(void)
{
    for (a = 0; a < d; a++) //for each row
    {
        for (b = 0; b < d; b++) //for each column
        {
            if (board[a][b] != 0) //if it's any value other than _
            {
                printf(" %2i", board[a][b]);
            }
            else
            {
                printf("  %s", u); //print _
            }
        }
        printf("\n"); //print new line
    }
}

/**
 * If tile borders empty space, moves tile and returns true, else returns false.
 */
bool move(int tile)
{
    int x;
    //int a;
    //int b;
    for (int i = 0; i < d; i++) //for each row
    {
        for (int j = 0; j < d; j++) //for each column
        {
            if (board[i][j] == 0)
            {
                x = board[i][j];
                a = i;
                b = j;
            }
        }
    }
    if (tile == board[a-1][b])
    {
        board[a-1][b] = x;
        board[a][b] = tile;
    }
    if (tile == board[a][b+1])
    {
        board[a][b+1] = x;
        board[a][b] = tile;
    {
    if (tile == board[a+1][b])
    {
        board[a+1][b] = x;
        board[a][b] = tile;
    }
    if (tile == board[a][b-1])
    {
        board[a][b-1] = x;
        board[a][b] = tile;
    }
    return true;
}
/**
 * Returns true if game is won (i.e., board is in winning configuration),
 * else false.
 **/

bool won(void);
    int order = 1;
    int i;
    int j;
    for (i = 0; i < d; i++)              //for making an array
    {
        for (j = 0; j < d; j++)
        {
            if (board[i][j] == order)       //if board equals value of order
            {
                order++;                       //increase value of order
            }
            else
            {
                if (board[d-1][d-1] == 0)
                {
                    return true;
                }
                return false;
            }
        }
    }
 /*   else if (board[i][j] != 0)      //if board doesn't equal value of order
    {
        return false;                   //return false
    }
    else if (board[i][j] == 0)
    {
        return true;
    }
    else                            //if board equals 0
    {
        return true;                        //return true
   */ //return true after running thru the code */
}
}