#include <graphics.h>
#include <conio.h>
#include <time.h>
#include <stdio.h>
#include <windows.h>
#pragma comment(lib,"winmm.lib")
/* 【自学去】网站收集 http://www.zixue7.com */
//150 150 12 7 21 易
//60 100 16 9 32 中
//100 120 14 8 28 难
#define leftedge 150 //游戏区距左边框距离
#define topedge 150 //游戏区距上边框距离
#define COL 12 //游戏区列数
#define ROW 7 //游戏区行数
#define GridNum 21 //游戏图片数目
#define GridW 42 //游戏图片的长
#define GridH 48 //游戏图片的宽
#define N 555 //开屏大小(宽)
#define M 785 //开屏大小(长)
IMAGE image[GridNum + 1][2]; //图片库
IMAGE image2; //填充图片
int GridID[ROW + 2][COL + 2]; //游戏图纸
MOUSEMSG mouse; //记录鼠标信息
struct GridInfor //记入击中图片信息
{
int idx,idy; //图纸坐标
int leftx,lefty; //屏幕坐标
int GridID; //图片类型
}pre,cur,dur;
struct //记录连线点
{
int x;
int y;
}point[4];
static int pn; //记录连线点个数
void InitFace (); //初始化界面
void Shuffle (); //随即打乱图片
void ShowGrid (); //显示图片
void RandGrid (); //绘制地图
void Link (); //连接两图
void Des_direct (); //直接相消
void Des_one_corner(); //一折相消
void Des_two_corner(); //两折相消
void Load_picture (); //加载图片
void Init_Grid (GridInfor& pre); //初始化格子信息
void Leftbottondown (MOUSEMSG mouse); //实现鼠标左击效果
void Draw_frame (int leftx,int lefty); //绘制边框
void Mousemove (int leftx,int lefty); //实现鼠标移动效果
bool Judg_val (int leftx,int lefty); //判断鼠标是否在游戏区
void SeleReact (int leftx,int lefty); //显示选中效果
void TranstoPhycoor (int* idx,int* idy); //图纸坐标转变为屏幕坐标
void GridPhy_coor (int& leftx,int& lefty); //规范物理坐标
void iPaint (long x1,long y1,long x2,long y2); //将直线销毁
void DrawLine (int x1,int y1,int x2,int y2) ; //用直线连接两图
bool DesGrid (GridInfor pre,GridInfor cur); //判断两者是否能相消
bool Match_direct (POINT ppre,POINT pcur); //判断两者是否能够直接相消
bool Match_one_corner (POINT ppre,POINT pcur); //判断两者是否能一折相消
bool Match_two_corner (POINT ppre,POINT pcur); //判断两者是否能两折相消
void ExchaVal (GridInfor& pre,GridInfor& cur); //交换图片信息
bool Single_click_judge (int mousex,int mousey); //判断单击是否有效
void RecordInfor (int leftx,int lefty,GridInfor &grid); //记录选中的信息
void TranstoDracoor (int mousex,int mousey,int *idx,int *idy); //鼠标坐标转化为图纸坐标
void Explot (POINT point,int *left,int *right,int *top,int *bottel);//探索point点附近的空位置
void main()
{
initgraph(M,N);
mciSendString("play game_begin.mp3 repeat", NULL, 0, NULL);
InitFace();
while(1)
{
mouse = GetMouseMsg();
switch(mouse.uMsg)
{
case WM_MOUSEMOVE:
Mousemove(mouse.x,mouse.y); break;
case WM_LBUTTONDOWN:
if(Single_click_judge(mouse.x,mouse.y))
{
Leftbottondown(mouse);
} break;
default: break;
}
}
closegraph();
}
////////////////////////////////////////生成操作//////////////////////////////
void RandGrid() //产生图片的标记
{
for(int iCount = 0, x = 1; x <= ROW; ++x )
{
for( int y = 1; y <= COL; ++y )
{
GridID[x][y] = iCount++ % GridNum + 1;
} } }
void Shuffle( ) //打乱棋盘
{
int ix, iy, jx, jy, grid;
for( int k = 0; k < 84; ++k )
{
ix = rand() % ROW + 1; // 产生 1 - COL 的随机数
iy = rand() % COL + 1; // 产生 1 - ROW 的随机数
jx = rand() % ROW + 1; // 产生 1 - COL 的随机数
jy = rand() % COL + 1; // 产生 1 - ROW 的随机数
if( GridID[ix][iy] != GridID[jx][jy] ) //如果不相等就交换数据
{
grid = GridID[ix][iy];
GridID[ix][iy] = GridID[jx][jy];
GridID[jx][jy] = grid;
} } }
////////////////////////////////初始化界面///////////////////////////////////////
void InitFace()
{
srand((unsigned)time(NULL));
Load_picture();
RandGrid();
IMAGE image3;
loadimage(&image3,"res\\bg.bmp");
putimage(0,0,&image3);
getimage(&image2,3 * 42,2 * 48,42, 48);
Shuffle();
ShowGrid();
}
void Load_picture() //加载图片
{
IMAGE image1,background;
loadimage(&image1,"IMAGE","grids");
SetWorkingImage(&image1);
for(int i = 1 ;i < GridNum + 1 ;i ++)
for(int j = 0;j < 2;j++)
getimage(&image[i][j],j * 42,i * 48,42, 48);
loadimage(&background,"IMAGE","bg");
SetWorkingImage(&background);
getimage(&image2,3 * 42,2 * 48,42, 48);
SetWorkingImage();
putimage(0,0,&background);
}
void ShowGrid()
{
int idx,idy;
for(int i = 0 ;i < ROW; i ++)
for(int j = 0 ;j < COL ; j++)
{
idy = i * 48 + topedge ,idx = j * 42 + leftedge;
putimage(idx,idy,&image[GridID[i + 1][j + 1]][0]);
} }
/////////////////////////////////鼠标操作////////////////////////////////////////
void Mousemove (int leftx,int lefty) //鼠标移动时的变化
{
static int prex,prey,preidx,preidy, curidx,curidy;
if(Judg_val(leftx,lefty))
{
TranstoDracoor(leftx,lefty,&curidx,&curidy); //转化为图纸坐标
if(GridID[curidy][curidx] != 0)
{
GridPhy_coor(leftx,lefty);
if(pre.idx == preidx && pre.idy == preidy)
putimage(prex,prey,&image[GridID[preidy][preidx]][1]);
else
putimage(prex,prey,&image[GridID[preidy][preidx]][0]);
prex = leftx, prey = lefty;
preidx = curidx, preidy = curidy;
Draw_frame(leftx,lefty); //绘制边框
} } }
void Leftbottondown (MOUSEMSG mouse) //左击时的变化
{
static int click = 0, idx,idy;
click++;
SeleReact (mouse.x,mouse.y); //显示选中效果
if(click == 1) RecordInfor(mouse.x,mouse.y,pre);
if(click == 2)
{
TranstoDracoor (mouse.x,mouse.y,&idx,&idy);
if(idx != pre.idx || idy != pre.idy)
{
RecordInfor (mouse.x,mouse.y,cur);
if(pre.GridID == cur.GridID && DesGrid(pre,cur))
{
GridID[pre.idy][pre.idx] = GridID[cur.idy][cur.idx] =0;
Link (); pn = 0;
putimage(pre.leftx,pre.lefty,&image2);
putimage(cur.leftx,cur.lefty,&image2);
Init_Grid(pre); Init_Grid(cur); click = 0;
}
else
{
ExchaVal(dur,pre); ExchaVal(pre,cur);
Init_Grid(cur); click = 1;
putimage(dur.leftx,dur.lefty,&image[GridID[dur.idy][dur.idx]][0]);
} }
else click = 1;
} }
void SeleReact (int leftx,int lefty) //选中时效果
{
if(Judg_val(leftx,lefty))
{
int idx,idy;
TranstoDracoor (leftx,lefty,&idx,&idy);
GridPhy_coor (leftx,lefty);
putimage(leftx,lefty,&image[GridID[idy][idx]][1]);
} }
bool Judg_val(int leftx,int lefty) //判断鼠标是否在游戏区
{
return leftx > leftedge && leftx < leftedge + GridW * COL &&
lefty > topedge && lefty < topedge + GridH * ROW;
}
void TranstoDracoor (int mousex,int mousey ,int *idx,int *idy) //鼠标坐标转化为图纸坐标
{
if(Judg_val(mousex,mousey))
{
*idx = (mousex - leftedge) / 42 + 1;
*idy = (mousey - topedge) / 48 + 1 ;
} }
void RecordInfor(int leftx,int lefty,GridInfor &grid) //记录选中的信息
{
TranstoDracoor(leftx,lefty,&grid.idx,&grid.idy);
grid.leftx = (grid.idx - 1) * 42 + leftedge;
grid.lefty = (grid.idy - 1) * 48 + topedge;
grid.GridID = GridID[grid.idy][grid.idx];
}
bool Single_click_judge (int mousex,int mousey) //判断单击是否有效
{
int idx,idy;
TranstoDracoor (mousex,mousey,&idx,&idy); //转化为图纸坐标
if(Judg_val(mouse.x,mouse.y) && GridID[idy][idx] != 0)
return true;
return false;
}
void Draw_frame(int leftx,int le