- MouseClick(intX + 3,intY + 3,1)
- 令 IsError = False
- 跳出循环
- 否则
- 调用 MyDelay()
- 如果 IsTimeout > 20 则
- 注释:超时 10s
- 条件结束
- 跳出循环
- 条件结束
- 条件结束
- 循环结束
- 注释:修改兵源数量
- 令 IsTimeout = 0
- 循环当 True 时
- 从左上到右下查找图片 "Attachment:\数量.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- 锁定鼠标位置
- (鼠标)移动到 (intX + 5, intY + 2)
- 延时 50 毫秒
- (鼠标)左键双击, 1次
- 延时 50 毫秒
- (键盘)按 "1" 键, 1次
- 延时 50 毫秒
- 解除鼠标锁定
- 令 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:\出征.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
- (语句无法识别,可能有错误): Do While True //选择功击目标
- 从左上到右下查找图片 "Attachment:\请选择.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:6 上:300 右:95 下:768),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- MouseClick(intX,intY,1)
- 令 IsError = False
- 跳出循环
- 否则
- 调用 MyDelay()
- 如果 IsTimeout > 20 则
- 注释:超时 10s
- 条件结束
- 跳出循环
- 条件结束
- 条件结束
- 循环结束
- 注释:选择目标(标记第一行)
- 令 IsTimeout = 0
- 循环当 True 时
- 从左上到右下查找图片 "Attachment:\标记.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
- 如果 intX > 0 并且 intY > 0 则
- 锁定鼠标位置
- (鼠标)移动到 (intX, intY)
- 延时 50 毫秒
- (鼠标)左键单击, 1次
- 延时 50 毫秒
- (鼠标)移动到 (172, 193)
- 延时 50 毫秒
- (鼠标)左键双击, 1次