1.         延时 10 毫秒
  2.         (键盘)按 "1" 键, 1次
  3.         延时 500 毫秒
  4.         (键盘)弹起 "Shift" 键
  5.     条件结束
  6. 函数结束
  7. 子程序 fuhuopet
  8.     令 zz = "21 ,232 | 72 ,350 | 182, 520 | 50, 300 "
  9.     令 zouwei = Split(zz,"|",- 1 ,0)
  10.     令 I = 0
  11.     循环当 i < 4 时
  12.         定义变量 zb
  13.         令 zb = split(zouwei(i),",",- 1 ,0)
  14.         令 pyx = int(rnd * 5)
  15.         令 pyy = int(rnd * 5)
  16.         令 zb_x = zb(0) + pyx
  17.         令 zb_y = zb(1) + pyy
  18.         令 i = i + 1
  19.         (鼠标)移动到 (zb_x + d2_pyx, zb_y + d2_pyy)
  20.         (鼠标)左键单击, 1次
  21.         延时 1300 + int(rnd * 200) 毫秒
  22.     循环结束
  23.     循环开始
  24.         从左上到右下查找图片 "Attachment:\夸尔凯克小.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:d2_pyx + 400 - 400 上:d2_pyy + 200 - 200 右:d2_pyx + 400 + 400 下:d2_pyy + 200 + 400),相似度 0.9
  25.         如果 intX > 0 则
  26.             令 intx = d2_pyx + 408 + 4 * (intx + 23 - (d2_pyx + 408))
  27.             令 inty = 288 + d2_pyy - 4 * (288 + d2_pyy - inty - 22)
  28.             (鼠标)移动到 (intx, inty)
  29.             (鼠标)左键单击, 1次
  30.             从左上到右下查找图片 "Attachment:\复活.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:d2_pyx + 400 - 400 上:d2_pyy + 200 - 200 右:d2_pyx + 400 + 400 下:d2_pyy + 200 + 400),相似度 0.6
  31.             如果 intx > 0 则
  32.                 (鼠标)移动到 (intx, inty)
  33.                 延时 100 毫秒
  34.                 (鼠标)左键单击, 1次
  35.                 延时 100 毫秒
  36.                 跳出循环
  37.             条件结束
  38.         条件结束
  39.     循环结束
  40. 子程序结束
  41. 子程序 cunfangwupin
  42.     令 stateinfo = "存放物品"
  43.     令 zz = "205,484|215,420|629,475"
  44.     令 zouwei = Split(zz,"|",- 1 ,0)
  45.     令 I = 0
  46.     循环当 i < 3 时
  47.         定义变量 zb
  48.         令 zb = split(zouwei(i),",",- 1 ,0)
  49.         令 pyx = int(rnd * 5)
  50.         令 pyy = int(rnd * 5)
  51.         令 zb_x = zb(0) + pyx
  52.         令 zb_y = zb(1) + pyy
  53.         令 i = i + 1
  54.         (鼠标)移动到 (zb_x + d2_pyx, zb_y + d2_pyy)
  55.         (鼠标)左键单击, 1次
  56.         延时 1300 + int(rnd * 200) 毫秒
  57.     循环结束
  58.     循环开始
  59.         从左上到右下查找图片 "Attachment:\箱子.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:d2_pyx + 400 - 400 上:d2_pyy + 200 - 200 右:d2_pyx + 400 + 400 下:d2_pyy + 200 + 400),相似度 0.7
  60.         如果 intX > 0 则
  61.             令 intx = d2_pyx + 408 + 4 * (intx - (d2_pyx + 408))
  62.             令 inty = 288 + d2_pyy - 4 * (288 + d2_pyy - inty - 10)
  63.             (鼠标)移动到 (intx, inty)
  64.             (鼠标)左键单击, 1次
  65.             延时 500 毫秒
  66.             从左上到右下查找图片 "Attachment:\箱子打开.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:d2_pyx + 400 - 400 上:d2_pyy + 200 - 200 右:d2_pyx + 400 + 400 下:d2_pyy + 200 + 400),相似度 0.7
  67.             如果 intX > 0 则
  68.                 向调试窗口输出:intX
  69.                 延时 100 毫秒
  70.                 跳出循环
  71.             条件结束
  72.         条件结束
  73.     循环结束
  74.     令 i = 0
  75.     令 ii = 0
  76.     定义变量 scolor(6,3)
  77.     令 scolor(0,0) = "040404"
  78.     令 scolor(0,1) = "141414"
  79.     令 scolor(0,2) = "040404"
  80.     令 scolor(0,3) = "040404"
  81.     令 scolor(1,0) = "080C0C"
  82.     令 scolor(1,1) = "040404"
  83.     令 scolor(1,2) = "0C0C0C"
  84.     令 scolor(1,3) = "080808"
  85.     令 scolor(2,0) = "040404"
  86.     令 scolor(2,1) = "101010"
  87.     令 scolor(2,2) = "080C0C"
  88.     令 scolor(2,3) = "040404"
  89.     令 scolor(3,0) = "040404"
  90.     令 scolor(3,1) = "0C0C0C"
  91.     令 scolor(3,2) = "040404"
  92.     令 scolor(3,3) = "040404"
  93.     令 scolor(4,0) = "101010"
  94.     令 scolor(4,1) = "040404"
  95.     令 scolor(4,2) = "040404"
  96.     令 scolor(4,3) = "040404"
  97.     令 scolor(5,0) = "080808"
  98.     令 scolor(5,1) = "080808"
  99.     令 scolor(5,2) = "040404"
  100.     令 scolor(5,3) = "0C0C0C"