游戏人工智能实验报告四.doc

《游戏人工智能实验报告四.doc》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、word格式实验四有限状态机实验实验报告一、实验目的通过蚂蚁世界实验掌握游戏中追有限状态机算法二、实验仪器Windows7系统MicrosoftVisualStudio2015三、实验原理及过程1）制作菜单设置参数：点击会弹出对话框，设置一些参数，红、黑蚂蚁的家会在地图上标记出来运行：设置好参数后点击运行，毒药、食物、水会在地图上随机显示下一步：2只红蚂蚁和2只黑蚂蚁会随机出现在地图上，窗口右方还会出现红、黑蚂蚁当前数量的统计不断按下一步，有限状态机就会不断运行，使蚁群产生变化2）添加加速键资源视图中下方....word格式选择ID和键值3）新建头文件

2、def.h在AntView.cpp中加入#include"def.h"与本实验有关的数据大都是在这里定义的intflag=0;#definekForage1#definekGoHome2#definekThirsty3#definekDead4#definekMaxEntities200classai_Entity{public:inttype;intstate;introw;intcol;ai_Entity();~ai_Entity(){}voidNew(inttheType,inttheState,inttheRow,inttheCol);void

3、Forage();voidGoHome();voidThirsty();voidDead();};ai_EntityentityList[kMaxEntities];#definekRedAnt1#definekBlackAnt2....word格式intRedHomeRow;intRedHomeCol;intBlackHomeRow;intBlackHomeCol;intRedNum=2;intBlackNum=2;//地图大小，可改变#definekMaxRows30#definekMaxCols40#defineLENGTH20intterrai

4、n[kMaxRows][kMaxCols];#definekGround1#definekWater2#definekBlackHome3#definekRedHome4#definekPoison5#definekFood6//ai_Entity类中函数的定义ai_Entity::ai_Entity(){type=0;state=0;row=0;col=0;}intRnd(intmin,intmax)//不能产生负数{intresult;do{result=rand()%max;}while(result<=min);returnresult;}vo

5、idai_Entity::New(inttheType,inttheState,inttheRow,inttheCol){type=theType;row=theRow;col=theCol;....word格式state=theState;}voidai_Entity::Forage(){introwMove;intcolMove;intnewRow;intnewCol;intfoodRow;intfoodCol;intpoisonRow;intpoisonCol;rowMove=Rnd(-1,3)-1;colMove=Rnd(-1,3)-1;new

6、Row=row+rowMove;newCol=col+colMove;if(newRow<0)return;if(newCol<0)return;if(newRow>=kMaxRows)return;if(newCol>=kMaxCols)return;if((terrain[newRow][newCol]==kGround)

7、

8、(terrain[newRow][newCol]==kWater)){row=newRow;col=newCol;}if(terrain[newRow][newCol]==kFood){row=newRow;col=newCo

9、l;terrain[row][col]=kGround;state=kGoHome;do{foodRow=Rnd(-1,kMaxRows);foodCol=Rnd(-1,kMaxCols);}while(terrain[foodRow][foodCol]!=kGround);terrain[foodRow][foodCol]=kFood;....word格式}if(terrain[newRow][newCol]==kPoison){row=newRow;col=newCol;terrain[row][col]=kGround;state=kDead;d

10、o{poisonRow=Rnd(-1,kMaxRows);poisonCol=Rnd(-1,k