人工智能 扫雷 课程设计报告

人工智能project报告

学号：20091000608

姓名：王沙沙

班级：191091

指导老师：赵老师

2011年10月25

目录

1．自动扫雷 (3)

需求分析 (3)

游戏规则 (3)

扫雷游戏设计 (3)

自动扫雷设计 (5)

用户手册 (5)

运行结果 (6)

结论 (7)

主要算法代码 (7)

1 自动扫雷

1．问题描述、需求分析

扫雷是Windows操作系统自带的桌面小游戏之一，由于其规则简单，长期以来一直受到电脑用户的欢迎。自动扫雷是开始扫雷后根据扫雷规则利用计算机进行扫雷。开始棋局，单击第一个按钮，因为执行第一个动作时所有按钮是雷的概率都相等，为了方便起见每次开局后都按下第一个按钮，如果不幸第一个按钮就是雷，那么单击--开始--重新开局。

2.游戏规则

游戏界面如下图所示，游戏区域是由M X N个格子组成的“雷区”，左上方的数字显示雷区中未被标出的地雷的个数，右上方的数字显示用户从第一次点击开始所用的时间，单位是秒。中间的图标指示游戏的状态(完成：笑脸；失败：哭脸)。用户需要通过鼠标操作来确定雷区中所有地雷的位置：

左键单击：尝试某个格子是否有

地雷。如果该格子下有地雷，则游戏

失败·如果该格子下没有地雷但其周

围八个格子下有地雷，该格子会显示

其周围八个格子中地雷的个数；如果

该格子下没有地雷且其周围八个格子

下也没有地雷，则此处被挖开。右键

单击：改变某个格子是否有雷的标志

(工)。或左右键同时单击：当该格子

周围已标地雷的个数与格子中的数字

相同时，则挖开周围的其余格子。当

提示该格子周围已标地雷的个数少于

格子;

3.扫雷游戏设计

每个格子有如下几种状态：

{MS_NORMAL,MS_OPEN,MS_FLAG,MS_QUEST,MS_EXPLODE} MINESTATUS

1）格子类

共有变量如下：

MINESTATUS m_nStatus;//格子状态

int m_nMineNum;//格子周围的雷数，即格子上显示的数字

CWnd *m_pParent;//父窗口

int m_nX,m_nY; //按下按钮的横纵坐标

成员函数

SetStatus(MINESTATUS nStatus)//设置状态

GetStatus()//获取状态

SetMineNum(int nMineNum)//设置雷数

GetMineNum() //获取雷数

DrawItem(BOOL bFail=TRUE);//绘制格子

2）布雷类

共有变量如下

int m_nRow,m_nCol;//棋盘有多少行多少列

int m_nMineNum; //棋盘上的雷数

int m_nX,m_nY; //棋盘的位置

int m_nOldMine;

int m_aMineTest[9];

int m_nMineTest;

CMineButton *m_aLandMine[10000]; //棋盘

CWnd *m_pParent;

成员函数

Create(int nRow,int nCol,int nMineNum,int nX,int nY,CWnd *pParent);

Reset(int nRow,int nCol,int nMineNum);//重新布局

ReDraw(BOOL bFail);//刷新棋局

LButtonDown(CPoint point);//左键按下

BothButtonDown(CPoint point);//左键与右键同时按下

RButtonDown(CPoint point);//右键按下

MouseMove(CPoint point,int bBothDown);//鼠标移动

LButtonUp(CPoint point);//左键弹起

BothButtonUp(CPoint point);//左键与右键同时弹起

OpenMine(int nCurMine);//开局函数

IsSuccess(); //判断是否扫雷成功

RndBtShdDn(int nCurMine);

GetMineNum()//获取棋盘的雷数

GetRight(int nCurMine)//获取四邻域的中心点像素正右方像素点的位置 GetLeft(int nCurMine)//获取四邻域的中心点像素正下左像素点的位置 GetTop(int nCurMine)//获取四邻域的中心点像素正上方像素点的位置

