#include <stdio.h> #include <stdlib.h> #include <unistd.h>  #define TTY_PATH "/dev/tty" #define STTY_ON "stty raw -echo -F" #define STTY_OFF "stty -raw echo -F"  int map[4][4];  typedef struct node {  int x;  int y;  int num; }Node; Node node;  void init_map()//初始化全部方格 {  int i, j;  for(i=0; i<4; i++)   for(j=0; j<4; j++)    map[i][j] = 0; }  void new_node()//新增方格，避免重復。 {  int x = 0, y = 0 ,num = 0;  do{  int fals = 1;  int i,j;  for(i=0; i<4; i++)   for(j=0; j<4; j++)    if(map[i][j] == 0)     fals =0;  if(fals)//新方格無法被填入，游戲失敗  {   system("clear");   printf("game over!!!!!!!!!!!/n");   exit(0);  }   x = rand() % 4;  y = rand() % 4;  num = rand() % 2;   if(num == 0)   num = 3;  else if(num == 1)   num = 5;   }while(map[x][y] > 0);   node.x = x;   node.y = y;   node.num = num;   map[x][y] = node.num; }  void show()//彩色打印數字 {  int i, j;  for(i=0; i<4; i++)  {   for(j=0; j<4; j++)   {    if(map[i][j]%2 == 1)    {     map[i][j] -= 1;     printf("/33[31m%d/33[0m/t",map[i][j]);    }    else if(map[i][j] == 0)    {     printf("%d/t",map[i][j]);    }    else if(map[i][j] == 2)    {     printf("/33[32m%d/33[0m/t",map[i][j]);    }    else if(map[i][j] == 4)    {     printf("/33[33m%d/33[0m/t",map[i][j]);    }    else if(map[i][j] == 8)    {     printf("/33[34m%d/33[0m/t",map[i][j]);    }    else if(map[i][j] == 16)    {     printf("/33[35m%d/33[0m/t",map[i][j]);    }    else if(map[i][j] == 32)    {     printf("/33[36m%d/33[0m/t",map[i][j]);    }    else    {     printf("/33[44m%d/33[0m/t",map[i][j]);    }   }   printf("/n");  } } void left() {  int i, j, z, tmp;  for(i=0; i<4; i++)//全體方格左移   for(j=0; j<4; j++)    if(map[i][j] == 0 )     for(z = j + 1; z<4; z++)      if(map[i][z] > 0)      {       tmp = map[i][j];       map[i][j] = map[i][z];       map[i][z] = tmp;       break;      }  for(i=0; i<4; i++)//如果方格數字相同則，相加，通過主函數多次調用，排列好   for(j=0; j<4; j++)    if(map[i][j] > 0 )     for(z = j + 1; z<4; z++)      if(map[i][z] > 0)       if(map[i][z] == map[i][j])       {        map[i][j] *= 2;        map[i][z] = 0;       }else        break;      else       break;    else     break; }  void right() {  int i, j, z, tmp;  for(i=0; i<4; i++)   for(j=3; j>=0; j--)    if(map[i][j] == 0 )     for(z = j-1; z>=0; z--)      if(map[i][z] > 0)      {       tmp = map[i][j];       map[i][j] = map[i][z];       map[i][z] = tmp;       break;      }  for(i=0; i<4; i++)   for(j=3; j>=0; j--)    if(map[i][j] > 0 )     for(z = j-1; z>=0; z--)      if(map[i][z] > 0)       if(map[i][z] == map[i][j])       {        map[i][j] *= 2;        map[i][z] = 0;       }else        break;      else       break;    else     break; } void up() {  int i, j, z, tmp;  for(i=0; i<4; i++)   for(j=0; j<4; j++)    if(map[j][i] == 0 )     for(z = j+1; z<4; z++)      if(map[z][i] > 0)      {       tmp = map[j][i];       map[j][i] = map[z][i];       map[z][i] = tmp;       break;      }  for(i=0; i<4; i++)   for(j=0; j<4; j++)    if(map[j][i] > 0 )     for(z = j+1; z<4; z++)      if(map[z][i] > 0)       if(map[z][i] == map[j][i])       {        map[j][i] *= 2;        map[z][i] = 0;       }else        break;      else       break;    else     break; } void down() {  int i, j, z, tmp;  for(i=0; i<4; i++)   for(j=3; j>=0; j--)    if(map[j][i] == 0 )     for(z = j-1; z>=0; z--)      if(map[z][i] > 0)      {       tmp = map[j][i];       map[j][i] = map[z][i];       map[z][i] = tmp;       break;      }  for(i=0; i<4; i++)   for(j=3; j>=0; j--)    if(map[j][i] > 0 )     for(z = j-1; z>=0; z--)      if(map[z][i] > 0)       if(map[z][i] == map[j][i])       {        map[j][i] *= 2;        map[z][i] = 0;       }else        break;      else       break;    else     break; } void move(char ch) {  switch(ch)  {   case 'a':    left();    break;   case 'd':    right();    break;   case 'w':    up();    break;   case 's':    down();    break;  } }  char in_direct()//非堵塞輸入 {  fd_set fd;  struct timeval tv;  char ch;  FD_ZERO(&fd);  FD_SET(0, &fd);  tv.tv_sec = 0;  tv.tv_usec = 10;  if(select(1, &fd ,NULL, NULL, &tv) > 0)  {     ch = getchar();  }   return ch; } int main() {  srand(time(NULL));  init_map();  new_node();  show();  char ch;  int i=0;  while(1)  {   system(STTY_ON TTY_PATH);   ch = in_direct();   system(STTY_OFF TTY_PATH);   if(ch=='a'||ch=='d'||ch=='s'||ch=='w')   {    system("clear");    for(i=0;i<3;i++)//重復多次才能排序好     move(ch);    new_node();    show();       }   if(ch=='q')//退出游戲   {    system("clear");    printf("game over!!!!!!!!/n");    break;   }   usleep(500000);  }  return 0; }