起点(黄): 鼠标左键
终点(绿): 鼠标右键
设置地形: Ctrl+鼠标左键
按住 Alt 移动鼠标 自动寻路到鼠标指针处.
.如果 (位图.载入数据 (#地图))
.如果真 (取字节集长度 (点阵) ≠ 位图.取宽度 () × 位图.取高度 ())
点阵 = 取空白字节集 (位图.取宽度 () × 位图.取高度 ())
.变量循环首 (0, 位图.取高度 () - 1, 1, y)
.变量循环首 (0, 位图.取宽度 () - 1, 1, x)
i = i + 1
点阵 [i] = 选择 (位图.取某点颜色 (x, y) = #黑色, 255, 0)
.变量循环尾 ()
.变量循环尾 ()
.如果真结束
画板1.底图 = #地图
画板1.宽度 = 位图.取宽度 ()
画板1.高度 = 位图.取高度 ()
地图 = 创建地图 (画板1.宽度, 画板1.高度)
下一篇 语音聊天机器人源码混音版