对对碰c语言程序设计,C语言对对碰游戏源码分享

//画素材的x和y都是反的，因为x表示行,但是画出来x表示列，y同

#include

#include

#include

#include

#include

#include

#pragma comment(lib, "Winmm.lib")

using namespace std;

/***************定义枚举类型*****************/

enum color{blank, red, yellow, blue, green, white, orange, purple, shizijia, zhadan, qicai, alarm};

/***************定义全局变量***************/

const int MaxT = 12; // 时间上限

const int T = 10 * MaxT;// 时间速度

const int V = 300; // 停留时间

clock_t start, now; // 控制时间

color gem[9][8]; // 地图

// IMAGE对象

IMAGE img[12], music_img[2], exit_img, jindutiao;

int Score, Time; // 成绩 时间

bool Flag, Music = true;// 是否加载 音乐

/*******************函数声明******************/

void load(void); // 加载IMAGE对象

void Blank(void); // 清空

bool soso(void); // 搜索空格

bool baidu(void); // 搜索解法

void New(void); // 更新

void print(void); // 输出

bool judge(void); // 判断是否可以消除

void fall(void); // 下落

void draw(void); // 消除

bool quit(void); // 是否重新开始

void play(void); // 游戏过程

/********************定义函数****************/

void load(void)

{

char c[20];

int i;

// 加载IMAGE对象

for (i = 0; i < 12; i++)

{

ostrstream strout(c, 50);

strout <

loadimage(&img[i], c);

}

loadimage(&music_img[0], "图片\音乐关.jpg");

loadimage(&music_img[1], "图片\音乐开.jpg");

loadimage(&exit_img, "图片\退出.jpg");

loadimage(&jindutiao, "图片\进度条.jpg");

// 加载音乐

mciSendString("open 背景音乐.mp3 alias mymusic", NULL, 0, NULL);

// 随机种子

srand(unsigned(time(NULL)));

// 打开文件

ifstream fin("存档.dat");

if (!fin)

throw -1; // 如果打开失败则抛出异常

// 读存档

fin >>Flag >>Music;

if (Flag)

{

HWND wnd = GetHWnd();

SetWindowText(wnd, "对对碰");

if (MessageBox(wnd, "是否继续上次游戏？", "游戏开始", MB_YESNO | MB_ICONQUESTION) == IDYES)

{

fin >>Score >>Time;

for (i = 0; i < 9; i++)

for (int j = 0; j < 8; j++)

{

int t;

fin >>t;

gem[i][j] = color(t);

}

}

else

Flag = false;

}

fin.close();

}

void Blank(void)

{

for (int i = 1; i < 9; i++)

for (int j = 0; j < 8; j++)

gem[i][j] = blank;

print();

fall();

}

bool soso(void)

{

for (int i = 1; i < 9; i++)

for (int j = 0; j < 8; j++)

if (gem[i][j] == blank)

return true;

return false;

}

bool baidu(void)

{

int i, j;

color t;

bool flag = false;

// 如果有一个道具则返回真

for (i = 1; i < 9; i++)

for (j = 0; j < 8; j++)

if (gem[i][j] >= shizijia)

return true;

// 搜索解法

for (i = 1; i < 9; i++)

for (j = 0; j < 7; j++)

{

t = gem[i][j];

gem[i][j] = gem[i][j + 1];

gem[i][j + 1] = t;

if (judge())

flag = true;

t = gem[i][j];

gem[i][j] = gem[i][j + 1];

gem[i][j + 1] = t;

if (flag)

return true;

}

for (i = 1; i < 7; i++)

for (j = 0; j < 8; j++)

{

t = gem[i][j];

gem[i][j] = gem[i + 1][j];

gem[i + 1][j] = t;

if (judge())

flag = true;

t = gem[i][j];

gem[i][j] = gem[i + 1][j];

gem[i + 1][j] = t;

if (flag)

return true;

}

return false;

}

void New(void)

{

static int old_score = -1, old_time = T;

bool flag = false;

if (Score != old_score) // 更新分数

{

if (Score > 999999999)

{

if (MessageBox(GetHWnd(), "恭喜你达到了最高分！n是否重新开始？", "游戏结束", MB_YESNO | MB_ICONQUESTION) == IDYES)

Score = 0;

else

exit(0);

}

char s[15];

ostrstream strout(s, 15);

strout <

setfont(30, 0, "微软雅黑");

setcolor(RGB(255, 128, 0));

outtextxy(480, 60, s);

old_score = Score;

flag = true;

}

if (Time != old_time) // 更新时间

{

if (Time > old_time)

putimage(540, 140, &jindutiao);

setcolor(BLACK);

for (int i = 0; i < T - Time; i++)

{

line(540, 140 + 2 * i, 580, 140 + 2 * i);

line(540, 140 + 2 * i + 1, 580, 140 + 2 * i + 1);

}

old_time = Time;

flag = true;

}

if (flag) // 写存档

{

ofstream fout("存档.dat");

fout <

<

<

<

for (int i = 0; i < 9; i++)

{

for (int j = 0; j < 8; j++)

fout <

fout <

}

fout.close();

}

}

