1. 注释:因为看见按键精灵主页上的那个关于QQ找茬的代码太过简陋 并且方法效率太低下 所以写一个
  2. 注释:最好的找茬脚本奉献上来 提供大家学习
  3. 注释:用8.x写的
  4. 注释:作者:tiger4
  5. 注释:/
  6. 注释:///////////////////////////////
  7. 注释:
  8. 注释:选择是美女找茬 还是 普通找茬 默认美女找茬
  9. 用户定义变量 xuanze=DropList{"美女找茬":"1"|"普通找茬":"2"}=1 "QQ游戏找茬"
  10. 注释:寻找定位点 这里的定位点是找茬游戏左上角的星星上的一个点
  11. 调用 从左上到右下查找颜色 "C8FCF8",把找到的坐标保存到 (X, Y),指定区域(左:0 上:0 右:1680 下:1024)
  12. 注释:定义两个数组来存 不同点的X坐标和Y坐标
  13. 定义变量 kk(1850), kw(1850)
  14. 注释: 定位左边画面起点坐标
  15. 令 dqx = x - 5
  16. 令 dqy = y + 187
  17. 注释:这里的IF是判断选择了美女找茬还是选择了普通找茬
  18. 如果 xuanze = 1 则
  19.     注释:美女找茬 游戏时间条上的一个点的坐标 这个点控制找不同脚本的停止与开始
  20.     令 d3x = x + 135
  21.     令 d3y = y + 174
  22.     注释:这里定义的是 美女找茬两副图之间的x坐标差
  23.     令 d2qx = 509
  24.     注释:这里定义的是 美女找茬第一副图的X坐标终结点
  25.     令 dzx = x + 488
  26.     注释:这里定义的是 美女找茬第一副图的Y坐标终结点
  27.     令 dzy = y + 633
  28. 否则
  29.     注释:普通找茬 游戏时间条上的一个点的坐标 标 这个点控制找不同脚本的停止与开始
  30.     令 d3x = x + 350
  31.     令 d3y = y + 31
  32.     注释:这里定义的是 普通找茬两副图之间的x坐标差
  33.     令 d2qx = 393
  34.     注释:这里定义的是 普通找茬第一副图的X坐标终结点
  35.     令 dzx = x + 371
  36.     注释:这里定义的是 普通找茬第一副图的Y坐标终结点
  37.     令 dzy = y + 464
  38. 条件结束
  39. 注释:将起点坐标复制一份 以便等下坐标的回归
  40. 令 dqxf = dqx
  41. 令 dqyf = dqy
  42. 注释:用个大循环控制脚本开启后永远执行
  43. 循环当 1 时
  44.     注释:定义一些控制变量 来达到控制流程的目的
  45.     令 a = 1
  46.     令 i = 0
  47.     令 i1 = 0
  48.     令 ak = 0
  49.     令 aa = 0
  50.     注释:清空屏
  51.     调用 Msg.HideScrTXT()
  52.     注释: 这里While 里面的内容是用时间条上的点来控制是否开始找茬
  53.     循环当 aa = 0 时
  54.         注释:得到时间条上点的颜色
  55.         令 GC1 = 得到指定点 (d3x, d3y) 的颜色
  56.         注释:如果颜色为这两个色 就说明游戏已经开始 这时候就跳出循环执行下面脚本
  57.         如果 gc1 = "E0ECA0" 或者 gc1 = "F8B400" 则
  58.             令 aa = 1
  59.         否则
  60.             注释:如果没有检测到时间条的颜色则加个延迟 然后循环执行直到颜色对才执行下面脚本
  61.             延时 100 毫秒
  62.         条件结束
  63.     循环结束
  64.     注释:这里的While里面的内容是找茬的核心对比部分
  65.     循环当 a = 1 时
  66.         注释:获取第一幅图上的点的颜色
  67.         令 GetColor = 得到指定点 (dqx, dqy) 的颜色
  68.         注释:获取第二幅图上的对应 第一幅图的点的颜色
  69.         令 GetColor1 = 得到指定点 (dqx + d2qx, dqy) 的颜色
  70.         注释:对比这两个颜色 如果一样则什么也不做
  71.         如果 GetColor1 = GetColor 则
  72.         否则
  73.             注释:如果两个点不一样 则分别将X坐标存到kk数组 y坐标存到kw数组 然后流程控制i+1
  74.             令 kk(i) = dqx
  75.             令 kw(i) = dqy
  76.             令 i = i + 1
  77.             注释:这句可有可无 主要是将i的值显示出来看看执行到什么程度
  78.             调用 Msg.ShowScrTXT(x,y - 30,x + 300,y + 20,"扫描不同中 " & i & "","0000FF")
  79.         条件结束
  80.         注释:判断完一个点之后 x坐标加8
  81.         令 dqx = dqx + 8
  82.         注释:如果x超出了第一幅图的长度则 x回归到图的左边y坐标加10
  83.         如果 dqx > dzx 则
  84.             令 dqx = dqxf
  85.             令 dqy = dqy + 10
  86.             注释:如果y坐标超出图的下标 则用流程控制变量a=2跳出循环 并且把x,y回归到第一图的左上
  87.         否则如果 dqy > dzy 则
  88.             令 a = 2
  89.             令 dqx = dqxf
  90.             令 dqy = dqyf
  91.         条件结束
  92.     循环结束
  93.     注释:这句可有可无 主要是用来显示是否已经点的对比
  94.     调用 Msg.ShowScrTXT(x,y - 30,x + 200,y + 20,"扫描完成 ","00FF00")
  95.     注释:这里的While 是控制将不同的点输出在图片上 因为游戏不断的刷新界面造成显示不能停留所以要循环
  96.     循环当 a = 2 时
  97.         注释:用这句将数组kk,kw里面的x,y坐标依次输出在屏幕相应x,y点上
  98.         调用 Msg.ShowScrTXT(kk(i1),kw(i1),kk(i1) + 5,kw(i1) + 5,"■","000000")
  99.         注释:流程控制变量i1+1
  100.         令 i1 = i1 + 1