- 注释:接口:
- 注释: 【chuangkou】下拉框;大窗口:1 小窗口:2
- 注释: 【Hao】下拉框;1号~6号分别对应1—6
- 注释: 【B】输入框; 送花的数量!
- 注释: ★9.0正式版编写!★
- 注释:更新:
- 注释: 1、支持大小窗口
- 注释:
- 注释:关于:
- 注释: 作者Q:501934725
- 注释: 完整版脚本请到此下载:http://smallboy.ys168.com
- 定义环境变量 h
- 注释:==============================================窗口控制区
- 注释:延时提示
- 调用 找窗口()
- 注释:==============================================窗口检测完毕
- 标记 从头开始
- 注释:获得窗口起始点坐标
- 令 Rect = Window.GetClientRect(JB1)
- 定义变量 MyArrayh
- 令 MyArrayh = Split(Rect,"|")
- 令 Ux = CLng(MyArrayh(0))
- 令 Uy = CLng(MyArrayh(1))
- 注释:检测是否背景
- 注释:=小
- 如果 Form1.chuangkou.ListIndex = 2 则
- 如果点 (6 + Ux,584 + Uy) 的颜色等于 "0" 则
- 跳转到标记 继续1
- 否则
- (键盘)按 "F12" 键, 1次
- 条件结束
- 条件结束
- 注释:=大
- 如果 Form1.chuangkou.ListIndex = 1 则
- 如果点 (1 + Ux,765 + Uy) 的颜色等于 "0" 则
- 跳转到标记 继续1
- 否则
- (键盘)按 "F12" 键, 1次
- 条件结束
- 条件结束
- 定义变量 n
- 令 n = 0
- 标记 继续1
- 注释:=================================================检测是否游戏中
- 注释:=大
- 如果 Form1.chuangkou.ListIndex = 1 则
- 如果点 (886 + Ux,750 + Uy) 的颜色等于 "FBE7E2" 则
- 跳转到标记 继续2
- 否则
- 弹出窗口 "检测到已离开对局或未在对局中开启。点击确定后脚本将停止!如有需要请按启动热键重新启动!"
- 脚本停止运行
- 条件结束
- 条件结束
- 注释:=小
- 如果 Form1.chuangkou.ListIndex = 2 则
- 如果点 (692 + Ux,585 + Uy) 的颜色等于 "FAEFEC" 则
- 跳转到标记 继续2
- 否则
- 弹出窗口 "检测到已离开对局或未在对局中开启。点击确定后脚本将停止!如有需要请按启动热键重新启动!"
- 脚本停止运行
- 条件结束
- 条件结束
- 标记 继续2
- 注释:开始送花操作
- (键盘)按 "Z" 键, 1次
- (键盘)按 "X" 键, 1次
- 如果 Form1.chuangkou.ListIndex = 1 则
- 注释:一号
- 如果 Form1.Hao.ListIndex = 1 则
- (鼠标)移动到 (459 + Ux, 315 + Uy)
- 延时 5 毫秒
- (鼠标)左键双击, 1次
- 延时 5 毫秒
- 条件结束
- 注释:二号
- 如果 Form1.Hao.ListIndex = 2 则
- (鼠标)移动到 (459 + Ux, 343 + Uy)
- 延时 5 毫秒
- (鼠标)左键双击, 1次
- 延时 5 毫秒
- 条件结束
- 注释:三号
- 如果 Form1.Hao.ListIndex = 3 则
- (鼠标)移动到 (459 + Ux, 371 + Uy)
- 延时 5 毫秒
- (鼠标)左键双击, 1次
- 延时 5 毫秒
- 条件结束
- 注释:四号
- 如果 Form1.Hao.ListIndex = 4 则
- (鼠标)移动到 (459 + Ux, 399 + Uy)
- 延时 5 毫秒
- (鼠标)左键双击, 1次
- 延时 5 毫秒
- 条件结束
- 注释:五号
- 如果 Form1.Hao.ListIndex = 5 则
- (鼠标)移动到 (459 + Ux, 427 + Uy)
- 延时 5 毫秒
- (鼠标)左键双击, 1次