Flash游戏制作-五子连珠(二)

//显示棋子

_root.display="Xpos:"+(x+1);

temp=chr(y+65);

_root.display1="Ypos:"+temp;

_root.playnow="player";

//判断是否获胜

xx=x;

yy=y;

for(k=0;k<4;k++){

if(_root.a_result<>6){

_root.a_result=0;

x=xx;

y=yy;

while((_root.table[y][x]==2)and(y+_root.dir[k][1]<16)and(x+_root.dir[k][0]>=-1)and(x+_root.dir[k][0]<16)and(y+_root.dir[k][1]>=-1)){

x=x+_root.dir[k][0];

y=y+_root.dir[k][1];

//"_root.table["+y+"]["+x+"]="+_root.table[y][x]

_root.a_result=_root.a_result+1;

}

x=xx;

y=yy;

while((_root.table[y][x]==2)and(y+_root.dir[k+4][1]<16)and(x+_root.dir[k+4][0]>=-1)and(x+_root.dir[k+4][0]<16)and(y+_root.dir[k+4][1]>=-1)){

x=x+_root.dir[k+4][0];

y=y+_root.dir[k+4][1];

_root.a_result=_root.a_result+1;

}

if(_root.a_result==6){

_root.playnow="nobody";

}

}

}

if(_root.playnow=="nobody"){

_root.gameoverman.gotoAndPlay(2);

}

}

C:新建一个Movieclip组件，并命名为bb,此组件用来计算电脑如何走棋，进入组件编辑状态后，在图层layer1绘制一个有填充色的矩形，然后在第5桢插入一个关键桢，在同样位置绘制一个大小相同填充色不同的矩形。新建一个图层，在矩形里输入提示文字：电脑走棋，然后再新建一个图层Action,在第一桢添加AS:stop();,在第8桢插入一个关键桢，在此桢添加如下AS:

if(_root.playnow=="computer"){

//初始化棋盘

_root.func.makelist("white");

_root.func.makelist("black");

//调用自定义函数

max_computer=0;

max_player=0;

k=0;

//定义三变量

for(j=0;j<15;j++){

for(i=0;i<15;i++){

for(k=0;k<4;k++){

if(_puter[j*15+i][k]==max_computer){

rndnum=random(100)+1;

if(rndnum>50){

max_computer=_puter[j*15+i][k];

xc=i;

yc=j;

}

}

if(_puter[j*15+i][k]>max_computer){

max_computer=_puter[j*15+i][k];

xc=i;

yc=j;

}

if(_root.player[j*15+i][k]>max_player){

max_player=_root.player[j*15+i][k];

xp=i;

yp=j;

}

}

}

}if(max_computer>max_player){

x=xc;

y=yc;

}else{

x=xp;

y=yp;

}

//绘制棋子

num=y*15+x;

removeMovieClip(_root.baddnum);

duplicateMovieClip(_root.white,"white"addnum,num+300);

setProperty(_root.whiteaddnum,_x,34.7+x*20);

setProperty(_root.whiteaddnum,_y,34.7+y*20);

_root.table[y][x]=2;

//显示棋子

_root.display="Xpos:"+(x+1);

temp=chr(y+65);

_root.display1="Ypos:"+temp;

_root.playnow="player";

//判断是否获胜

xx=x;

yy=y;

for(k=0;k<4;k++){

if(_root.a_result<>6){

_root.a_result=0;

x=xx;

y=yy;

while((_root.table[y][x]==2)and(y+_root.dir[k][1]<16)and(x+_root.dir[k][0]>=-1)and(x+_root.dir[k][0]<16)and(y+_root.dir[k][1]>=-1)){

x=x+_root.dir[k][0];

y=y+_root.dir[k][1];

//"_root.table["+y+"]["+x+"]="+_root.table[y][x]

_root.a_result=_root.a_result+1;

}

x=xx;

y=yy;

while((_root.table[y][x]==2)and(y+_root.dir[k+4][1]<16)and(x+_root.dir[k+4][0]>=-1)and(x+_root.dir[k+4][0]<16)and(y+_root.dir[k+4][1]>=-1)){

x=x+_root.dir[k+4][0];

y=y+_root.dir[k+4][1];

_root.a_result=_root.a_result+1;

}if(_root.a_result==6){

_root.playnow="nobody";

}

}

}

//游戏结束

if(_root.playnow=="nobody"){

_root.gameoverman.gotoAndPlay(2);

}

}

最后的时间线如图6所示：

图6

D:再新建一个movieclip组件，命名为buttonclip,此组件用来控制双方的落子，进入组件编辑状态后，将前面做好的隐形按钮拖放到编辑区中，然后给第一桢添加AS:stop();.

E:最后再制作一个movieclip,命名为gameover,此组件用来判断游戏是否结束，也就是判断是缶有一方已经连好了五颗棋子。进入组件编辑状态后，连续建立四个图层，分别为layer1,layer2,layer3和action,在layer1,layer2,layer3的第一桢插入空白，然后在第2桢绘制电脑获胜的提示信息，并将Replay按钮拖到编辑区中，给按钮添加As:

on(release){

gotoAndPlay("endit");

}

如图7所示：

图7

在layer1,layer2,layer3的第三桢按照同样的方法设置您胜利的提示信息，如图8所示：

图8然后回到图层action,接下来就要添加具体的控制Action了，在此图层的前三个关键桢分别添加as:stop();,在第四关键桢添加如下AS:

for(i=0;i<=225;i++){

removeMovieClip(_root.blackaddi);

removeMovieClip(_root.whiteaddi);

removeMovieClip(_root.baddi);

}

//清除棋盘上的棋子

_root.gotoAndPlay("run");

//跳转到游戏的开始

最后的时间线如图9所示：

图9

布置主场景：

游戏的主要工作完成后，接下来需要布置主场景了。

首先使用绘图工具绘制出游戏中的棋盘，棋盘大小为15*15的矩阵，然后给棋盘标上横向和纵向的标识，如图10所示：

图10

分别将组件white,black,buttonclip,blk,bb和gameover拖到舞台的合适位置，如图11所示：

图11

组件white的实例名为：black

组件black的实例名为：white

组件buttonclip的实例名为：b

组件blk的实例名为：func

组件bb的实例名为：computerrun

组件gameover的实例名为：gameoverman

然后在棋盘上绘制两个Dynamictext动态文本框，用来显示上一步落子的位置，分别设置变量名为display和display1。

最后，给第一关键祯添加as:

stop();

urls="边城浪子-_blank\\""闪客帝国";

num=0;

table=newArray();

computer=newArray();

player=newArray();

a_result=0;

//Tablearray

for(i=0;i<15;i++){

table[i]=newArray(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0);

}

//Computerandplayertablelistfor(j=0;j<15;j++){

for(i=0;i<15;i++){

computer[j*15+i]=newArray(0,0,0,0);

player[j*15+i]=newArray(0,0,0,0);

}

}

//Makebuttons

count=0;

for(j=0;j<15;j++){

for(i=0;i<15;i++){

duplicateMovieClip(_root.b,"b"addcount,count+30);

setProperty("b"addcount,_x,34.7+i*20);

setProperty("b"addcount,_y,34.7+j*20);

count++;

}

}

//Eightdirections

vardir=newArray();

dir[0]=newArray(1,0);

dir[1]=newArray(1,1);

dir[2]=newArray(0,1);

dir[3]=newArray(-1,1);

dir[4]=newArray(-1,0);

dir[5]=newArray(-1,-1);

dir[6]=newArray(0,-1);

dir[7]=newArray(1,-1);

playnow="player";

removeMovieClip(_root.b112);