1. 注释:接口:
  2. 注释: 【chuangkou】下拉框;大窗口:1 小窗口:2
  3. 注释: 【Hao】下拉框;1号~6号分别对应1—6
  4. 注释: 【B】输入框; 送花的数量!
  5. 注释: ★9.0正式版编写!★
  6. 注释:更新:
  7. 注释: 1、支持大小窗口
  8. 注释:
  9. 注释:关于:
  10. 注释: 作者Q:501934725
  11. 注释: 完整版脚本请到此下载:http://smallboy.ys168.com
  12. 定义环境变量 h
  13. 注释:==============================================窗口控制区
  14. 注释:延时提示
  15. 调用 找窗口()
  16. 注释:==============================================窗口检测完毕
  17. 标记 从头开始
  18. 注释:获得窗口起始点坐标
  19. 令 Rect = Window.GetClientRect(JB1)
  20. 定义变量 MyArrayh
  21. 令 MyArrayh = Split(Rect,"|")
  22. 令 Ux = CLng(MyArrayh(0))
  23. 令 Uy = CLng(MyArrayh(1))
  24. 注释:检测是否背景
  25. 注释:=小
  26. 如果 Form1.chuangkou.ListIndex = 2 则
  27.     如果点 (6 + Ux,584 + Uy) 的颜色等于 "0" 则
  28.         跳转到标记 继续1
  29.     否则
  30.         (键盘)按 "F12" 键, 1次
  31.     条件结束
  32. 条件结束
  33. 注释:=大
  34. 如果 Form1.chuangkou.ListIndex = 1 则
  35.     如果点 (1 + Ux,765 + Uy) 的颜色等于 "0" 则
  36.         跳转到标记 继续1
  37.     否则
  38.         (键盘)按 "F12" 键, 1次
  39.     条件结束
  40. 条件结束
  41. 定义变量 n
  42. 令 n = 0
  43. 标记 继续1
  44. 注释:=================================================检测是否游戏中
  45. 注释:=大
  46. 如果 Form1.chuangkou.ListIndex = 1 则
  47.     如果点 (886 + Ux,750 + Uy) 的颜色等于 "FBE7E2" 则
  48.         跳转到标记 继续2
  49.     否则
  50.         弹出窗口 "检测到已离开对局或未在对局中开启。点击确定后脚本将停止!如有需要请按启动热键重新启动!"
  51.         脚本停止运行
  52.     条件结束
  53. 条件结束
  54. 注释:=小
  55. 如果 Form1.chuangkou.ListIndex = 2 则
  56.     如果点 (692 + Ux,585 + Uy) 的颜色等于 "FAEFEC" 则
  57.         跳转到标记 继续2
  58.     否则
  59.         弹出窗口 "检测到已离开对局或未在对局中开启。点击确定后脚本将停止!如有需要请按启动热键重新启动!"
  60.         脚本停止运行
  61.     条件结束
  62. 条件结束
  63. 标记 继续2
  64. 注释:开始送花操作
  65. (键盘)按 "Z" 键, 1次
  66. (键盘)按 "X" 键, 1次
  67. 如果 Form1.chuangkou.ListIndex = 1 则
  68.     注释:一号
  69.     如果 Form1.Hao.ListIndex = 1 则
  70.         (鼠标)移动到 (459 + Ux, 315 + Uy)
  71.         延时 5 毫秒
  72.         (鼠标)左键双击, 1次
  73.         延时 5 毫秒
  74.     条件结束
  75.     注释:二号
  76.     如果 Form1.Hao.ListIndex = 2 则
  77.         (鼠标)移动到 (459 + Ux, 343 + Uy)
  78.         延时 5 毫秒
  79.         (鼠标)左键双击, 1次
  80.         延时 5 毫秒
  81.     条件结束
  82.     注释:三号
  83.     如果 Form1.Hao.ListIndex = 3 则
  84.         (鼠标)移动到 (459 + Ux, 371 + Uy)
  85.         延时 5 毫秒
  86.         (鼠标)左键双击, 1次
  87.         延时 5 毫秒
  88.     条件结束
  89.     注释:四号
  90.     如果 Form1.Hao.ListIndex = 4 则
  91.         (鼠标)移动到 (459 + Ux, 399 + Uy)
  92.         延时 5 毫秒
  93.         (鼠标)左键双击, 1次
  94.         延时 5 毫秒
  95.     条件结束
  96.     注释:五号
  97.     如果 Form1.Hao.ListIndex = 5 则
  98.         (鼠标)移动到 (459 + Ux, 427 + Uy)
  99.         延时 5 毫秒
  100.         (鼠标)左键双击, 1次