#include<graphics.h>
#include<bits/stdc++.h>
#define KEY_DOWN(VK_NONAME) ((GetAsyncKeyState(VK_NONAME) & 0x8000)? 1 : 0)
using namespace std;
int MAP[3][3];
bool mus_state = 0;
typedef struct {
int x;
int y;
} position; //不是坐标轴的x,y，而是行和列
string DX(string s) {
string res = "";
for (int i = s.size() - 1; i >= 0; i--)
res += s[i];
return res;
}
string int_to_string(int i) {
string res = "";
while (i % 10 != i) {
res += i % 10 + '0';
i /= 10;
}
res += i + '0';
return DX(res);
}
void print_score(int score, int x = 0, int y = 0) {
string s = int_to_string(score);
for (int i = 0; i < s.size(); i++) {
switch (s[i]) {
case '0':
outtextxy(x + 10 * i, y, L"0");
break;
case '1':
outtextxy(x + 10 * i, y, L"1");
break;
case '2':
outtextxy(x + 10 * i, y, L"2");
break;
case '3':
outtextxy(x + 10 * i, y, L"3");
break;
case '4':
outtextxy(x + 10 * i, y, L"4");
break;
case '5':
outtextxy(x + 10 * i, y, L"5");
break;
case '6':
outtextxy(x + 10 * i, y, L"6");
break;
case '7':
outtextxy(x + 10 * i, y, L"7");
break;
case '8':
outtextxy(x + 10 * i, y, L"8");
break;
case '9':
outtextxy(x + 10 * i, y, L"9");
break;
default:
outtextxy(x + 10 * i, y, L"Error");
break;
}
}
}
bool is_win();
void init_map() {
bool b[9] = {0};
randomize();
for (int i = 0; i < 3; i++) {
for (int j = 0; j < 3; j++) {
do {
MAP[i][j] = random(9);
} while (b[MAP[i][j]] != 0);
b[MAP[i][j]] = 1;
}
}
if (is_win()) init_map();
}
void draw_map() {
int x[9] = {200, 280, 360, 200, 280, 360, 200, 280, 360};
int y[9] = {120, 120, 120, 200, 200, 200, 280, 280, 280};
setcolor(BLACK);
for (int i = 0; i < 9; i++) {
rectangle(x[i], y[i], x[i] + 80, y[i] + 80);
}
}
void draw_number() {
int x[9] = {200, 280, 360, 200, 280, 360, 200, 280, 360};
int y[9] = {120, 120, 120, 200, 200, 200, 280, 280, 280};
setfont(70, 35, L"Lucida Console");
for (int i = 0; i < 3; i++) {
for (int j = 0; j < 3; j++) {
if (MAP[i][j] != 0) print_score(MAP[i][j], x[i * 3 + j] + 2, y[i * 3 + j] + 2);
else outtextxy(x[i * 3 + j] + 2, y[i * 3 + j] + 2, L" ");
}
}
}
void move_map() {
position p;
for (int i = 0; i < 3; i++) {
for (int j = 0; j < 3; j++) {
if (MAP[i][j] == 0) {
p.x = i;
p.y = j;
}
}
}
if (KEY_DOWN(VK_RIGHT)) {
if (p.y != 0) {
swap(MAP[p.x][p.y], MAP[p.x][p.y - 1]);
}
}
if (KEY_DOWN(VK_LEFT)) {
if (p.y != 2) {
swap(MAP[p.x][p.y], MAP[p.x][p.y + 1]);
}
}
if (KEY_DOWN(VK_DOWN)) {
if (p.x != 0) {
swap(MAP[p.x][p.y], MAP[p.x - 1][p.y]);
}
}
if (KEY_DOWN(VK_UP)) {
if (p.x != 2) {
swap(MAP[p.x][p.y], MAP[p.x + 1][p.y]);
}
}
}
bool is_win() {
for (int i = 0; i < 3; i++) {
for (int j = 0; j < 3; j++) {
if (MAP[i][j] != i * 3 + j + 1 && MAP[i][j] != 0) return 0;
}
}
return 1;
}
void win() {
cleardevice();
setfont(80, 40, L"Lucida Console");
outtextxy(200, 200, L"WIN!!!");
Sleep(1000);
getch();
}
int main() {
initgraph(640, 480);
setcaption(L"数字华容道");
setbkcolor(WHITE);
MUSIC mus;
mus.OpenFile(L"Piano.mp3");
mus.Play();
init_map();
draw_map();
draw_number();
setfont(20, 10, L"Lucida Console");
outtext(L"按N静音");
outtextxy(0, 20, L"按M重置");
outtextxy(0, 40, L"按B退出");
for (;;) {
move_map();
draw_number();
if (KEY_DOWN('N')) {
if (mus_state == 0) {
mus_state = 1;
mus.Pause();
} else {
mus_state = 0;
mus.Play();
}
}
if (KEY_DOWN('M')) {
init_map();
draw_map();
draw_number();
}
if (KEY_DOWN('B')) {
return 0;
}
if (is_win()) {
break;
}
if (mus.GetLength() == mus.GetPosition()) {
mus.Close();
mus.OpenFile(L"Piano.mp3");
mus.Play();
}
Sleep(100);
}
win();
closegraph();
return 0;
}