GetBot(int nCurMine)//获取四邻域的中心点像素正下方像素点的位置3）布雷算法：

首先定义一个n*n的二维数组，该数组的i-1到i+1，j-1到j+1除去i,j本身。值为周围有几个雷。如果该数组的值为10则本身是雷。然后自动生成m个雷，让这m个雷分布在界面上。被选中的值i，j点的值为10，从i-1到i+1，从j-1到j+1的值都+1；然后在界面上想办法区分出n*n个格子，然后把格子的坐标和二维数组关联起来做扫雷那首先一定是生成一个矩阵，比如10*10的区域，里面再用数字来表示有没有雷用一个结构体数组保存雷的隐藏，翻开和标志情况关于你所说的扩展，我想是不是数组的边界问题？到了数组边界上，遇到下标越界错误，为矩阵再加一道边界比如你要生成3*3的雷区，而实际上，需要定义5*5的数组，而数组的四周定义为没有雷的空地，如下：0代表空地,1代表雷

00000

01010

00100

00000

00000

搜索的时候就在数组中间这3*3的区域内进行，比如点击了ime(2,2)的区域，也就是显示出来的雷区中的第一块空地，则程序首先需要判断这里有没有雷,然后再计算周围八个区域的雷的情况，将累加结果放到这个区域内，如下：If ime(2,2)=1 then

踩到地雷的代码

else'没踩到地雷

for i=1 to 3

for j=1 to 3

if i=2 and j=2 then next

imesum=imesum+ime(i,j)

j++ i++ 这样就统计出了该区域周围雷的数量.

4)为程序添加背景音乐

PlaySound(MAKEINTRESOURCE(IDR_WAVE1),::GetModuleHandle(NULL), SND_ASYNC|SND_RESOURCE|SND_NODEFAULT|SND_LOOP);

注意：要播放背景音乐必须加入以下两个头文件

#include //导入声音头文件

#pragma comment(lib, "WINMM.LIB")//导入声音头文件库

4. 自动扫雷设计

在第一次点击前，所有格子下面有地雷的概率相同，因此随意点击任何一个即可，定义一个IsChange变量，用于循环扫雷。

当某个格子(X)显示的数字(Mine(X))等于它周围被标为地雷的格子的个数，那么它周围未被标示的格子下一定没有地雷。此时可以单击它周围初始状态的格子，或者同时左、右键单击这个显示数字格子。

如果中心点的格子数值与周围不知状态的格子数相等，那么它周围没有被标为地雷的格子下面一定有地雷。此时可以右键单击它周围没有被标为地雷的格子。

以上两步分别对应一个for循环，第一重循环用于标识肯定是雷的格子（即插旗子），第二重循环用于寻找中心点的格子数值与周围不知状态的格子数相等的格子（即根据第一重循环的结果，找到肯定不是雷的格子并单击），如果第一重循环执行了插旗子的动作IsChange=1，第二种循环如果执行了单击的动作IsChange=1；当IsChange！=0时一直执行上两重循环，直到扫完为止，或者出现猜的情况（踩到雷的情况只有在第一步时才有可能出现，也就是说如果第一步不是雷，那么接下来的整盘棋都不会踩到雷）。

4．用户手册

运行程序，单击游戏-->开始正常情况下可以扫雷成功，偶然情况即出现猜的情况时给出提示对话框；

程序运行结果：

第一次就踩到雷扫雷成功

扫雷出现猜的情况如下：

结论：此扫雷算法大部分情况可以完成扫雷任务；

主要算法程序代码：

void CMineDlg::OnCommandRestart()

