- 延时 50 毫秒
- 解除鼠标锁定
- 令 IsError = False
- 跳出循环
- 否则
- 调用 MyDelay()
- 如果 IsTimeout > 20 则
- 注释:超时 10s
- 条件结束
- 跳出循环
- 条件结束
- 条件结束
- 循环结束
- 注释:选择功击方式输入框
- 令 IsTimeout = 0
- 循环当 True 时
- 从左上到右下查找图片 "Attachment:\请选择.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:6 上:300 右:95 下:768),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- 注释: MoveTo intX, intY
- 注释: Delay 50
- 注释: LeftClick 1
- 注释: Delay 50
- MouseClick(intX,intY,1)
- 令 IsError = False
- 跳出循环
- 否则
- 调用 MyDelay()
- 如果 IsTimeout > 20 则
- 注释:超时 10s
- 条件结束
- 跳出循环
- 条件结束
- 条件结束
- 循环结束
- 注释:选择掠夺
- 令 IsTimeout = 0
- 循环当 True 时
- 从左上到右下查找图片 "Attachment:\掠夺.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:362 上:373 右:542 下:439),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- MouseClick(intX - 10,intY + 4,1)
- 令 IsError = False
- 跳出循环
- 否则
- 调用 MyDelay()
- 如果 IsTimeout > 20 则
- 注释:超时 10s
- 条件结束
- 跳出循环
- 条件结束
- 条件结束
- 循环结束
- 注释:确定选择
- 令 IsTimeout = 0
- 循环当 True 时
- 从左上到右下查找图片 "Attachment:\确定.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- MouseClick(intX,intY,1)
- 令 IsError = False
- 跳出循环
- 否则
- 调用 MyDelay()
- 如果 IsTimeout > 20 则
- 注释:超时 10s
- 条件结束
- 跳出循环
- 条件结束
- 条件结束
- 循环结束
- 注释:出征
- 令 IsTimeout = 0
- 循环当 True 时
- 从左上到右下查找图片 "Attachment:\出征1.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:295 上:343 右:707 下:719),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- MouseClick(intX,intY,1)
- 令 IsError = False
- 跳出循环
- 否则
- 调用 MyDelay()
- 如果 IsTimeout > 20 则
- 注释:超时 10s
- 条件结束
- 跳出循环
- 条件结束
- 条件结束
- 循环结束
- 注释:标测是否出征失败
- 令 IsErr = False
- 令 IsTimeout = 0
- 循环当 True 时
- 从左上到右下查找图片 "Attachment:\返回.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:361 上:328 右:657 下:525),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- MouseClick(intX,intY,1)
- 令 IsErr = True
- 跳出循环
- 否则
- 调用 MyDelay()
- 如果 IsTimeout > 5 则
- 注释:超时 2.5s
- 条件结束
- 跳出循环