void print(void)

{

int i, j;

for (i = 1; i < 9; i++)

for (j = 0; j < 8; j++)

putimage(60 * j, 60 * (i - 1), &img[int(gem[i][j])]);

New();

}

bool judge(void)

{

int i, j;

for (i = 1; i < 9; i++)

for (j = 0; j < 6; j++)

if (gem[i][j] == gem[i][j + 1] && gem[i][j] == gem[i][j + 2])

return true;

for (i = 1; i < 7; i++)

for (j = 0; j < 8; j++)

if (gem[i][j] == gem[i + 1][j] && gem[i][j] == gem[i + 2][j])

return true;

return false;

}

void fall(void)

{

{

int i, j, a[8] = {0};

bool sign = false;

for (j = 0; j < 8; j++)

for (i = 8; i >= 1; i--)

if (gem[i][j] == blank)

{

a[j] = i;

sign = true;

break;

}

if (sign == false)

return;

IMAGE im[8];

for (j = 0; j < 8; j++)

if (a[j] > 1)

getimage(&im[j], 60 * j, 0, 60, 60 * (a[j] - 1));

for (i = 0; i < 60 ; i += 2)

for (j = 0; j < 8; j++)

if (a[j] > 0)

{

if (a[j] > 1)

putimage(60 * j, i + 2, &im[j]);

putimage(60 * j, i + 2 - 60, &img[int(gem[0][j])]);

Sleep(1);

}

for (j = 0; j < 8; j++)

if (a[j] > 0)

{

for (i = a[j]; i > 0; i--)

gem[i][j] = gem[i - 1][j];

if (rand() % 50 == 0)

gem[0][j] = color(rand() % 4 + 8);

else

gem[0][j] = color(rand() % 7 + 1);

}

} // 加对大括号使递归时撤销内存空间

if (soso())

fall();

if (judge())

draw();

}

void draw(void)

{

{

int i, j;

bool a[9][8] = {false};

for (i = 1; i < 9; i++)

for (j = 0; j < 6; j++)

if (gem[i][j] == gem[i][j + 1] && gem[i][j] == gem[i][j + 2])

a[i][j] = a[i][j + 1] = a[i][j + 2] = true;

for (i = 1; i < 7; i++)

for (j = 0; j < 8; j++)

if (gem[i][j] == gem[i + 1][j] && gem[i][j] == gem[i + 2][j])

a[i][j] = a[i + 1][j] = a[i + 2][j] = true;

for (i = 1; i < 9; i++)

for (j = 0; j < 8; j++)

if (a[i][j])

{

gem[i][j] = blank;

Score += 10;

}

Sleep(V);

Time += T / MaxT;

if (Time > T)

Time = T;

print();

} // 加对大括号使递归时撤销内存空间

fall();

}

bool quit(void)

{

char str[50];

ostrstream strout(str, 50);

strout <

if (MessageBox(GetHWnd(), str, "游戏结束", MB_YESNO | MB_ICONQUESTION) == IDYES)

return true;

return false;

}

void play(void)

