通行证│用户名: 密码: 验证码: 验证码,看不清楚?请点击刷新验证码 电信网通铁通移动   在线
资源搜索:
热门搜索:Linux VB C语言 PhotoShop Flash TCP/IP
   首页 | 文章 | 软件 | 动画 | 资源 | 励志 | 骗术 | 论坛 | 邮箱 | 会员中心 | 军事 | 科技 | 博客 | 图片 | 商城 | 最新更新 | 800g资源 | 爱心黑客
您现在的位置: 爱国者黑客 >> 资源 >> 媒体动画 >> Flash >> Action Script >> 文章正文
纯脚本的五子棋
责任编辑:admin   更新日期:2005-8-6
;    strline=strline+cmap[i+j-1][j].toString(10);
                                                 };
   for(k=0;k<20;k++){
   l=strline.indexOf(wmap[k]);
             if(l>=0 and k<=tempk){
         l=l+pmap[k];
             tempk=k;
             _root.tempx=i+l*io;
             _root.tempy=1+l*jo;
                                                                };
                                                 };
                                  };
io=1;
jo=1;
   for(j=2;j<=14;j++){
      strline="";
      for(i=1;i<=19-j;i++){
         strline=strline+cmap[i][i+j-1].toString(10);
                                                 };
   for(k=0;k<20;k++){
   l=strline.indexOf(wmap[k]);
             if(l>=0 and k<=tempk){
         l=l+pmap[k];
             tempk=k;
             _root.tempx=1+l*io;
             _root.tempy=j+l*jo;
                                                                };
                                                 };
                                  };
io=-1;
jo=1;
   for(i=5;i<=18;i++){
      strline="";
      for(j=1;j<=i;j++){
         strline=strline+cmap[i-j+1][j].toString(10);
                                                 };
   for(k=0;k<20;k++){
   l=strline.indexOf(wmap[k]);
             if(l>=0 and k<=tempk){
         l=l+pmap[k];
             tempk=k;
             _root.tempx=i+l*io;
             _root.tempy=1+l*jo;
                                                                };
                                                 };
                                  };
io=-1;
jo=1;
   for(j=2;j<=14;j++){
      strline="";
      for(i=1;i<=19-j;i++){
         strline=strline+cmap[19-i][j+i-1].toString(10);
                                                 };
   for(k=0;k<20;k++){
   l=strline.indexOf(wmap[k]);
             if(l>=0 and k<=tempk){
         l=l+pmap[k];
             tempk=k;
             _root.tempx=18+l*io;
             _root.tempy=j+l*jo;
                                                                };
                                                 };
                                  };
_root.tempv=tempk;
}
//draw chessman
function drawman(manx,many,who){
chess.createEmptyMovieClip("newman",mannum);
mannum++;
with (chess.newman ) {
r=10;
lineStyle(1,0x000000,20);
moveTo(r+manx,many);
drawWay="radial";
if (who==1){
colorRange = [0xffffff, 0x88ccff];
}else{
colorRange = [0xffffff, 0x000000];
   };
alphaRange = [100,100];
ra = [0, 255];
colorChart = {matrixType:"box",x:(manx-(r)), y:(many-(r)), w:3*r, h:3*r, r:(45/180)*Math.PI};
beginGradientFill(drawway, colorRange, alphaRange, ra, colorChart);
for(i=1;i<=36;i++){
radius=i*10*math.PI/180;
lineto(r*math.cos(radius)+manx, r*math.sin(radius)+many);
                                                 };
endFill();
                                                 }
}
//放子函数
function placechess(Hp,Vp,Pcol){
    if(cmap[Hp][Vp]==0){
                cmap[Hp][Vp]=Pcol;
       px=Hp*20+10;
       py=Vp*20+10;
                drawman(px,py,Pcol);
       _root.ppsucc=1;
                                                                  

上一页  [1] [2] [3] [4] 下一页

  • 上一篇文章:
  • 下一篇文章:
  • 热门文章
    Olldbg常见问题
    汇编语言的艺术(组合语言的艺术)--观
    汇编语言的艺术(组合语言的艺术)--准
    汇编语言的艺术(组合语言的艺术)--基
    汇编语言的艺术(组合语言的艺术)--基
    汇编语言---程式设计 (4)
    虚拟8086模式
    SYS命令使用说明
    javascript + CSS 实现动态菜单显
    推荐文章
    自制Windows XP SP2自动安装光盘
    SQLServer注入工具改进版 v1.02
    使用photoshop CS进行自然美肤
    Photoshop绘制诺基亚手机
    PHOTOSHOP制作秋日之梦
    PHOTOSHOP鼠绘名模王爱萍
    Photoshop制作晶莹飞溅的水珠
    教你用PHOTOSHOP做放大镜
    鼠绘美女及服装修画全过程