A星算法游戏自动寻路脚本

.计次循环首 (取数组成员数 (组1), 计次)
检测点.x ＝ 组1 [计次].点1.x ＋ 1
检测点.y ＝ 组1 [计次].点1.y
.如果真 (取通行状态 (检测点) ＝ 真)
.如果真 (是否存在 (检测点, 组1) ＝ 假 且 是否存在 (检测点, 组2) ＝ 假 且 是否存在 (检测点, 临时组) ＝ 假)
加入成员 (临时组, 到特殊点 (检测点, 组1 [计次].点1))

.如果真 (取网格左边 (物体标识值) ≠ -1)
.如果真 (物体标识值 ≠ 当前绘制标识)
.如果 (取通行状态 (到点 (取网格左边 (物体标识值), 取网格顶边 (物体标识值))) ＝ 真)
置通行状态 (到点 (取网格左边 (物体标识值), 取网格顶边 (物体标识值)), 假)
.否则
置通行状态 (到点 (取网格左边 (物体标识值), 取网格顶边 (物体标识值)), 真)
.如果结束

.如果真结束
开始移动 ＝ 假
开始绘制 ＝ 假
开始绘制 ＝ 真
当前绘制标识 ＝ 物体标识值