#if _MSC_VER>=1900
#include "stdio.h"
_ACRTIMP_ALT FILE* __cdecl __acrt_iob_func(unsigned);
#ifdef __cplusplus
extern "C"
#endif
FILE* __cdecl __iob_func(unsigned i) {
return __acrt_iob_func(i);
}
#endif /* _MSC_VER>=1900 */
#include<graphics.h>
#include<stdio.h>
#include<time.h>
#include<stdlib.h>
#include<conio.h>
#include<vector>
#include<string.h>
#include<windows.h>
using namespace std;
int map[5][5], score = 0;
char score_s[15],c;
const char* name = "2048";
const char* gg = "Game over.Your score is:";
const char*goon = "Continue?(y/n)";
void init()
{
initgraph(480, 480);
setbkcolor(WHITE);
setcolor(BLACK);
cleardevice();
settextstyle(15, 15, _T("幼圆"));
for (int i = 1; i <= 4; i++)
for (int j = 1; j <= 4; j++)
map[i][j] = 0;
srand((unsigned)time(NULL));
}
void create()
{
vector<int>blank;
blank.clear();
for (int i = 1; i <= 4; i++)
for (int j = 1; j <= 4; j++)
{
if (map[i][j] == 0)
blank.push_back((i - 1) * 4 + j);
}
if (blank.size() != 0)
{
int pos = rand() % blank.size();
int x = (blank[pos] - 1) / 4 + 1;
int y = blank[pos] - (x - 1) * 4;
map[x][y] = 2;
}
}
bool judge_w(int j)
{
bool flag = false;
for (int i = 1; i <= 3; i++)
{
if (map[i][j] != 0 && map[i][j] == map[i + 1][j])
{
flag = true;
break;
}
}
for (int i = 2; i <= 4; i++)
{
if (map[i][j] != 0 && map[i - 1][j] == 0)
{
flag = true;
break;
}
}
return flag;
}
bool judge_s(int j)
{
bool flag = false;
for (int i = 4; i >= 2; i--)
{
if (map[i][j] != 0 && map[i][j] == map[i - 1][j])
{
flag = true;
break;
}
}
for (int i = 1; i <= 3; i++)
{
if (map[i][j] != 0 && map[i + 1][j] == 0)
{
flag = true;
break;
}
}
return flag;
}
bool judge_a(int i)
{
bool flag = false;
for (int j = 2; j <= 4; j++)
{
if (map[i][j] != 0 && map[i][j] == map[i][j - 1])
{
flag = true;
break;
}
}
for (int j = 3; j >= 1; j--)
{
if (map[i][j + 1] != 0 && map[i][j] == 0)
{
flag = true;
break;
}
}
return flag;
}
bool judge_d(int i)
{
bool flag = false;
for (int j = 4; j >= 2; j--)
{
if (map[i][j] != 0 && map[i][j] == map[i][j - 1])
{
flag = true;
break;
}
}
for (int j = 1; j <= 3; j++)
{
if (map[i][j + 1] == 0 && map[i][j] != 0)
{
flag = true;
break;
}
}
return flag;
}
void move_w(int j)
{
for (int i = 1; i <= 3; i++)
if (map[i][j] == map[i + 1][j] && map[i][j] != 0)
{
map[i][j] *= 2;
score += map[i][j];
map[i + 1][j] = 0;
}
for (int i = 2; i <= 4; i++)
if (map[i][j] != 0 && map[i - 1][j] == 0)
{
map[i - 1][j] = map[i][j];
map[i][j] = 0;
}
}
void move_s(int j)
{
for (int i = 4; i >= 2; i--)
if (map[i][j] != 0 && map[i][j] == map[i - 1][j])
{
map[i][j] *= 2;
score += map[i][j];
map[i - 1][j] = 0;
}
for (int i = 1; i <= 3; i++)
if (map[i][j] != 0 && map[i + 1][j] == 0)
{
map[i + 1][j] = map[i][j];
map[i][j] = 0;
}
}
void move_a(int i)
{
for (int j = 2; j <= 4; j++)
{
if (map[i][j] != 0 && map[i][j] == map[i][j - 1])
{
map[i][j - 1] *= 2;
score += map[i][j];
map[i][j] = 0;
}
}
for (int j = 3; j >= 1; j--)
{
if (map[i][j + 1] != 0 && map[i][j] == 0)
{
map[i][j] = map[i][j + 1];
map[i][j + 1] = 0;
}
}
}
void move_d(int i)
{
for (int j = 4; j >= 2; j--)
{
if (map[i][j] != 0 && map[i][j] == map[i][j - 1])
{
map[i][j] *= 2;
score += map[i][j];
map[i][j - 1] = 0;
}
}
for (int j = 1; j <= 3; j++)
{
if (map[i][j + 1] == 0 && map[i][j] != 0)
{
map[i][j + 1] = map[i][j];
map[i][j] = 0;
}
}
}
bool gameover()
{
bool final[5];
for (int i = 1; i <= 4; i++)
if (judge_a(i) == false && judge_d(i) == false && judge_w(i) == false && judge_s(i) == false)
final[i] = false;
return final[1] == false && final[2] == false && final[3] == false && final[4] == false;
}
void nextgame()
{
cleardevice();
Sleep(1000);
outtextxy(80, 160, _T(gg));
sprintf_s(score_s, "%d", score);
outtextxy(240, 215, _T(score_s));
outtextxy(140, 270, _T(goon));
while (1)
{
c = _getch();
if (c == 'y')
{
score = 0;
init();
break;
}
else if (c == 'n')
{
closegraph();
exit(0);
}
}
}
void print()
{
cleardevice();
for (int i = 1; i <= 4; i++)
for (int j = 1; j <= 4; j++)
{
outtextxy(210, 0, _T(name));
sprintf_s(score_s, "%d", score);
outtextxy(400, 0, _T(score_s));
rectangle(115 * i - 95, 115 * j - 95, 115 * i, 115 * j);
char N[6];
sprintf_s(N, "%d", map[i][j]);
if (map[i][j] != 0)
outtextxy(115 * j - 55, 115 * i - 55, _T(N));
}
}
void game()
{
c = _getch();
switch (c)
{
case 'w':
for (int j = 1; j <= 4; j++)
while (1)
{
if (judge_w(j) == false)
break;
move_w(j);
};
break;
case 's':
for (int j = 1; j <= 4; j++)
while (1)
{
if (judge_s(j) == false)
break;
move_s(j);
};
break;
case 'a':
for (int i = 1; i <= 4; i++)
while (1)
{
if (judge_a(i) == false)
break;
move_a(i);
};
break;
case 'd':
for (int i = 1; i <= 4; i++)
while (1)
{
if (judge_d(i) == false)
break;
move_d(i);
};
break;
default:break;
}
}
void main()
{
init();
while (1)
{
create();
if (gameover())
nextgame();
print();
game();
}
}
