关于VB中A*寻路算法的提问

来源:百度知道 编辑:UC知道 时间:2024/06/08 11:41:23
谁能给出VB的A*寻路算法代码~(不要VB.Net的)
不要方法,只要代码。我上网查了很多资料,自己写了很多遍,总是问题多多....所以请各位大侠给出一个成熟的代码~~(不要VB.Net的,因为VB.Net与VB6有太多太多的不同之处)
感激涕零...
我只是想在迷宫中(一个二维数组组成)寻找一条路。(我想做一个食豆游戏(pacman)).我写的算法在遇到边界时就会下标越界,这个问题搞到我头晕脑胀,所以就不想自己写了。
A*寻路的文章我看了,方法会了,但是编写中一些问题难以解决,所以才寻找详细代码.你们给个代码给我,我会修改的,最好有详细注释。
小弟谢了,如果代码行得通我会追加分数的。
自己写的代码太长,贴不上..

定理:穿越于一组互不相交的多边形障碍物S之间、从Pstart通往Pgoal的任何一条最短路径,都是一条多边形路径,其中所有的内部顶点都是S的顶点。
推广:所有最短路径问题。
结论:只有普遍适用的算法,没有普遍适用的代码。
补充:只有问题实例化才能写出适用代码。

你所遇到的可不只是寻路问题,二维寻路相对简单点,我猜测你的问题产生在“碰撞”上,建议你多学习一下“计算几何学”、“计算机图形学”、“机器人运动学”等,当然,编程的基本功也很重要。其实,带有运动的游戏编程是很复杂的。你也可以将你的程序包发给我等我有时间帮你看看。

祝你早日知道答案
回答者:妍1127 - 见习魔法师 二级 2-13 17:51
代码贴出来,大家可以帮你纠错
回答者:wlm_jxj - 经理 五级 2-13 17:59
定理:穿越于一组互不相交的多边形障碍物S之间、从Pstart通往Pgoal的任何一条最短路径,都是一条多边形路径,其中所有的内部顶点都是S的顶点。
推广:所有最短路径问题。
结论:只有普遍适用的算法,没有普遍适用的代码。
补充:只有问题实例化才能写出适用代码。

你所遇到的可不只是寻路问题,二维寻路相对简单点,我猜测你的问题产生在“碰撞”上,建议你多学习一下“计算几何学”、“计算机图形学”、“机器人运动学”等,当然,编程的基本功也很重要。其实,带有运动的游戏编程是很复杂的。你也可以将你的程序包发给我等我有时间帮你看看。

代码贴出来,大家可以帮你纠错