{

bFail = FALSE;

if(bStart)

KillTimer(1);

bStart = FALSE;

LandMine.Reset(LandMine.GetRow(),LandMine.GetCol(),LandMine.GetMineN um());

TimeCount.SetNumber(0);

MineCount.SetNumber(LandMine.GetMineNum());

m_Face.SetBitmap(&m_FaceNormal);

RedrawWindow();

int i,j;

int MineNum=LandMine.GetMineNum();

int IsChange;//用于退出循环

int t,Num,Num1;//Num用于存储获取8邻域MS_EXPLODE状态的个数，t 用于获取8领域点的位置

int AllItem=LandMine.GetRow()*LandMine.GetCol(); //获得棋盘的大小，即一位数组的长度

OnLButtonDown(1,CPoint(LandMine.m_aLandMine[0]->m_nX,LandMine.m_a LandMine[0]->m_nY)); //每次都是按下第一个按钮，因为第一次按下哪个概率都是相等的

OnLButtonUp(1,CPoint(LandMine.m_aLandMine[0]->m_nX,LandMine.m_aLan dMine[0]->m_nY));

while(MS_EXPLODE && LandMine.m_aLandMine[1]->m_nStatus==MS_NORMAL&&LandMine.m_aLand Mine[10]->m_nStatus==MS_NORMAL)

{

if (LandMine.m_aLandMine[0]->m_nStatus==MS_EXPLODE) break;

LandMine.Reset(LandMine.GetRow(),LandMine.GetCol(),LandMine.GetMineN um());

OnLButtonDown(1,CPoint(LandMine.m_aLandMine[0]->m_nX,LandMine.m_a LandMine[0]->m_nY)); //每次都是按下第一个按钮，因为第一次按下哪个概率都是相等的

OnLButtonUp(1,CPoint(LandMine.m_aLandMine[0]->m_nX,LandMine.m_aLandMi ne[0]->m_nY));

}

do

{ //第一种情况

IsChange=0;

for (i=0;i

{

Num=0; //每次在累加的时候千万别忘记初始化

if (LandMine.m_aLandMine[i]->m_nStatus==MS_OPEN && LandMine.m_aLandMine[i]->m_nMineNum>0) //对于打开的按钮来说

{

t=LandMine.GetLeft(i);//4邻域

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus!=MS_OPEN)

Num++;

t=LandMine.GetTop(i);

if (t>=0)

{

if (LandMine.m_aLandMine[t]->m_nStatus!=MS_OPEN)

Num++;

t=LandMine.GetLeft(LandMine.GetTop(i));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus!=MS_OPEN)

Num++;

t=LandMine.GetRight(LandMine.GetTop(i));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus!=MS_OPEN)

Num++;

}

t=LandMine.GetRight(i);

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus!=MS_OPEN)

Num++;

t=LandMine.GetBot(i);

if (t>=0)

{

if (LandMine.m_aLandMine[t]->m_nStatus!=MS_OPEN)

Num++;

t=LandMine.GetLeft(LandMine.GetBot(i));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus!=MS_OPEN)

Num++;

t=LandMine.GetRight(LandMine.GetBot(i));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus!=MS_OPEN)

Num++;

}

if (Num>0 && Num==LandMine.m_aLandMine[i]->m_nMineNum)

{

t=LandMine.GetLeft(i);//4邻域

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnRButtonDown(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_a LandMine[t]->m_nY));

OnRButtonUp(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

MineNum--;

IsChange=1;

}

t=LandMine.GetTop(i);

if (t>=0)

{

if

(LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnRButtonDown(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_a LandMine[t]->m_nY));

OnRButtonUp(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

MineNum--;

IsChange=1;

}

t=LandMine.GetLeft(LandMine.GetTop(i));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnRButtonDown(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_a LandMine[t]->m_nY));

OnRButtonUp(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

MineNum--;

IsChange=1;

}

t=LandMine.GetRight(LandMine.GetTop(i));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnRButtonDown(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_a LandMine[t]->m_nY));

OnRButtonUp(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

MineNum--;

IsChange=1;

}

}

t=LandMine.GetRight(i);

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnRButtonDown(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_a LandMine[t]->m_nY));

