- 用户定义变量 Hao=DropList{"一号":"1"|"二号":"2"|"三号":"3"|"四号":"4"|"五号":"5"|"六号":"6"}=1 "请选择受花者(默认一号)"
- 用户定义变量 B=99 "输入需要送花的数量(Z+X总数)"
- 注释:==========================================系统限制
- 令 OS = Sys.GetOSType()
- 如果 OS = 5 则
- 跳转到标记 检测桌面分辨率
- 否则
- 弹出窗口 "抱歉,检测到您的系统不支持本脚本(本脚本仅支持win7操作系统,敬请谅解!)"
- 脚本停止运行
- 条件结束
- 标记 检测桌面分辨率
- 注释:==============================================窗口控制区
- 注释:延时提示
- 延时 500 毫秒
- 弹出窗口 "点击确定后两秒内点击QQ炫舞窗口"
- 延时 2000 毫秒
- 注释:得到当前可以发送按键消息的窗口
- 令 Jubing = Window.GetKeyFocusWnd()
- 注释:==============================================窗口检测完毕
- 标记 从头开始
- 注释:获得窗口起始点坐标
- 令 Rect = Window.GetClientRect(Jubing)
- 定义变量 MyArray
- 令 MyArray = Split(Rect,"|")
- 令 Ux = CLng(MyArray(0))
- 令 Uy = CLng(MyArray(1))
- 注释:检测是否背景
- 如果点 (1 + Ux,765 + Uy) 的颜色等于 "0" 则
- 跳转到标记 继续1
- 否则
- (键盘)按 "F12" 键, 1次
- 条件结束
- 定义变量 n
- 令 n = 0
- 标记 继续1
- 注释:检测是否游戏中
- 如果点 (886 + Ux,750 + Uy) 的颜色等于 "FBE7E2" 则
- 跳转到标记 继续2
- 否则
- 弹出窗口 "检测到已离开对局或未在对局中开启。点击确定后脚本将停止!如有需要请按启动热键重新启动!"
- 脚本停止运行
- 条件结束
- 标记 继续2
- 注释:开始送花操作
- (键盘)按 "Z" 键, 1次
- (键盘)按 "X" 键, 1次
- 注释:一号
- 如果 Hao = 1 则
- (鼠标)移动到 (459 + Ux, 315 + Uy)
- 延时 5 毫秒
- (鼠标)左键双击, 1次
- 延时 5 毫秒
- 条件结束
- 注释:二号
- 如果 Hao = 2 则
- (鼠标)移动到 (459 + Ux, 343 + Uy)
- 延时 5 毫秒
- (鼠标)左键双击, 1次
- 延时 5 毫秒
- 条件结束
- 注释:三号
- 如果 Hao = 3 则
- (鼠标)移动到 (459 + Ux, 371 + Uy)
- 延时 5 毫秒
- (鼠标)左键双击, 1次
- 延时 5 毫秒
- 条件结束
- 注释:四号
- 如果 Hao = 4 则
- (鼠标)移动到 (459 + Ux, 399 + Uy)
- 延时 5 毫秒
- (鼠标)左键双击, 1次
- 延时 5 毫秒
- 条件结束
- 注释:五号
- 如果 Hao = 5 则
- (鼠标)移动到 (459 + Ux, 427 + Uy)
- 延时 5 毫秒
- (鼠标)左键双击, 1次
- 延时 5 毫秒
- 条件结束
- 注释:六号
- 如果 Hao = 6 则
- (鼠标)移动到 (459 + Ux, 455 + Uy)
- 延时 5 毫秒
- (鼠标)左键双击, 1次
- 延时 5 毫秒
- 条件结束
- 注释:送花结束
- 令 n = n + 1
- 如果 n = B 则
- 延时 300 毫秒
- 弹出窗口 "已送花朵:" & B
- 脚本停止运行
- 否则
- 跳转到标记 继续1
- 条件结束
- 注释:======================================程序结束