#include <time.h>
#include <stdio.h>
#include <stdlib.h>

int map[1024][1024];
char screen[1024][1024];
int end = 0;
int botState = 0;
int botx = 0;
int boty = 0;
int botMines = 0;
int bolocks = 0;
char botCom[1];
int width = 8;
int height = 8;
int mines = 10;


void generatemap() {
  end = 0;
  for (int a = 0; a < width; a++) {
    for (int c = 0; c < height; c++) {
      screen[a][c]='-';
    }
  }
  for (int b = 0; b < mines; b++) {
    int x = rand()%width;
    int y = rand()%height;
    if (map[x][y] != 1){
      map[x][y] = 1;
    }else{
      b--;
    }
  }
}


void printmap() {
  printf("\e[1;1H\e[2J");
  for (int d = 0; d < height; d++){
    for (int e = 0; e < width; e++){
      if(screen[e][d] == '-'){
        printf("\x1b[90;47m\033[%d;%dH%c",e,d,screen[e][d]);
      }
      if(screen[e][d] == '0'){
        printf("\x1b[90;47m\033[%d;%dH%c",e,d,screen[e][d]);
      }
      if(screen[e][d] == '1'){
        printf("\x1b[94;47m\033[%d;%dH%c",e,d,screen[e][d]);
      }
      if(screen[e][d] == '2'){
        printf("\x1b[32;47m\033[%d;%dH%c",e,d,screen[e][d]);
      }
      if(screen[e][d] == '3'){
        printf("\x1b[91;47m\033[%d;%dH%c",e,d,screen[e][d]);
      }
      if(screen[e][d] == '4'){
        printf("\x1b[34;47m\033[%d;%dH%c",e,d,screen[e][d]);
      }
      if(screen[e][d] == '5'){
        printf("\x1b[31;47m\033[%d;%dH%c",e,d,screen[e][d]);
      }
      if(screen[e][d] == '6'){
        printf("\x1b[36;47m\033[%d;%dH%c",e,d,screen[e][d]);
      }
      if(screen[e][d] == '7'){
        printf("\x1b[30;47m\033[%d;%dH%c",e,d,screen[e][d]);
      }
      if(screen[e][d] == '8'){
        printf("\x1b[90;47m\033[%d;%dH%c",e,d,screen[e][d]);
      }
      if(screen[e][d] == '^'){
        printf("\x1b[91;47m\033[%d;%dH%c",e,d,screen[e][d]);
      }
      if(screen[e][d] == '*'){
        printf("\x1b[30;47m\033[%d;%dH%c",e,d,screen[e][d]);
      }
    }
    //printf("\n");
  }
  printf("\x1b[0m\n");
}



void gameover() {
  for (int a = 0; a < width; a++) {
    for (int c = 0; c < height; c++) {
      if (map[a][c] == 1) {
        screen[a][c]='*';
      }
    }
  }
  printmap();
  printf("GAME OVER!!!\n");
  end=1;
}


void opencell(int x,int y){
  if (screen[x][y] != '-') return;
  if (map[x][y] != 1) {
    int miness = 0;
    for (int f = -1; f <= 1; f++){
      for (int g = -1; g <= 1; g++){
        if (x+f < 0 || x+f >= width || y+g < 0 || y+g >= height) continue;
        if (map[x+f][y+g])miness++;
      }
    }
    screen[x][y] = '0' + miness;
    if (miness == 0) {
      for (int f = -1; f <= 1; f++){
        for (int g = -1; g <= 1; g++){
          if (x+f < 0 || x+f >= width || y+g < 0 || y+g >= height) continue;
          opencell(x+f, y+g);
        }
      }
    }
  }else{
    gameover();
  }
}

void bot(){
  botx = 0;
  boty = 0;
  botMines = 0;
  bolocks = 0;
  botCom[1] = 0;
  for(int x = 0; x < width; x++){
    for(int y = 0; y < height; y++){
      int j = screen[x][y] - '0';
      if (j < 0 || j > 8) continue;

      int marks = 0;
      int unknowns = 0;
      for(int xx = x-1; xx <= x+1; xx++){
        for (int yy = y-1; yy <= y+1; yy++){
          if (xx < 0 || xx >= width || yy < 0 || yy >= height) continue;
          if (screen[xx][yy] == '-') {
            ++unknowns;
            botx = xx;
            boty = yy;
          }
          if (screen[xx][yy] == '^') ++marks;
        }
      }
      if (unknowns == 0) continue;


      if (unknowns+marks == j){
        botCom[0] = 'm';
        return;
      }

      if (marks == j) {
        botCom[0] = 'o';
        return;
      }
    }
  }


  printf("random!\n");
  botCom[0] = 'o';
  while(1) {
    botx = rand()%width;
    boty = rand()%height;
    if (screen[botx][boty] == '-') break;
  }
}

int main(){
  srand(time(NULL));
  printf("Width, Height, Quantity of mines: ");
  scanf("%d %d %d",&width, &height, &mines);
  if (width > 1024){
    width = 1024;
    printf("Error Max Size is 1024\n");
  }
  if (height > 1024){
    height = 1024;
    printf("Error Max Size is 1024\n");
  }
  if (mines > width*height){
    mines = width*height;
    printf("Quantity of mines more than quantity of cell's\n");
  }
  generatemap();
  printf("On Bot(0/1)?: ");
  scanf("%d",&botState);
  end = 0;
  while(end == 0){
    printmap();

    char cmd[100] = {};
    int x = 0, y = 0;

    if (botState == 0){
      printf("enter command (<o|m> <x> <y>): ");
      scanf("%s %d %d", cmd, &y, &x);
    }else{
      bot();
      cmd[0] = botCom[0];
      y = boty;
      x = botx;
      printf("%s %d %d\n", cmd, x, y);
    }

    if (x < 0 || x >= width || y < 0 || y >= height) {
      printf("bad coordinates\n");
    } else
    if (cmd[0] == 'm'){
      if (screen[x][y] == '^') break;
      screen[x][y] = '^';
    } else
    if (cmd[0] == 'o'){
      if (screen[x][y] != '-') break;
      opencell(x,y);
    } else {
      printf("unknown command\n");
      break;
    }

    if (end == 0) {
      end = 1;
      for(int x = 0; x < 8; ++x) {
        for(int y = 0; y < 8; ++y) {
          if (screen[x][y] == '-') end = 0;
          if (map[x][y] && screen[x][y] != '^') end = 0;
          if (!map[x][y] && screen[x][y] == '^') end = 0;
        }
      }
      if (end) {
        printmap();
        printf("WIN!\n");
      }
    }
  }
}