OnRButtonUp(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

MineNum--;

IsChange=1;

}

t=LandMine.GetBot(i);

if (t>=0)

{

if

(LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnRButtonDown(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_a LandMine[t]->m_nY));

OnRButtonUp(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

MineNum--;

IsChange=1;

}

t=LandMine.GetLeft(LandMine.GetBot(i));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnRButtonDown(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_a LandMine[t]->m_nY));

OnRButtonUp(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

MineNum--;

IsChange=1;

}

t=LandMine.GetRight(LandMine.GetBot(i));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnRButtonDown(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_a LandMine[t]->m_nY));

OnRButtonUp(2,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

MineNum--;

IsChange=1;

}

}

}

}

}

//第二种情况

for (j=0;j

{

Num1=0; //每次在累加的时候千万别忘记初始化

if (LandMine.m_aLandMine[j]->m_nStatus==MS_OPEN && LandMine.m_aLandMine[j]->m_nMineNum>0) //对于打开并显示数字的按钮来说

{

t=LandMine.GetLeft(j);//4邻域

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_FLAG)

Num1++;

t=LandMine.GetTop(j);

if (t>=0)

{

if (LandMine.m_aLandMine[t]->m_nStatus==MS_FLAG)

Num1++;

t=LandMine.GetLeft(LandMine.GetTop(j));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_FLAG)

Num1++;

t=LandMine.GetRight(LandMine.GetTop(j));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_FLAG)

Num1++;

}

t=LandMine.GetRight(j);

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_FLAG)

Num1++;

t=LandMine.GetBot(j);

if (t>=0)

{

if (LandMine.m_aLandMine[t]->m_nStatus==MS_FLAG)

Num1++;

t=LandMine.GetLeft(LandMine.GetBot(j));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_FLAG)

Num1++;

t=LandMine.GetRight(LandMine.GetBot(j));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_FLAG)

Num1++;

}

if (Num1>0 && Num1==LandMine.m_aLandMine[j]->m_nMineNum)

{

t=LandMine.GetLeft(j);//4邻域

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnLButtonDown(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aL andMine[t]->m_nY));

OnLButtonUp(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

IsChange=1;

}

t=LandMine.GetTop(j);

if (t>=0)

{

if

(LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnLButtonDown(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aL andMine[t]->m_nY));

OnLButtonUp(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

IsChange=1;

}

t=LandMine.GetLeft(LandMine.GetTop(j));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnLButtonDown(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aL andMine[t]->m_nY));

OnLButtonUp(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

IsChange=1;

t=LandMine.GetRight(LandMine.GetTop(j));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnLButtonDown(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aL andMine[t]->m_nY));

OnLButtonUp(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

IsChange=1;

}

}

t=LandMine.GetRight(j);

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnLButtonDown(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aL andMine[t]->m_nY));

OnLButtonUp(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

IsChange=1;

}

t=LandMine.GetBot(j);

if (t>=0)

{

if

(LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnLButtonDown(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aL andMine[t]->m_nY));

OnLButtonUp(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

IsChange=1;

}

t=LandMine.GetLeft(LandMine.GetBot(j));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

OnLButtonDown(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aL andMine[t]->m_nY));

OnLButtonUp(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

IsChange=1;

}

t=LandMine.GetRight(LandMine.GetBot(j));

if (t>=0 && LandMine.m_aLandMine[t]->m_nStatus==MS_NORMAL)

{

OnLButtonDown(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aL andMine[t]->m_nY));

OnLButtonUp(1,CPoint(LandMine.m_aLandMine[t]->m_nX,LandMine.m_aLan dMine[t]->m_nY));

IsChange=1;

}

}

}

}

}

}while (IsChange);

CTSDlg dlg;

if (MineNum!=0 && LandMine.m_aLandMine[0]->m_nStatus!=MS_EXPLODE)

dlg.DoModal();

}