1.     调用 坐标五
  2. 子程序结束
  3. 注释:--------------
  4. 子程序 关闭任务追踪栏
  5.     标记 关(子程序 关闭任务追踪栏)
  6.     如果点 (838,227) 的颜色等于 "FFFFFF" 则
  7.         延时 500 毫秒
  8.         调用 打开列表任务
  9.         延时 500 毫秒
  10.         调用 Bkgnd.LeftClick(qq,113 - 3,529 - 22)
  11.         延时 500 毫秒
  12.         调用 关闭任务列表
  13.         跳转到标记 关(子程序 关闭任务追踪栏)
  14.     条件结束
  15. 子程序结束
  16. 子程序 收起聊天栏
  17.     标记 聊天栏(子程序 收起聊天栏)
  18.     如果点 (15,592) 的颜色等于 "0" 则
  19.         延时 500 毫秒
  20.         如果点 (22,684) 的颜色等于 "0" 则
  21.             延时 500 毫秒
  22.             调用 Bkgnd.LeftClick(qq,18 - 3,748 - 22)
  23.             延时 500 毫秒
  24.             跳转到标记 聊天栏(子程序 收起聊天栏)
  25.         条件结束
  26.     条件结束
  27. 子程序结束
  28. 子程序 Esc
  29.     标记 按Esc(子程序 Esc)
  30.     如果点 (733,485) 的颜色不等于 "FFFFFF" 则
  31.         如果点 (450,330) 的颜色不等于 "FFFFFF" 则
  32.             (键盘)按 "Esc" 键, 1次
  33.             延时 500 毫秒
  34.             跳转到标记 按Esc(子程序 Esc)
  35.         条件结束
  36.     条件结束
  37.     标记 按Esc1(子程序 Esc)
  38.     如果点 (733,485) 的颜色等于 "FFFFFF" 则
  39.         如果点 (450,330) 的颜色等于 "FFFFFF" 则
  40.             (键盘)按 "Esc" 键, 1次
  41.             延时 500 毫秒
  42.             跳转到标记 按Esc1(子程序 Esc)
  43.         条件结束
  44.     条件结束
  45. 子程序结束
  46. 子程序 下拉任务列表
  47.     如果点 (213,470) 的颜色等于 "1F7FE9" 则
  48.         延时 1000 毫秒
  49.         (鼠标)移动到 (213, 311)
  50.         延时 200 毫秒
  51.         (鼠标)左键按下
  52.         延时 200 毫秒
  53.         (鼠标)移动到 (213, 424)
  54.         延时 200 毫秒
  55.         (鼠标)左键弹起
  56.         延时 200 毫秒
  57.         (鼠标)移动到 (16, 148)
  58.         延时 2000 毫秒
  59.     条件结束
  60. 子程序结束
  61. 子程序 打开列表任务
  62.     标记 打开任务(子程序 打开列表任务)
  63.     令 dm_ret = dm.FindStr(19,507,211,555,"任务列表","ffffff-000000",1,x,y)
  64.     如果 x > 0 并且 y > 0 则
  65.     否则
  66.         延时 300 毫秒
  67.         (键盘)按 "Q" 键, 1次
  68.         延时 300 毫秒
  69.         跳转到标记 打开任务(子程序 打开列表任务)
  70.     条件结束
  71. 子程序结束
  72. 子程序 关闭任务列表
  73.     标记 关闭任务(子程序 关闭任务列表)
  74.     令 dm_ret = dm.FindStr(19,507,211,555,"任务列表","ffffff-000000",1,x,y)
  75.     如果 x > 0 并且 y > 0 则
  76.         延时 300 毫秒
  77.         (键盘)按 "Q" 键, 1次
  78.         延时 300 毫秒
  79.         跳转到标记 关闭任务(子程序 关闭任务列表)
  80.     条件结束
  81. 子程序结束
  82. 子程序 捡东西
  83.     标记 捡东西(子程序 捡东西)
  84.     (键盘)按 "Space" 键, 2次
  85.     令 dm_ret = dm.FindStr(0,0,1031,794,"建材碎块","ffffff-000000",1,x,y)
  86.     如果 x > 0 并且 y > 0 则
  87.         延时 200 毫秒
  88.         (键盘)按 "Space" 键, 2次
  89.         延时 1000 毫秒
  90.         (键盘)按 "Space" 键, 2次
  91.         延时 1000 毫秒
  92.         调用 血蓝组队
  93.         跳转到标记 捡东西(子程序 捡东西)
  94.     条件结束
  95. 子程序结束
  96. 子程序 血蓝组队
  97.     调用 验证码
  98.     (鼠标)移动到 (16, 148)
  99.     (语句无法识别,可能有错误): FindColorEx 143,66,147,72,"06815A",1,0.8,intX,intY//血
  100.     如果 intX > 0 并且 intY > 0 则