1. 令 chucuo = 0
  2. 用户定义变量 x=200 "你要刷多少疲劳"
  3. 调用 Msg.ShowScrTXT(0,0,1024,768,"正在确认分辨率","0000FF")
  4. 延时 500 毫秒
  5. 令 ca = Sys.GetScRX()
  6. 延时 500 毫秒
  7. 令 cb = Sys.GetScRY()
  8. 调用 Msg.HideScrTXT()
  9. 弹出窗口 "我准备好了!3秒就开始刷疲劳了!"
  10. 弹出窗口 "点确定后请点下游戏窗口!"
  11. 延时 3000 毫秒
  12. 设置模拟方式为:超级模拟
  13. 令 pl = 0
  14. 循环 x 次
  15.     调用 Msg.ShowScrTXT(0,0,1024,768,"已经刷了" & pl & "点疲劳","0000FF")
  16.     (键盘)按下 "Right" 键
  17.     标记 k
  18.     从左上到右下查找图片 "Attachment:\dnf1.bmp",把找到的坐标保存到 (a, b),指定区域(左:0 上:0 右:ca - 80 下:cb - 80),相似度 0.9
  19.     如果 a > 0 并且 b > 0 则
  20.         (键盘)弹起 "Right" 键
  21.         延时 50 毫秒
  22.         (鼠标)移动到 (a, b)
  23.         延时 50 毫秒
  24.         (鼠标)左键单击, 1次
  25.         跳转到标记 j
  26.     条件结束
  27.     跳转到标记 k
  28.     标记 j
  29.     延时 50 毫秒
  30.     (键盘)按 "Esc" 键, 1次
  31.     从左上到右下查找图片 "Attachment:\ts.bmp",把找到的坐标保存到 (a, b),指定区域(左:0 上:0 右:ca - 80 下:cb - 80),相似度 0.7
  32.     如果 a > 0 并且 b > 0 则
  33.         (鼠标)移动到 (a, b)
  34.         延时 50 毫秒
  35.         (鼠标)左键单击, 1次
  36.         跳转到标记 l
  37.     条件结束
  38.     跳转到标记 j
  39.     标记 l
  40.     延时 1000 毫秒
  41.     从左上到右下查找图片 "Attachment:\dnf4.bmp",把找到的坐标保存到 (a, b),指定区域(左:0 上:0 右:ca - 80 下:cb - 80),相似度 0.9
  42.     如果 a > 0 并且 b > 0 则
  43.         跳转到标记 m
  44.     条件结束
  45.     跳转到标记 l
  46.     标记 m
  47.     令 pl = pl + 1
  48. 循环结束
  49. 调用 Msg.ShowScrTXT(0,0,1024,768,"已经刷了" & pl & "点疲劳","0000FF")
  50. 弹出窗口 "完工!"
  51. 令 chucuo = 1
  52. 子程序 OnScriptExit()
  53.     如果 chucuo = 0 则
  54.         弹出窗口 "是不是没有用! 我的QQ是1467501813"
  55.     否则
  56.         脚本停止运行
  57.     条件结束
  58. 子程序结束