开源模拟A星算法自动寻路纯源码

功能说明:

该程序是一个使用易语言开发的图形化桌面应用程序，其主要功能是直观地演示和教学 A*（A-Star）路径查找算法的工作流程。程序构建了一个可交互的网格地图环境，允许用户自定义障碍物分布、起始点和终点，并通过动画效果展示算法寻找最短路径的过程。

根据代码中的子程序定义和功能模块划分，该程序的具体功能总结如下：

1.  **界面初始化与网格构建**

    由`.子程序 __启动窗口_创建完毕`负责。程序启动时，首先初始化全局变量设定的宽度与高度（默认为 20x20），随后通过双重循环动态复制并排列界面上的“标签”控件，形成网格阵列存储于 G_标签数组中。这些标签构成了寻路的地图基础。初始化完成后，自动调用生成地图功能以展示初始场景。

2.  **用户交互与地图编辑**

    主要通过两个事件子程序实现：

    -   `.子程序 _标签格子_鼠标左键被按下`：响应鼠标左键操作。若按住 Alt 键，则清除旧的起点设置并将当前点击格子设为新起点（背景色为绿色）；否则将格子设为黑色，代表墙壁或障碍物。

    -   `.子程序 _标签格子_鼠标右键被按下`：响应鼠标右键操作。若按住 Alt 键，则清除旧的终点设置并将当前点击格子设为新终点（背景色为红色）；否则将格子设为白色，代表可行走的空地。

    这种设计允许用户直接在网格上绘制任意形状的迷宫。

3.  **随机地图生成**

    由`.子程序 _生成地图_被单击`控制。当用户点击生成按钮时，程序遍历所有网格单元格，重置其状态。它以一定的随机概率将部分格子变为黑色（障碍物），并随机指定一个绿色格子为起点，一个红色格子为终点。这为用户提供了快速生成不同难度寻路场景的工具。

4.  **路径搜索触发与结果反馈**

    由`.子程序 _寻路按钮_被单击`控制。当用户准备好地图后，点击此按钮开始计算。程序首先会清除上一次计算留下的路径痕迹（如橙黄色标记），然后自动定位绿色的起点，调用核心的 A 星算法子程序。计算结束后，通过信息框弹窗告知用户寻路是否成功，并显示算法执行所消耗的时间（毫秒），用于性能分析。

5.  **核心算法实现**

    由`.子程序 A 星`实现。这是程序的最核心逻辑。代码采用了循环判断结构来模拟算法的迭代搜索过程。

    -   **可视化延时**：算法内部检查是否有选中特定的复选框（选择框 1），若选中则加入延时并处理系统事件，这使得用户能肉眼观察到算法从起点逐步向外扩散搜索节点的过程（通常通过改变格子颜色为橙黄或嫩黄来标识已访问区域）。

    -   **路径扩展**：算法通过检查当前节点的相邻格子（代码片段中可见对左侧格子的判断），判断是否为可通行区域（白色），若是则将邻居节点标记为下一步待考察对象（更新背景和标题计数）。

    -   **终止条件**：虽然代码片段未完全展示结束条件，但逻辑隐含了找到红色终点即停止，或者遍历完所有可达区域仍未找到则宣告失败。

总体而言，这是一个典型的易语言教学范例代码，专注于将复杂的 A*算法逻辑转化为可视化的图形操作。除了主功能外，代码中还夹杂了一些关于“魔鬼作坊”的外部论坛和水印注释，表明该源码可能流传于某些技术交流群组或教程站点中，但其核心业务逻辑清晰独立，不受广告文本影响。程序非常适合初学者学习易语言的事件驱动编程、数组操作以及经典路径规划算法的基本原理。

======窗口程序集1

           |  |

           |  |------ __启动窗口_创建完毕

           |  |

           |  |------ _标签格子_鼠标左键被按下

           |  |

           |  |------ _标签格子_鼠标右键被按下

           |  |

           |  |------ _生成地图_被单击

           |  |

           |  |------ _寻路按钮_被单击

           |  |

           |  |------ A星

           |  |

           |  |------ 画路线