{

MOUSEMSG m;

int i, j, x, y, x1, y1;

char fx;

color t;

bool sign;

if (Flag == false)

{

do

{

for (i = 0; i < 9; i++)

for (j = 0; j < 8; j++)

gem[i][j] = color(rand() % 7 + 1);

}while (judge() || !baidu());

Score = 0;

Time = T;

}

setbkcolor(BLACK);

cleardevice();

setfont(30, 0, "微软雅黑");

setcolor(RGB(255, 128, 0));

outtextxy(480, 60, "$ 0");

putimage(480, 400, &music_img[int(Music)]);

putimage(560, 400, &exit_img);

putimage(540, 140, &jindutiao);

print();

now = start = clock();

Flag = true;

do

{

if (soso())

fall();

fx = 0;

sign = true;

while (true)

{

if (MouseHit())

{

m = GetMouseMsg();

x1 = m.x;

y1 = m.y;

if (m.uMsg == WM_LBUTTONDOWN)

{

if (x1 < 480)

{

x = y1 / 60 + 1;

y = x1 / 60;

switch (gem[x][y])

{

case shizijia:

for (i = 1; i < 9; i++)

{

gem[i][y] = blank;

Score += 10;

}

for (j = 0; j < 8; j++)

{

gem[x][j] = blank;

Score += 10;

}

Score -= 20;

Time += T / MaxT;

if (Time > T)

Time = T;

print();

Sleep(V);

fall();

if (!baidu())

Blank();

break;

case zhadan:

if (x > 1)

{

gem[x - 1][y] = blank;

Score += 10;

if (y > 0)

{

gem[x - 1][y - 1] =blank;

Score += 10;

}

}

if (y > 0)

{

gem[x][y - 1] = blank;

if (x < 8)

{

gem[x + 1][y - 1] =blank;

Score += 10;

}

}

if (x < 8)

{

gem[x + 1][y] = blank;

if (y < 7)

{

gem[x + 1][y + 1] =blank;

Score += 10;

}

}

if (y < 7)

{

gem[x][y + 1] = blank;

if (x > 1)

{

gem[x - 1][y + 1] =blank;

Score += 10;

}

}

gem[x][y] = blank;

Time += T / MaxT;

if (Time > T)

Time = T;

print();

Sleep(V);

fall();

if (!baidu())

Blank();

break;

case qicai:

t = color(rand() % 7 + 1);

putimage(60 * y, 60 * (x - 1), &img[int(t)]);

Sleep(V);

for (i = 1; i < 9; i++)

for (j = 0; j < 8; j++)

if (gem[i][j] == t)

{

gem[i][j] = blank;

putimage(60 * j, 60 * (i - 1), &img[0]);

Score += 10;

}

gem[x][y] = blank;

Time += T / MaxT;

if (Time > T)

Time = T;

print();

fall();

if (!baidu())

Blank();

break;

case alarm:

Time = T;

gem[x][y] = blank;

print();

fall();

if (!baidu())

Blank();

break;

}

break;

}

else if (x1 > 480 && x1 < 560 && y1 > 400 && y1 < 480)

{

if (Music)

mciSendString("stop mymusic", NULL, 0, NULL);

else

mciSendString("play mymusic from 0 repeat", NULL, 0, NULL);

Music = !Music;

putimage(480, 400, &music_img[int(Music)]);

}

else if (x1 > 560 && x1 < 640 && y1 > 400 && y1 < 480)

exit(0);

}

}

now = clock();

if (now - start >= CLOCKS_PER_SEC * MaxT / T)

{

start = now;

Time--;

New();

if (Time <= 0)

return;

}

}

while (m.mkLButton && m.y < 480)

{

m = GetMouseMsg();

x = m.x;

y = m.y;

if (x - x1 > 30 || x1 - x > 30 || y - y1 > 30 || y1 - y > 30)

{

sign = false;

break;

}

now = clock();

if (now - start >= CLOCKS_PER_SEC * MaxT / T)

{

start = now;

Time--;

New();

if (Time <= 0)

return;

}

}

if(sign)

{

putimage(x1 - x1 % 60, y1 - y1 % 60, &img[int(gem[y1 / 60 + 1][x1 / 60])], SRCPAINT);

continue;

}

if (y1 - y > 30 && y1 / 60 > 0)

fx = 'u';

if (y - y1 > 30 && y1 / 60 < 7)

fx = 'd';

if (x1 - x > 30 && x1 / 60 > 0)

fx = 'l';

if (x - x1 > 30 && x1 / 60 < 7)

fx = 'r';

x = y1 / 60 + 1;

y = x1 / 60;

x1 = y1 = 0;

switch (fx)

{

case 'u':x1 = -1; break;

case 'd':x1 = 1; break;

case 'l':y1 = -1; break;

case 'r':y1 = 1; break;

case '':continue;

}

for (i = 0; i < 60;)

{

putimage(60 * y, 60 * (x - 1), &img[0]);

putimage(60 * y, 60 * (x - 1), &img[0]);

i += 1;

putimage(60 * (y + y1) - i * y1, 60 * (x - 1 + x1) - i * x1, &img[int(gem[x + x1][y + y1])]);

putimage(60 * y + i * y1, 60 * (x - 1) + i * x1, &img[int(gem[x][y])]);

Sleep(2);

}

t = gem[x][y];

gem[x][y] = gem[x + x1][y + y1];

gem[x + x1][y + y1] = t;

if (judge())

{

draw();

if (!baidu())

Blank();

}

else

{

for (i = 0; i < 60;)

{

putimage(60 * y, 60 * (x - 1), &img[0]);

putimage(60 * y, 60 * (x - 1), &img[0]);

i += 1;

putimage(60 * (y + y1) - i * y1, 60 * (x - 1 + x1) - i * x1, &img[int(gem[x + x1][y + y1])]);

putimage(60 * y + i * y1, 60 * (x - 1) + i * x1, &img[int(gem[x][y])]);

Sleep(2);

}

t = gem[x][y];

gem[x][y] = gem[x + x1][y + y1];

gem[x + x1][y + y1] = t;

}

now = clock();

if (now - start >= CLOCKS_PER_SEC * MaxT / T)

{

start = now;

Time--;

New();

if (Time <= 0)

return;

}

}while (true);

}

/****************主函数******************/

int APIENTRY WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)

{

try

{

// 加载素材

load();

}

catch (int)

{

ofstream fout("存档.dat");

fout <

}

// 打开界面

initgraph(640, 480);

// 游戏过程

do

{

if (Music)

mciSendString("play mymusic from 0 repeat", NULL, 0, NULL);

play();

if (Music)

mciSendString("stop mymusic", NULL, 0, NULL);

Flag = false;

}while (quit());

// 关闭游戏

ofstream fout("存档.dat");

fout <

fout.close();

mciSendString("close mymusic", NULL, 0, NULL);

closegraph();

return 0;

}

/**************THE END****************/