当前位置:编程学习 > VB >>

VB 扫雷游戏 它的 排雷 算法是什么啊???不是布雷! 论文里需要加的!求解!

VB 扫雷游戏 它的 排雷 算法是什么啊???不是布雷! 论文里需要加的!求解! 外挂,读取内存内容,嘿嘿,不需要算法。 以前用javascript做过。排雷可以用递归算法。点击一个块后,向周围的块搜索,周围的块再向四周搜索……遇到地雷或已搜索块返回。 种子填充算法。仅供参考(尽管是Java)
        void step0(int xx,int yy) {
            byte n;
            if (A[xx+yy*10]!=4) return;
            n=0;
            if (xx>=1 && yy>=1) n+=B[(xx-1)+(yy-1)*10];
            if (         yy>=1) n+=B[(xx  )+(yy-1)*10];
            if (xx<=8 && yy>=1) n+=B[(xx+1)+(yy-1)*10];
            if (xx>=1         ) n+=B[(xx-1)+(yy  )*10];
            if (xx<=8         ) n+=B[(xx+1)+(yy  )*10];
            if (xx>=1 && yy<=8) n+=B[(xx-1)+(yy+1)*10];
            if (         yy<=8) n+=B[(xx  )+(yy+1)*10];
            if (xx<=8 && yy<=8) n+=B[(xx+1)+(yy+1)*10];
            A[xx+yy*10]=(byte)(n+5);
            if (n==0) {
                if (xx>=1 && yy>=1) step0(xx-1,yy-1);
                if (         yy>=1) step0(xx  ,yy-1);
                if (xx<=8 && yy>=1) step0(xx+1,yy-1);
                if (xx>=1         ) step0(xx-1,yy  );
                if (xx<=8         ) step0(xx+1,yy  );
                if (xx>=1 && yy<=8) step0(xx-1,yy+1);
                if (         yy<=8) step0(xx  ,yy+1);
                if (xx<=8 && yy<=8) step0(xx+1,yy+1);
            }
        }
补充:VB ,  网络编程
CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,