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

#define ROW 4
#define COL ROW

#define KEY1           224
#define KEY_LEFT    75
#define KEY_UP       72
#define KEY_RIGHT 77
#define KEY_DOWN 80

int g_sgap = 0;

/*
應(yīng)用市場(chǎng)下載2048
如果需要圖形界面,需要加界面庫(kù)
*/

//在數(shù)組arr產(chǎn)生一個(gè)新的數(shù)字
void GetNewVal(int arr[ROW][COL])
{
 srand( (unsigned)time( NULL ) + g_sgap++);
 int x = rand()%ROW;//行下標(biāo),保證不越界
 int y = rand()%COL;//列下標(biāo),保證不越界

 int newval = 2;
 if(x == 0)//75%的概率為2,25%的概率為4
 {
  newval = 4;
 }

 //找到空閑的格子
 while(arr[x][y] != 0)//該格子已經(jīng)有值,todo有可能死循環(huán)
 {
  y++;
  if(y == COL)//
  {
   y = 0;
   x = (x+1)%ROW;//下一行
  }
 }

 arr[x][y] = newval;
}

//打印
void Show(int arr[ROW][COL])
{
 system("cls");
 for(int i=0; i<ROW;i++)
 {
  for(int j=0;j<COL;j++)
  {
   printf("%4d",arr[i][j]);
  }
  printf("\n");
 }
}

//顯示開(kāi)始界面
void Start(int arr[ROW][COL])
{
 //獲取兩個(gè)數(shù)字,然后顯示界面
 GetNewVal(arr);
 GetNewVal(arr);

 Show(arr);
}

//獲取鍵值,左:1,上:2,右:3,下:4,其它:0
int GetButton()
{
 int key1 = 0;//第一個(gè)鍵值
 int key2 = 0;//第二個(gè)鍵值
 while(1)
 {
  if(_kbhit())
  {
   key1 = _getch();//獲得第一個(gè)鍵值
   if(key1 == KEY1)//0xE0
   {
    key2 = _getch();//獲取第二個(gè)鍵值
    if(key2 == KEY_LEFT)
    {
     return 1;
    }
    else if(key2 == KEY_UP)
    {
     return 2;
    }
    else if(key2 == KEY_RIGHT)
    {
     return 3;
    }
    else if(key2 == KEY_DOWN)
    {
     return 4;
    }
   }
  }
  Sleep(100);//睡眠,讓出CPU,避免忙等待
 }
}

//向左合并
bool MergeLeft(int arr[ROW][COL])
{
 int x1 = -1;//第一個(gè)需要合并的數(shù)字下標(biāo)
 
 bool flg = false;//當(dāng)前沒(méi)有有效合并(沒(méi)有數(shù)據(jù)合并,也沒(méi)有數(shù)據(jù)移動(dòng))

 for(int i=0;i<ROW;i++)
 {
  x1 = -1;
  //第一步,合并相同的數(shù)字
  for(int j=0;j<COL;j++)
  {
   if(arr[i][j]!=0)
   {
    if(x1 == -1)//該行第一個(gè)非0的值
    {
     x1 = j;
    }
    else//當(dāng)前第二個(gè)需要處理的值
    {
     if(arr[i][j] == arr[i][x1])//合并,將x1下標(biāo)的值*2,j下標(biāo)的值置為0
     {
      arr[i][x1] *= 2;
      arr[i][j] = 0;
      x1 = -1;
      flg = true;
     }
     else//第一個(gè)值和第二個(gè)值不等,
     {
      x1 = j;
     }
    }
   }

  }

  //第二步,移動(dòng)數(shù)字
  int index = 0;//當(dāng)前可以放數(shù)據(jù)的下標(biāo)
  for(int j=0;j<COL;j++)
  {
   if(arr[i][j]!=0)//需要移動(dòng)數(shù)據(jù)
   {
    if(index != j)
    {
     arr[i][index] = arr[i][j];
     arr[i][j] = 0;
     index++;
     flg = true;
    }
    else
    {
     index++;
    }
   }
  }
 }
 return flg;
}

//游戲是否結(jié)束
//1.沒(méi)有空閑單元格
//2.相鄰沒(méi)有相同的數(shù)字
bool IsGameOver(int arr[ROW][COL])
{
 //判斷有沒(méi)有空閑單元格
 int activeCell = 0;//統(tǒng)計(jì)空閑單元格數(shù)量
 for(int i=0;i<ROW;i++)
 {
  for(int j=0;j<COL;j++)
  {
   if(arr[i][j] == 0)
   {
    activeCell++;
   }
  }
 }
 if(activeCell != 0)
 {
  return false;
 }

 //相鄰是否有相同的數(shù)字,只需要判斷右邊和下邊
 for(int i=0;i<ROW;i++)
 {
  for(int j=0;j<COL;j++)
  {
   //if(arr[i][j]==arr[i][j+1] || arr[i][j] == arr[i+1][j])
   if(j+1<COL&&arr[i][j]==arr[i][j+1] || i+1<ROW&&arr[i][j]==arr[i+1][j])
   {
    return false;
   }
  }
 }
 return true;
}

void Run(int arr[ROW][COL])
{
 int bt;
 bool rt = false;
 while(1)
 {
  bt = GetButton();

  if(bt == 1)//方向鍵左
  {
   rt = MergeLeft(arr);
   if(rt)
   {
    GetNewVal(arr);
    Show(arr);
    if(IsGameOver(arr))
    {
     return ;
    }
   }
  }
 }

}

int main()
{
 int arr[ROW][COL] = {0};

 Start(arr);

 Run(arr);

 return 0;
}


int main1()
{
 int a = 0;
 while(1)
 {
  if(_kbhit())
  {
   a = _getch();//getchar();
   printf("鍵值是:%d\n",a);
  }
 }
 return 0;
}


/*
int main()
{
 srand( (unsigned)time( NULL ) );


 for(int i=0;i<10;i++)
 {
  printf("%d ",rand());
 }
 printf("\n");

 return 0;
}
*/