1. 展开附件 *.wav 到 D:\ 文件夹
  2. 定义变量 hong, lan, hongT, lanT, xgT, bbh, hgsd
  3. 定义变量 number(2), thetime(2), key(2), sj(2)
  4. 定义变量 a, b, c, d, jn1, jn2, jn3, s1, s2, s3, t1, t2, t3, L
  5. 注释:声明变量
  6. 用户定义变量 hong=DropList{"30%":30|"50%":50|"70%":70|"90%":90|"95%":95}=1 "人多少吃红F5"
  7. 用户定义变量 lan=DropList{"30%":30|"50%":50|"70%":70}=1 "人多少吃蓝F6"
  8. 用户定义变量 bbh=DropList{"30%":30|"50%":50|"70%":70|"90%":90|"95%":95}=1 "宠多少吃红F7"
  9. 用户定义变量 hongT=10000 "红药冷却时间"
  10. 用户定义变量 lanT=1000 "蓝药冷却时间"
  11. 用户定义变量 xgT=1000 "寻怪延时"
  12. 标记 开始
  13. 调用 外挂提示()
  14. 如果点 (247,31) 的颜色约等于 "101410" 则
  15.     标记 继续找怪
  16.     调用 寻怪()
  17.     标记 正式开始
  18.     调用 吃血蓝()
  19.     延时 200 毫秒
  20.     调用 锁定怪()
  21.     延时 50 毫秒
  22. 否则
  23.     调用 外挂提示()
  24. 条件结束
  25. 如果点 (247,31) 的颜色约等于 "000fff" 则
  26.     调用 打怪()
  27. 否则
  28.     如果点 (223,30) 的颜色不等于 "000000" 则
  29.         调用 外挂提示()
  30.         跳转到标记 继续找怪
  31.     否则
  32.         跳转到标记 开始
  33.     条件结束
  34. 条件结束
  35. 子程序 关闭意外窗口()
  36.     调用 从左上到右下查找图片 "Attachment:\tlxx.bmp",把找到的坐标保存到 (x, y),指定区域(左:0 上:0 右:1024 下:768),相似度 0.6
  37.     如果 x > 0 并且 y > 0 则
  38.         (鼠标)移动到 (x + 2, y + 2)
  39.         (鼠标)左键单击, 1次
  40.     条件结束
  41.     注释:条件结束
  42.     延时 200 毫秒
  43. 子程序结束
  44. 子程序 外挂提示()
  45.     调用 从左上到右下查找图片 "Attachment:\tlfwg.bmp",把找到的坐标保存到 (x, y),指定区域(左:2 上:107 右:566 下:568),相似度 0.6
  46.     如果 x > 0 并且 y > 0 则
  47.         循环 3 次
  48.             调用 报警()
  49.         循环结束
  50.         延时 20 毫秒
  51.         调用 从左上到右下查找图片 "Attachment:\tlfwgg.bmp",把找到的坐标保存到 (x, y),指定区域(左:2 上:107 右:566 下:568),相似度 0.6
  52.         如果 x > 0 并且 y > 0 则
  53.             (鼠标)移动到 (886, 746)
  54.             延时 20 毫秒
  55.             (鼠标)左键单击, 1次
  56.             延时 1000 毫秒
  57.             (鼠标)移动到 (515, 398)
  58.             延时 20 毫秒
  59.             (鼠标)左键单击, 1次
  60.         条件结束
  61.     条件结束
  62. 子程序结束
  63. 子程序 报警()
  64.     令 strSoundFile = "d:\5201.wav"
  65.     令 objShell = CreateObject("Wscript.Shell")
  66.     令 strCommand = "sndrec32 /play /close " & chr(34) & strSoundFile & chr(34)
  67.     objShell.Run(strCommand,0,True)
  68.     延时 2000 毫秒
  69. 子程序结束
  70. 子程序 吃血蓝()
  71.     如果点 (hong / 100 * (185 - 65) + 65,30) 的颜色约等于 "1b1f1a" 则
  72.         注释:x2=血条在屏幕最右端坐标,x1=血条在屏幕最左端坐标,
  73.         注释:y=x1,x2在血条中的同一纵坐标,color=血条的空血颜色值。
  74.         (键盘)按 F5 键, 1次
  75.         注释:按下补血快捷键
  76.         延时 hongT 毫秒
  77.         注释:补血延时
  78.     条件结束
  79.     如果点 (lan / 100 * (185 - 65) + 65,37) 的颜色约等于 "1b1f1a" 则
  80.         注释:x2=血条在屏幕最右端坐标,x1=血条在屏幕最左端坐标,
  81.         注释:y=x1,x2在血条中的同一纵坐标,color=血条的空血颜色值。
  82.         (键盘)按 F6 键, 1次
  83.         注释:按下补血快捷键
  84.         延时 lanT 毫秒
  85.         注释:补血延时
  86.     条件结束
  87.     如果点 (bbh / 100 * (185 - 92) + 92,70) 的颜色约等于 "111310" 则
  88.         注释:x2=血条在屏幕最右端坐标,x1=血条在屏幕最左端坐标,
  89.         注释:y=x1,x2在血条中的同一纵坐标,color=血条的空血颜色值。
  90.         (键盘)按 F7 键, 1次
  91.         注释:按下补血快捷键
  92.         延时 lanT 毫秒
  93.         注释:补血延时
  94.     条件结束
  95. 子程序结束
  96. 子程序 寻怪()
  97.     调用 从左上到右下查找图片 "Attachment:\dthd.bmp",把找到的坐标保存到 (x, y),指定区域(左:878 上:42 右:1016 下:197),相似度 0.4
  98.     如果 x > 0 并且 y > 0 则
  99.         (鼠标)移动到 (x + 4, y + 4)
  100.         (鼠标)左键单击, 1次