1.                             (鼠标)移动到 (intx, inty)
  2.                             (鼠标)左键单击, 1次
  3.                             延时 300 毫秒
  4.                             调用 从左上到右下查找图片 "Attachment:\球.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  5.                             如果 intx > 0 则
  6.                                 (鼠标)移动到 (intx + 23, inty + 41)
  7.                                 延时 300 毫秒
  8.                                 (鼠标)左键单击, 1次
  9.                             条件结束
  10.                             延时 500 毫秒
  11.                             (鼠标)移动到 (m + 174, n - 401)
  12.                             延时 100 毫秒
  13.                             令 var = 返回当前鼠标的形状特征(0)
  14.                             如果 var = 1227848726 则
  15.                                 延时 500 毫秒
  16.                                 (鼠标)左键单击, 1次
  17.                             条件结束
  18.                         条件结束
  19.                     否则
  20.                         (键盘)按下 Alt 键
  21.                         (键盘)按 A 键, 1次
  22.                         (键盘)弹起 Alt 键
  23.                     条件结束
  24.                 条件结束
  25.                 注释:判断是否退出画面
  26.                 注释:下面这句在屏幕区域范围内查找多点颜色,返回左上角第2点颜色位置坐标
  27.                 令 XY = Color.FindMutiColor(0,0,1024,768,"6ADCE6","1|0|5EDCE6,-1|1|71F8FF,0|1|60F7FF,1|1|50F6FF,2|1|3CF6FF,3|1|1E9CB1,-2|2|50D8E6,-1|2|50F4FF,0|2|3EF3FF,1|2|32F2FF,2|2|2DECFC,-2|3|36D4E6,-1|3|30EEFF,0|3|29ECFE,1|3|28E8FC,2|3|25DEF7,3|3|1FBEDC,4|3|1E5254,-1|4|23E1FB,0|4|21DCF8,1|4|20D8F6,2|4|1FD2F3,0|5|1ABEDF,1|5|19BDDE,-4|6|31E2FF,5|6|3CE4FF,-5|7|14D6FD,-2|7|4BE3FF,-1|7|52E4FF,0|7|4DE3FF,1|7|4CE3FF,2|7|33DFFF,3|7|14D5FC,6|7|14D3FB,-2|8|35DCFF,-1|8|2DDAFF,0|8|26D9FF,1|8|26D9FF,2|8|10D4FE,3|8|0EC5F6,-2|9|20D4FF,-1|9|0FD1FF,0|9|0BCFFE,1|9|0BCEFE,2|9|0AC5F9,3|9|09BAF2,-2|10|07B3E4,-1|10|06C3FA,0|10|05C2F9,1|10|05BFF7,2|10|05B6F1,3|10|069BD2,0|11|02ADEC,1|11|02ACEE,2|11|0496D1",1)
  28.                 注释:下面这句用于分割字符串
  29.                 令 MyArray = Split(XY,"|")
  30.                 注释:下面这句将字符串转换成数值
  31.                 令 X = Clng(MyArray(0))
  32.                 令 Y = Clng(MyArray(1))
  33.                 如果 x > 0 则
  34.                     (鼠标)移动到 (m + 143, n - 575)
  35.                     跳转到标记 退出战斗
  36.                 条件结束
  37.             循环结束
  38.         条件结束
  39.         延时 1000 毫秒
  40.         循环当 1 时
  41.             调用 从左上到右下查找图片 "Attachment:\法.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  42.             如果 intx > 0 则
  43.                 注释:人物操作
  44.                 (键盘)按下 Alt 键
  45.                 (键盘)按 D 键, 1次
  46.                 (键盘)弹起 Alt 键
  47.                 延时 100 毫秒
  48.                 注释:宠物操作
  49.                 调用 从左上到右下查找图片 "Attachment:\宠保.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  50.                 如果 intx > 0 则
  51.                     延时 100 毫秒
  52.                     (鼠标)移动到 (intx, inty)
  53.                     延时 300 毫秒
  54.                     (鼠标)左键单击, 1次
  55.                     (鼠标)移动到 (m + 667, n - 136)
  56.                     延时 100 毫秒
  57.                     (鼠标)左键单击, 1次
  58.                 条件结束
  59.             条件结束
  60.             注释:判断是否退出画面
  61.             注释:下面这句在屏幕区域范围内查找多点颜色,返回左上角第2点颜色位置坐标
  62.             令 XY = Color.FindMutiColor(0,0,1024,768,"6ADCE6","1|0|5EDCE6,-1|1|71F8FF,0|1|60F7FF,1|1|50F6FF,2|1|3CF6FF,3|1|1E9CB1,-2|2|50D8E6,-1|2|50F4FF,0|2|3EF3FF,1|2|32F2FF,2|2|2DECFC,-2|3|36D4E6,-1|3|30EEFF,0|3|29ECFE,1|3|28E8FC,2|3|25DEF7,3|3|1FBEDC,4|3|1E5254,-1|4|23E1FB,0|4|21DCF8,1|4|20D8F6,2|4|1FD2F3,0|5|1ABEDF,1|5|19BDDE,-4|6|31E2FF,5|6|3CE4FF,-5|7|14D6FD,-2|7|4BE3FF,-1|7|52E4FF,0|7|4DE3FF,1|7|4CE3FF,2|7|33DFFF,3|7|14D5FC,6|7|14D3FB,-2|8|35DCFF,-1|8|2DDAFF,0|8|26D9FF,1|8|26D9FF,2|8|10D4FE,3|8|0EC5F6,-2|9|20D4FF,-1|9|0FD1FF,0|9|0BCFFE,1|9|0BCEFE,2|9|0AC5F9,3|9|09BAF2,-2|10|07B3E4,-1|10|06C3FA,0|10|05C2F9,1|10|05BFF7,2|10|05B6F1,3|10|069BD2,0|11|02ADEC,1|11|02ACEE,2|11|0496D1",1)
  63.             注释:下面这句用于分割字符串
  64.             令 MyArray = Split(XY,"|")
  65.             注释:下面这句将字符串转换成数值
  66.             令 X = Clng(MyArray(0))
  67.             令 Y = Clng(MyArray(1))
  68.             如果 x > 0 则
  69.                 (鼠标)移动到 (m + 143, n - 575)
  70.                 跳转到标记 退出战斗
  71.             条件结束
  72.         循环结束
  73.     条件结束
  74.     标记 退出战斗
  75.     令 c = c + 1
  76.     向调试窗口输出:c
  77.     延时 1000 毫秒
  78.     调用 从左上到右下查找图片 "Attachment:\你成功的到达了目的地.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:0 上:0 右:1024 下:768),相似度 0.9
  79.     令 k = 得到指定点 (m + 159, n - 306) 的颜色
  80.     令 l = 得到指定点 (m + 616, n - 306) 的颜色
  81.     如果 k = "CDBB5F" 并且 l = "CDBB5F" 则
  82.         跳转到标记 你
  83.     条件结束
  84.     如果 intx > 0 则
  85.         标记 你
  86.         延时 500 毫秒
  87.         (鼠标)移动到 (m + 599, n - 358)
  88.         (鼠标)左键单击, 1次
  89.         调用 交任务()
  90.     条件结束
  91.     延时 500 毫秒
  92. 循环结束
  93. 子程序 交任务()
  94.     循环当 r < 150 时
  95.         令 r = r + 6
  96.         令 d = 0
  97.         循环当 d < 2 * 3.141592654 时
  98.             令 d = d + 0.04
  99.             令 x = x0 + r * sin(d)
  100.             令 y = y0 - r * cos(d)