1.     调用 把当前活动程序的内存地址 &h005BDB98 的 2 类型值保存到 ncy
  2.     延时 2 毫秒
  3.     如果 ncx = 0 并且 ncy = 0 则
  4.         令 mx = x - 2
  5.         注释：2是左边框的宽度
  6.         令 my = y - 30
  7.         注释：30是标题框的宽度
  8.         （鼠标）移动到 (x, y)
  9.         保存鼠标位置
  10.         标记 second(子程序 修正偏移右键)
  11.         调用 把当前活动程序的内存地址 &H005bdb68 的 2 类型值保存到 bitx
  12.         延时 4 毫秒
  13.         调用 把当前活动程序的内存地址 &h005bdb6c 的 2 类型值保存到 bity
  14.         延时 4 毫秒
  15.         把当前鼠标所在的位置保存到 (cx, cy)
  16.         如果 cy <= 29 或者 cx <= 2 或者 cx > 800 或者 cy > 600 则
  17.             恢复鼠标位置
  18.         条件结束
  19.         如果 abs(bitx - mx) < 4 并且 abs(bity - my) < 4 则
  20.             跳转到标记 complete(子程序 修正偏移右键)
  21.         条件结束
  22.         如果 bitx - mx > 1 并且 bity - my > 1 则
  23.             （鼠标）相对移动 (- 1 , - 1 )
  24.         否则如果 bitx - mx < 1 并且 bity - my < 1 则
  25.             （鼠标）相对移动 (1, 1)
  26.         否则
  27.             如果 bitx - mx > 1 则
  28.                 （鼠标）相对移动 (- 1 , 0)
  29.             否则如果 bitx - mx < 1 则
  30.                 （鼠标）相对移动 (1, 0)
  31.             否则如果 bity - my > 1 则
  32.                 （鼠标）相对移动 (0, - 1 )
  33.             否则如果 bity - my < 1 则
  34.                 （鼠标）相对移动 (0, 1)
  35.             否则
  36.                 跳转到标记 complete(子程序 修正偏移右键)
  37.             条件结束
  38.         条件结束
  39.         跳转到标记 second(子程序 修正偏移右键)
  40.         标记 complete(子程序 修正偏移右键)
  41.     否则
  42.         （鼠标）移动到 (x, y)
  43.     条件结束
  44.     延时 90 毫秒
  45.     （鼠标）右键单击, 1次
  46.     延时 100 毫秒
  47.     调用 移动角落
  48. 子程序结束
  49. 子程序 小猴子()
  50.     标记 小猴子1(子程序 小猴子)
  51.     从左上到右下查找图片 "c:\XYW\小猴子.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：0 上：0 右：807 下：621），相似度 0.9
  52.     如果 intX > 0 并且 intY > 0 则
  53.         调用 修正偏移右键(intX + 50,intY - 25)
  54.         延时 yc + 200 毫秒
  55.         跳转到标记 小猴子1(子程序 小猴子)
  56.     否则
  57.     条件结束
  58. 子程序结束
  59. 注释：去傲来抓怪++
  60. 子程序 去傲来抓怪()
  61.     注释：////////////////////全部通傲来
  62.     标记 接任务1(子程序 去傲来抓怪)
  63.     延时 yc + 500 毫秒
  64.     调用 识别地图
  65.     如果 DITU = "瑶池" 则
  66.         注释：识别地图瑶池111111111111111111111111111111111
  67.     条件结束
  68.     调用 瑶池去长安
  69.     (语句无法识别，可能有错误): ElseIf DITU="长安" Then //识别地图长安22222222222222222222222222222222222222
  70.     调用 长安去傲来
  71.     (语句无法识别，可能有错误): ElseIf DITU="傲来" Then //识别地图傲来33333333333333333333333333333333333333
  72.     标记 抓怪1(子程序 去傲来抓怪)
  73.     调用 识别地图
  74.     如果 x = 151 并且 y = 146 则
  75.         调用 写坐标(230,136)
  76.         令 T写坐标1 = now
  77.         跳转到标记 抓怪2(子程序 去傲来抓怪)
  78.     否则如果 x = 230 并且 y = 136 则
  79.         调用 写坐标(151,146)
  80.         令 T写坐标1 = now
  81.         跳转到标记 抓怪3(子程序 去傲来抓怪)
  82.     否则
  83.         调用 写坐标(151,146)
  84.         令 T写坐标1 = now
  85.         跳转到标记 抓怪3(子程序 去傲来抓怪)
  86.     条件结束
  87.     令 T抓怪3 = NOW
  88.     标记 抓怪3(子程序 去傲来抓怪)
  89.     调用 识别地图
  90.     如果 x = 151 并且 y = 146 则
  91.         注释：/////走想第2个点
  92.     条件结束
  93.     跳转到标记 抓怪1(子程序 去傲来抓怪)
  94.     (语句无法识别，可能有错误): Else//走想第2个点
  95.     如果 DateDiff("s",T写坐标1,now) > 10 则
  96.         令 T写坐标1 = now
  97.         调用 写坐标(151,146)
  98.         延时 200 毫秒
  99.         跳转到标记 抓怪1(子程序 去傲来抓怪)
  100.     条件结束