有限状态机分析解析

1、大作业：有限状态机姓名： 班级： 学号：一、实验目的有限状态机，实现书上的蚂蚁实例二、实验仪器Pc vc6.0四、实验结果五、实验心得这次大作业做的比较简单，主要是因为没有用 mfc 做，按着书上一步一步来， 基本能看懂。因为选择了 win32，所以 main 函数的书写参考了网上的代码，全 部的代码的实现过程已经弄懂了。算法还是比较简单的，相比于前几次实验， 代码一步步在书上体现的比较全面。通过大作业的实践，对游戏人工智能有了 更新的认识，毕竟是自己建起来的程序，虽然简单，希望下次能用 mfc 实现。六、主要代码#include ant.h/#include#include#include#

2、include #include ant.cppusing namespace std;ai_World ai_EntityMainWorld; entityListkMaxEntities;intintai_Entity:ai_Entity()intterrainBackupkMaxRowskMaxCols;terrainkMaxRowskMaxCols;i;for (i=0;ikMaxEntities;i+)entityListi.row=0;entityListi.col=0;entityListi.type=0;entityListi.state=0;/* for (i=0;iKBeg

3、Ent;i+)entityListi.New(kRedAnt,)*/entityList0.New(kRedAnt,kForage,5,5); entityList1.New(kRedAnt,kForage,8,5);entityList2.New(kBlackAnt,kForage,5,36);entityList3.New(kBlackAnt,kForage,8,36);/ /ai_Entity:ai_Entity()/ /void ai_Entity:Forage(void)/intintintintintintrowMove; colMove; newRow; newCol;foodR

4、ow; foodCol;intintpoisonRow; poisonCol;rowMove=rand()%3-1;colMove=rand()%3-1;newRow=row+rowMove; newCol=col+colMove;if (newRow1) return;if (newCol=kMaxRows-1) return;if (newCol=kMaxCols-1) return;if (terrainnewRownewCol=kGround) | (terrainnewRownewCol=kWater)row=newRow; col=newCol;if (terrainnewRown

5、ewCol=kFood)row=newRow;col=newCol;terrainrowcol=kGround;state=kGoHome;do /please makesure about the begin and the end/ foodRow=rand()%(kMaxRows-3)+1; foodCol=rand()%(kMaxCols-3)+1; while (terrainfoodRowfoodCol!=kGround); terrainfoodRowfoodCol=kFood;if (terrainnewRownewCol=kPoison) row=newRow; col=ne

6、wCol; terrainrowcol=kGround; state=kDead; do poisonRow=rand()%(kMaxRows-3)+1; poisonCol=rand()%(kMaxCols-3)+1; while (terrainpoisonRowpoisonCol!=kGround); terrainpoisonRowpoisonCol=kPoison;/ /void ai_Entity:Dead(void)/ / type=0; row=0; col=0; state=0;/ /void ai_Entity:Thirsty(void)/ /introwMove;intc

7、olMove;intnewRow;intnewCol;intfoodRow;intfoodCol;intpoisonRow;intpoisonCol;rowMove=rand()%3-1;colMove=rand()%3-1;newRow=row+rowMove;newCol=col+colMove;if (newRow1) return;if (newCol=kMaxRows-1) return;if (newCol=kMaxCols-1) return;if (terrainnewRownewCol=kGround) | (terrainnewRownewCol=kFood) row=ne

8、wRow; col=newCol;if (terrainnewRownewCol=kWater)row=newRow;col=newCol;terrainrowcol=kGround;state=kForage;do foodRow=rand()%(kMaxRows-3)+1; foodCol=rand()%(kMaxCols-3)+1; while (terrainfoodRowfoodCol!=kGround); terrainfoodRowfoodCol=kWater;if (terrainnewRownewCol=kPoison)row=newRow; col=newCol;terra

9、inrowcol=kGround;state=kDead;do poisonRow=rand()%(kMaxRows-3)+1; poisonCol=rand()%(kMaxCols-3)+1; while (terrainpoisonRowpoisonCol!=kGround); terrainpoisonRowpoisonCol=kPoison;/ /void ai_Entity:GoHome(void)/ /introwMove;intcolMove;intnewRow;intnewCol;inthomeRow;inthomeCol;inti;intpoisonRow;intpoison

10、Col;if (type=kRedAnt)homeRow=kRedHomeRow; homeCol=kRedHomeCol;elsehomeRow=kBlackHomeRow; homeCol=kBlackHomeCol;if (rowhomeRow)rowMove=-1;elserowMove=0;if (colhomeCol)colMove=-1;elsecolMove=0;newRow=row+rowMove;newCol=col+colMove;if (newRow1) return;if (newCol=kMaxRows-1) return;if (newCol=kMaxCols-1

11、) return;if (terrainnewRownewCol!=kPoison)row=newRow;col=newCol;elserow=newRow;col=newCol;terrainrowcol=kGround;state=kDead;do poisonRow=rand()%(kMaxRows-3)+1; poisonCol=rand()%(kMaxCols-3)+1; while (terrainpoisonRowpoisonCol!=kGround); terrainpoisonRowpoisonCol=kPoison;if (newRow=homeRow) & (newCol

12、=homeCol)row=newRow;col=newCol;state=kThirsty;for (i=0;ikMaxEntities;i+)if (entityListi.type=0)entityListi.row=homeRow;entityListi.col=homeCol; entityListi.type=type; entityListi.state=kForage; break;/ / /void ai_Entity:New(int theType, int theState, int theRow, int theCol) / /type=theType;row=theRo

13、w;col=theCol;state=theState;/ /ai_World:ai_World()/ /inti;intj;for (i=0;ikMaxRows;i+)for (j=0;jkMaxCols;j+) terrainij=kGround;terrainkRedHomeRowkRedHomeCol=kRedHome; terrainkBlackHomeRowkBlackHomeCol=kBlackHome;for (i=0;ikMaxWater;i+) terrainrand()%(kMaxRows-3)+1rand()%(kMaxCols-3)+1=kWater;for (i=0

14、;ikMaxPoison;i+) terrainrand()%(kMaxRows-3)+1rand()%(kMaxCols-3)+1=kPoison;for (i=0;ikMaxFood;i+) terrainrand()%(kMaxRows-3)+1rand()%(kMaxCols-3)+1=kFood;/for (i=0;ikMaxRows;i+)/ for (j=0;jkMaxCols;j+)/ terrainBackupij=terrainij;/ /ai_World:ai_World()/ / /void ai_World:UpdateWorld(void)/ / int i;for

15、 (i=0;ikMaxEntities;i+)switch (entityListi.state)case kForage: entityListi.Forage(); break;case kGoHome: entityListi.GoHome(); break;case kThirsty: entityListi.Thirsty(); break;case kDead: entityListi.Dead(); break;int main()int again;doint terrain2kMaxRowskMaxCols=0;int row,col;coutGround 2-Water 3-BlackHome 4-redhome 5-poision 6-foodendl;for(int i=1;ikMaxCols;i+)for(int j=1;jkMaxRows;j+)coutterrainij;coutendl;coutthis is the ant location endl;for(int i=0;ikMaxEntities;i+) if(