假设有一个像棋盘一样的方格网,每个方格中放置一个生命细胞,生命细胞只有两种状态:“生”或“死”。游戏规则如下:
1. 假如一个细胞四周有3个细胞为生(一个细胞四周共有8个细胞),则该细胞为生,即该细胞若原先为死,则转为生,若原先为生,则保持不变;
2. 假如一个细胞四周有2个细胞为生,则该细胞的生死状态保持不;
3. 在其它情况下,该细胞为死,即该细胞若原先为生,则转为死,若原先为死,则保持不变。
依此规则进行迭代变化,使细胞生生死死,会得到一些有趣的结果。该游戏之所以被称为“生命游戏”,是因为其简单的游戏规则,反映了自然界中的生存规律:假如一个生命,其四周的同类生命太少的话,会因为得不到帮助而死亡;假如太多,则会因为得不到足够的资源而死亡。
用计算机模拟这个“生命游戏”也相当简单,可以用一个M×N像素的图像来代表M×N个细胞,其中每一个像素,代表一个细胞,像素为黑色表示细胞为生,像素为白色代表细胞为死。
设定图像中每个像素的初始状态后依据上述的游戏规则演绎生命的变化,由于初始状态和迭代次数不同,将会得到令人叹服的美丽图案。
下面给出的小程序是用TC2.0编写。演示100×100个生命细胞初始状态全为生时的变代情况,变化时边缘细胞不参与变化。随着迭代次数的不同,在屏幕显示的图案出色纷呈,像万花筒般引人入胜。
#include
main(){
int orgData[100][100],resData[100][100];/*分别记录每次迭代的初始和结果状态*/
int nCount,nRows,nCols,i,j,times; /*times记录迭代次数*/
int GraphDriver=DETECT,GraphMode;
for (i=0;i<100;i++) /*初始化数据,令每一个细胞为生*/
for (j=0;j<100;j++) orgData[i][j]=1;
initgraph(&GraphDriver,&GraphMode,′′′′); /*初始化屏幕显示*/
setcolor(WHITE);
rectangle(270,190,370,290); /*作显示边框*/
for (times=1;times<200;times++){
for (nRows=1;nRows<99;nRows++) {
for (nCols=1;nCols<99;nCols++){
/*计算每一个细胞四周的活的细胞数*/
nCount=orgData[nRows-1][nCols-1]+orgData[nRows-1][nCols]
+orgData[nRows-1][nCols+1]+orgData[nRows][nCols-1]
+orgData[nRows][nCols+1]+orgData[nRows+1][nCols-1]
+orgData[nRows+1][nCols]+orgData[nRows+1][nCols+1];
switch(nCount){
/*四周有3个活细胞,该细胞为生,在屏幕上用黑色像素表示*
case 3: putpixel(nCols+210,120+nRows,BLACK);
resData[nRows][nCols]=1;break;
/*四周有2个活细胞,该细胞不变,在屏幕显示也不变*/
case 2: resData[nRows][nCols]=orgData[nRows][nCols];
break;
/*其它情况下,细胞为死,在屏幕上用白色像素表示*/
default:resData[nRows][nCols]=0;
putpixel(nCols+210,120+nRows,WHITE);
}
}
}
for (i=1;i<99;i++)
for (j=1;j<99;j++) orgData[i][j]=resData[i][j];
getch();
}
}
在计算机上运行上述程序,得到迭代次数为45、69、74、78、97、116、119和156时的运行结果。
在实际模拟时,可以取更多的生命细胞,也可以考虑生命细胞的初始状态是依一定概率设定的随机状态,变化时也可以让边缘细胞参与变化。
只要对上述程序略作更改,就会得到另外一系列美妙绝伦的图案。