1. 注释:时间记录 如果超过20秒没有操作,进行报警
  2. 注释:时间有问题
  3. 注释:增加 寻路中状态 ,还是在点任务
  4. 注释:增加 攻击 判断 和进行攻击
  5. 注释:首个任务无法完成 去第二个任务,第二个任务无法完成。。没有处理
  6. 令 qqxjHand = (命令库 API)查找窗口句柄("SWT_Window0","KEmulator Lite v0.9.8")
  7. 调用 Window.Move(qqxjHand,0,0)
  8. 令 sDate1 = Sys.GetDateTime()
  9. (语句无法识别,可能有错误): total=0//两次执行一次 用任务栏操作
  10. 循环当 True 时
  11.     令 total = total + 1
  12.     令 finded = 0
  13.     延时 500 毫秒
  14.     从左上到右下查找图片 "Attachment:\选择.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  15.     如果 intX > 0 并且 intY > 0 则
  16.         调用 鼠标移动点击()
  17.     条件结束
  18.     从左上到右下查找图片 "Attachment:\确定.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  19.     如果 intX > 0 并且 intY > 0 则
  20.         调用 鼠标移动点击()
  21.     条件结束
  22.     从左上到右下查找图片 "Attachment:\接受.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  23.     如果 intX > 0 并且 intY > 0 则
  24.         调用 鼠标移动点击()
  25.     条件结束
  26.     从左上到右下查找图片 "Attachment:\寻路.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  27.     如果 intX > 0 并且 intY > 0 则
  28.         调用 鼠标移动点击()
  29.     条件结束
  30.     从左上到右下查找图片 "Attachment:\升级.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  31.     如果 intX > 0 并且 intY > 0 则
  32.         调用 鼠标移动点击()
  33.     条件结束
  34.     从左上到右下查找图片 "Attachment:\战斗.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  35.     如果 intX > 0 并且 intY > 0 则
  36.         调用 鼠标移动点击()
  37.     条件结束
  38.     从左上到右下查找图片 "Attachment:\操作.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  39.     如果 intX > 0 并且 intY > 0 则
  40.         调用 鼠标移动点击()
  41.     条件结束
  42.     调用 学习()
  43.     延时 2000 毫秒
  44.     如果 finded = 0 则
  45.         调用 过地图后()
  46.     条件结束
  47.     注释:重复操作三次不可完成的任务,2没有任务,切换 已接受 可接受
  48.     调用 第二个任务()
  49. 循环结束
  50. 注释:第一个任务不可完成 做第二个任务
  51. 子程序 第二个任务
  52.     如果 finded = 0 则
  53.         令 sDate2 = Sys.GetDateTime()
  54.         令 times = DateDiff("s",sDate1,sDate2)
  55.         调用 Msg.Tips(times)
  56.         延时 3000 毫秒
  57.         如果 times > 50 则
  58.             注释:寻路过程中
  59.         条件结束
  60.         注释:Call 切换可接已接()
  61.         (语句无法识别,可能有错误): FindPic 0,0,1024,768,"Attachment:\返回.bmp",0.9,intX,intY//没有任务
  62.         如果 intX > 0 并且 intY > 0 则
  63.             (鼠标)移动到 (intX, intY)
  64.             延时 1000 毫秒
  65.             (鼠标)左键单击, 1次
  66.             延时 100 毫秒
  67.             (语句无法识别,可能有错误): MoveTo intX - 80, intY - 239//第二个任务
  68.             延时 2000 毫秒
  69.             (鼠标)左键单击, 1次
  70.             延时 100 毫秒
  71.         条件结束
  72.     条件结束
  73.     如果 times > 80 则
  74.         调用 Media.Play("C:\Documents and Settings\songhh\桌面\新建文件夹\Alarm.mp3")
  75.         延时 5000 毫秒
  76.     条件结束
  77. 条件结束
  78. 子程序结束
  79. 子程序 过地图后
  80.     从左上到右下查找图片 "Attachment:\任务图标.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  81.     如果 intX > 0 并且 intY > 0 则
  82.         调用 鼠标移动点击()
  83.         延时 1000 毫秒
  84.     条件结束
  85.     从左上到右下查找图片 "Attachment:\查看.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  86.     如果 intX > 0 并且 intY > 0 则
  87.         调用 鼠标移动点击()
  88.     条件结束
  89.     从左上到右下查找图片 "Attachment:\没有任务.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  90.     如果 intX > 0 并且 intY > 0 则
  91.         (鼠标)移动到 (intX, intY)
  92.         延时 100 毫秒
  93.         调用 切换可接已接()
  94.     条件结束
  95. 子程序结束
  96. 子程序 切换可接已接
  97.     (语句无法识别,可能有错误): HavenColor=GetPixelColor(43,65)//已接
  98.     如果 HavenColor = "8A9D4E" 则
  99.         (鼠标)移动到 (75, 61)
  100.         延时 100 毫秒