- 定义变量 dx, dy, hwnd, hwndex, xyarray, s
- 令 hwnd = Window.Find("ToolbarWindow32","运行应用程序")
- 令 Hwndex = Window.FindEx(Hwnd,0,"sh2UnrealWWindowsViewportWindow","水浒Q传2 Beta 0.77.4 Build2010110300 电信一区 入云龙一线 板砖丶")
- 调用 Window.Move(Hwndex,- 2 ,1)
- 令 s = Window.GetClientRect(Hwndex)
- 令 XYArray = Split(s,"|",- 1 ,1)
- 令 dx = XYArray(0)
- 令 dy = XYarray(1)
- 标记 跑动遇敌
- 如果点 (644,40) 的颜色等于 "0A1109" 则
- 调用 自动走路()
- 调用 组队()
- 调用 检查红()
- 否则
- 调用 等待战斗()
- 条件结束
- 跳转到标记 跑动遇敌
- 子程序 等待战斗()
- 如果点 (586,87) 的颜色等于 "00407B" 则
- (鼠标)移动到 (586 - dx, 87 - dy)
- 延时 200 毫秒
- (鼠标)移动到 (700 - dx, 200 - dy)
- 延时 100 毫秒
- 调用 Bkgnd.MoveTo(Hwndex,747 - dx,250 - dy)
- 延时 100 毫秒
- 调用 Bkgnd.leftclick(Hwndex,747 - dx,250 - dy)
- 调用 关自动()
- 否则
- 条件结束
- 子程序结束
- 子程序 自动走路()
- 如果点 (536,30) 的颜色等于 "000000" 则
- 延时 2000 毫秒
- 否则
- 调用 Bkgnd.MoveTo(hwndex,659 - dx,162 - dy)
- 延时 200 毫秒
- 调用 Bkgnd.leftclick(hwndex,659 - dx,162 - dy)
- 延时 1000 毫秒
- 条件结束
- 子程序结束
- 子程序 检查红()
- 如果点 (137,132) 的颜色不等于 "0000D9" 则
- 调用 Bkgnd.moveto(Hwndex,137 - dx,132 - dy)
- 延时 100 毫秒
- 调用 Bkgnd.rightClick(Hwndex,137 - dx,132 - dy)
- 否则
- 条件结束
- 子程序结束
- 子程序 组队()
- 如果点 (343,361) 的颜色等于 "0C1704" 则
- 调用 Bkgnd.moveto(Hwndex,343 - dx,361 - dy)
- 延时 500 毫秒
- 调用 Bkgnd.LeftdoubleClick(Hwndex,343 - dx,361 - dy)
- 否则
- 条件结束
- 子程序结束
- 子程序 关自动()
- 延时 100 毫秒
- 调用 Bkgnd.MoveTo(Hwndex,99 - dx,393 - dy)
- 延时 100 毫秒
- 调用 Bkgnd.LeftClick(Hwndex,99 - dx,393 - dy)
- 延时 1000 毫秒
- 子程序结束