Flash里的 A* Pathfinding

A* Pathfinding,A*寻路,利用这原理可以制作战棋游戏...地图内黑色块为障碍物,白色块为通道,在非寻路状态时点击可以切换.红色块为主角,点击主角再点目标可进行寻路. it55.com

PS:寻路是四方向的,人懒就没写八方向了,FLA文件请用FLASH MX2004以上版本打开 45398 www.it55.com it55学习IT知识，享受IT生活 4dfkjn

演示:

http://www.it55.com/

下载:
Download SWF file
Download FLA file it55.com

本作品仅限学习参考使用,您可以随意修改,传播,但不得用于商业用途

以下为代码: IT资讯之家 www.it55.com

代码拷贝框
//code by 月光 2005.9.22//地图长宽var mapx = 40;var mapy = 40;var total = mapx * mapy;//边界距离var distancex = 30;var distancey = 30;//<a href='/html/xueyuan/chengxukaifa/yidongkaifajiaocheng'><u>移动</u></a>速度var interval = 75;//初始障碍物比率var balk = 3;var val;var width = 0;var height = 0;//<a href='/html/xueyuan/chengxukaifa/yidongkaifajiaocheng'><u>移动</u></a>次数var moves = 0;//是否正在忙碌var busy = false;//是否正在<a href='/html/xueyuan/chengxukaifa/yidongkaifajiaocheng'><u>移动</u></a>var moving = false;//是否搜索成功var finded = false;//路径记录var open = new Array();//方向数组 => 右, 下, 左, 上var ori = new Array([1, 0], [0, 1], [-1, 0], [0, -1]);// ========================================//重置var reset = function () { clearInterval(val); for (var i in _root) { if (typeof _root[i] == "movieclip") { _root[i].removeMovieClip(); } } txt.text = ""; init();};btn_reset.onPress = reset;// ========================================//初始化var init = function () { var i = 1; // 绘制地图 while (i <= total) { var tmp = attachMovie("mc", "m" + i, i, {id:i, visited:false}); tmp._x = (i - 1) % mapx * tmp._width + distancex; tmp._y = Math.floor((i - 1) / mapy) * tmp._height + distancey; if (random(balk) == 0) { tmp.gotoAndStop(2); } i++; } m1.gotoAndStop(1); width = m1._width; height = m1._height; // 主角初始位置 attachMovie("player", "player", total + 10000, {_x:distancex, _y:distancey}); player.onPress = function() { busy = true; txt.text = "请选择目标"; }; moving = false;};// ========================================//点击地图后执行btn.onPress = function() { if (!moving) { var i = 1; while (i <= total) { this._parent["m" + i].visited = false; i++; } var x = Math.ceil((_xmouse - distancex) / width); var y = Math.ceil((_ymouse - distancey) / height); var id = x + (y - 1) * mapy; //当前点击的MC var tmp = this._parent["m" + id]; if (!busy) { if (tmp._currentframe == 1) { txt.text = "目标转换为障碍物"; tmp.gotoAndStop(2); } else { txt.text = "目标转换为通道"; tmp.gotoAndStop(1); } } else { if (tmp._currentframe == 2) { txt.text = "目标为障碍物,无法到达"; busy = false; } else { findit(x, y); } } }};// ========================================//寻路var findit = function (x, y) { finded = false; open = new Array(); var playerx = Math.ceil((player._x - distancex) / width) + 1; var playery = Math.ceil((player._y - distancey) / height) + 1; moves = 1; // 数组内元素为: X坐标, Y坐标, 距离原点长度, 上级位置 open[1] = [x, y, moves, 1]; for (i = 0; i < 4; i++) { // 邻格内<a href='/html/xueyuan/chengxukaifa/yidongkaifajiaocheng'><u>移动</u></a> if (x + ori[i][0] == playerx && y + ori[i][1] == playery) { movefunc(); return; } } // 非邻格内<a href='/html/xueyuan/chengxukaifa/yidongkaifajiaocheng'><u>移动</u></a> var z = 1; var t = 1; while (open[z] != null) { for (i = 0; i < 4; i++) { var tmpx = open[z][0] + ori[i][0]; var tmpy = open[z][1] + ori[i][1]; if (tmpx > 0 && tmpy > 0 && tmpx <= 40 && tmpy <= 40) { var id = tmpx + (tmpy - 1) * mapy; var tmp = this["m" + id]; // 当对象存在及非障碍物及未访问过时 if (tmp != null && tmp._currentframe == 1 && !tmp.visited) { tmp.visited = true; open[++t] = [tmpx, tmpy, open[z][2] + 1, z]; if (open[t][0] == playerx && open[t][1] == playery) { finded = true; moves = z; break; } } } } z++; } if (finded) { movefunc(); } else { busy = false; moving = false; //debug trace(open.join(" => ")); txt.text = "无法到达目标"; }};// ========================================//角色<a href='/html/xueyuan/chengxukaifa/yidongkaifajiaocheng'><u>移动</u></a>var movefunc = function () { moving = true; txt.text = "找到目标,正在<a href='/html/xueyuan/chengxukaifa/yidongkaifajiaocheng'><u>移动</u></a>"; val = setInterval(moveFunc, interval);};var moveFunc = function () { updateAfterEvent(); moves = open[moves][3]; player._x = (open[moves][0] - 1) * width + distancex; player._y = (open[moves][1] - 1) * height + distancey; if (moves == 1) { busy = moving = finded = false; txt.text = "已到达目标"; clearInterval(val); }};// ========================================init();stop(); </p> <p>（阅读次数：<script src="http://www.it55.com/plus/count.php?view=yes&aid=60558&mid=0" language="javascript"></script>）</p> </div> <div id="fy"><div class="maotop"><a href="#"><img src="http://www.it55.com/templets/it55/images/top.gif" alt="返回顶部" /></a></div>共6页: 上一页 1 <a href='60558_2.html'>[2]</a> <a href='60558_3.html'>[3]</a> <a href='60558_4.html'>[4]</a> <a href='60558_5.html'>[5]</a> <a href='60558_6.html'>[6]</a> <a href='60558_2.html'>下一页</a> 　</div> </div> <script type="text/javascript"> document.getElementById("cl").style.height=document.getElementById("cr").scrollHeight+"px" </script> </div><div style="clear:both"></div> <div class="ad5"><script type="text/javascript"><!-- google_ad_client = "pub-7322138056288108"; google_alternate_color = "E6E6E6"; google_ad_width = 728; google_ad_height = 90; google_ad_format = "728x90_as"; google_ad_type = "text_image"; //2007-07-09: www.it55.com google_ad_channel = "7079307182"; //--> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script></div> <div id="neighbour">上一篇：<a href='http://www.it55.com/html/xueyuan/wangyezhizuo/Flashjiaocheng/20070712/60557.html'>使用外部CSS设置FlashMX组件外观</a>   下一篇：<a href='http://www.it55.com/html/xueyuan/wangyezhizuo/Flashjiaocheng/20070712/60559.html'>新浪/闪客帝国 图片效果解析</a> </div> <div style="clear:both"></div> </div> <div id="comment"> <div class="title"><h4>网友评论</h4>[以下评论为网友观点，不代表本站。请自觉遵守互联网相关政策法规，所有连带责任均有评论者自负。]</div> <div id="coml"> <ul> <script src="http://www.it55.com/plus/feedback_js.php?arcID=60558"></script> </ul> </div> <div id="comr"> <form action="http://www.it55.com/plus/feedback.php?action=send" method="post" name="feedback"> <input type="hidden" name="arcID" value="60558"> <label for="username">用户名：</label><input id="username" name="username" class="input" /> <label for="pwd">密码：</label><input id="pwd" name="pwd" class="input" /> <label for="notuser">匿名：</label><input id="notuser" name="notuser" type="checkbox" value="1" /> <textarea id="msg" name="msg" cols="22" rows="10" tabindex="4">