1.             调用 Bkgnd.LeftDoubleClick(qq,325 - 3,267 - 22)
  2.             标记 石料锁怪(子程序 检查任务)
  3.             （键盘）按 "Tab" 键, 1次
  4.             延时 200 毫秒
  5.             令 dm_ret = dm.FindStr(318,36,541,117,"榆桑骨巫|榆桑鬼巫|异化轩辕男|榆桑女亡军","fed900-000000",1,x,y)
  6.             如果 x > 0 并且 y > 0 则
  7.                 延时 2000 毫秒
  8.                 调用 锁怪打怪
  9.             否则
  10.                 跳转到标记 石料锁怪(子程序 检查任务)
  11.             条件结束
  12.         条件结束
  13.     条件结束
  14.     令 dm_ret = dm.FindStr(16,131,229,546,"收集泥灰","000000-000000",1,x,y)
  15.     如果 x > 0 并且 y > 0 则
  16.         调用 Bkgnd.LeftClick(qq,n - 3,h + 5 - 22)
  17.         延时 1000 毫秒
  18.         令 dm_ret = dm.FindStr(257,241,463,348,"完成","000000-000000",1,x,y)
  19.         如果 x > 0 并且 y > 0 则
  20.         否则
  21.             调用 Bkgnd.LeftDoubleClick(qq,325 - 3,267 - 22)
  22.             延时 500 毫秒
  23.             调用 Bkgnd.LeftDoubleClick(qq,325 - 3,267 - 22)
  24.             标记 泥灰锁怪(子程序 检查任务)
  25.             （键盘）按 "Tab" 键, 1次
  26.             延时 200 毫秒
  27.             令 dm_ret = dm.FindStr(318,36,541,117,"白骨童子|青擎火|异化轩辕将领|黑石魔兵","fed900-000000",1,x,y)
  28.             如果 x > 0 并且 y > 0 则
  29.                 延时 2000 毫秒
  30.                 调用 锁怪打怪
  31.             否则
  32.                 跳转到标记 泥灰锁怪(子程序 检查任务)
  33.             条件结束
  34.         条件结束
  35.     条件结束
  36.     调用 回家族寻路
  37. 子程序结束
  38. 子程序 锁怪打怪
  39.     标记 锁怪(子程序 锁怪打怪)
  40.     循环当 i = 0 时
  41.         令 dm_ret = dm.FindStr(257,241,463,348,"完成","000000-000000",1,x,y)
  42.         如果 x > 0 并且 y > 0 则
  43.             令 i = i + 1
  44.             调用 检查任务
  45.         条件结束
  46.         （键盘）按 "Tab" 键, 1次
  47.         延时 700 毫秒
  48.         调用 血蓝组队
  49.         调用 打开列表任务
  50.         令 dm_ret = dm.FindStr(318,36,541,117,"异化轩辕女|异化轩辕男|异化轩辕将领|榆桑驯龙师|榆桑骨巫|白骨童子|青擎火|鬼火守卫|榆桑鬼巫|山鬼|黑石魔兵|榆桑女亡军","fed900-000000",1,x,y)
  51.         如果 x > 0 并且 y > 0 则
  52.             令 i = i + 1
  53.         条件结束
  54.         令 dm_ret = dm.FindStr(318,36,541,117,"异化轩辕女|异化轩辕男|异化轩辕将领|榆桑驯龙师|榆桑骨巫|白骨童子|青擎火|鬼火守卫|榆桑鬼巫|山鬼|黑石魔兵|榆桑女亡军","fd4100-000000",1,x,y)
  55.         如果 x > 0 并且 y > 0 则
  56.             令 i = i + 1
  57.         条件结束
  58.         从左上到右下查找图片 "Attachment:\X怪.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：313 上：38 右：398 下：116），相似度 0.8
  59.         如果 intX > 0 并且 intY > 0 则
  60.             令 i = i + 1
  61.         条件结束
  62.     循环结束
  63.     调用 打怪
  64.     调用 关闭任务列表
  65.     调用 捡东西
  66.     跳转到标记 锁怪(子程序 锁怪打怪)
  67. 子程序结束
  68. 子程序 打怪
  69.     如果点 (510,56) 的颜色等于 "FFFFFF" 则
  70.         循环 3 次
  71.             （键盘）按 "1" 键, 1次
  72.             延时 500 毫秒
  73.         循环结束
  74.     条件结束
  75.     如果点 (510,56) 的颜色等于 "FFFFFF" 则
  76.         循环 3 次
  77.             （键盘）按 "2" 键, 1次
  78.             延时 500 毫秒
  79.         循环结束
  80.     否则
  81.         跳转到标记 怪打完(子程序 打怪)
  82.     条件结束
  83.     如果点 (510,56) 的颜色等于 "FFFFFF" 则
  84.         循环 3 次
  85.             （键盘）按 "3" 键, 1次
  86.             延时 500 毫秒
  87.         循环结束
  88.     否则
  89.         跳转到标记 怪打完(子程序 打怪)
  90.     条件结束
  91.     标记 怪打完(子程序 打怪)
  92. 子程序结束
  93. 子程序 回家族寻路
  94.     标记 回家族(子程序 回家族寻路)
  95.     调用 血蓝组队
  96.     令 dm_ret = dm.FindStr(877,23,985,46,"家族","ffffff-000000",1,j,z)
  97.     如果 j > 0 并且 z > 0 则
  98.         调用 关闭任务列表
  99.         调用 打开地图
  100.         调用 Bkgnd.LeftClick(qq,776 - 3,175 - 22)