1. 令 HwndA = Window.Foreground()
  2. 令 HwndB = Window.GetKeyFocusWnd()
  3. 用户定义变量 FireFrequency=10 "开枪频率【建议进游戏后调节!】"
  4. 用户定义变量 FireOne=0 "第一枪延时!"
  5. 用户定义变量 BulletQuantity=30 "子弹数量!"
  6. 用户定义变量 Shooting=1 "每次开枪子弹连射数量"
  7. 令 FireF = FireFrequency
  8. 令 FireO = FireOne
  9. 令 BulletQ = BulletQuantity
  10. 令 BulletA = BulletQ
  11. 标记 AutounFire
  12. 按 从左上到右下 的方式查找颜色 "2141C6",把找到的坐标保存到 (FireAX, FireAY),指定区域(左:396 上:296 右:404 下:380),相似度 0.7
  13. 如果 FireAX > 0 并且 FireAY > 0 则
  14.     调用 Fire()
  15. 条件结束
  16. 按 从左上到右下 的方式查找颜色 "2E3BAD",把找到的坐标保存到 (FireBX, FireBY),指定区域(左:396 上:296 右:404 下:380),相似度 0.7
  17. 如果 FireBX > 0 并且 FireBY > 0 则
  18.     调用 Fire()
  19. 条件结束
  20. 跳转到标记 AutounFire
  21. 子程序 Fire()
  22.     如果 BulletB >= 1 则
  23.         循环 Shooting 次
  24.             调用 Bkgnd.LeftClick(HwndB,400,300)
  25.             令 BulletB = BulletB - Shooting
  26.             延时 FireF 毫秒
  27.         循环结束
  28.     否则
  29.         循环 Shooting 次
  30.             调用 Bkgnd.LeftClick(HwndB,400,300)
  31.             令 BulletB = BulletA - Shooting
  32.             延时 FireF 毫秒
  33.         循环结束
  34.     条件结束
  35.     如果 BulletB = 0 则
  36.         (键盘)按 "R" 键, 1次
  37.         延时 3000 毫秒
  38.         令 BulletQ = BulletA
  39.     否则
  40.         令 BulletQ = BulletB
  41.     条件结束
  42. 子程序结束