易语言制作QQ前台全自动无限加好友的代码

187 阅读 0 评论 124 点赞

我是靠谱客的博主凶狠花卷，最近开发中收集的这篇文章主要介绍易语言制作QQ前台全自动无限加好友的代码，觉得挺不错的，现在分享给大家，希望可以做个参考。

概述

全局变量表

.版本 2
.全局变量 局_句柄, 整数型
.全局变量 a, 整数型
.全局变量 局1_句柄, 整数型
.全局变量 b, 整数型

常量数据表

.版本 2
.常量 GW_CHILD, "5", , 查找子窗口
.常量 GW_HWNDNEXT, "2", , 查找下一窗口

QQ前台全自动加好友

此功能需要加载精易模块5.6，利用模拟的方式添加好友，需要自行打开添加窗口，填写自己的QQ名称。

.版本 2
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
.子程序 _无限加按钮_被单击
功能1_取句柄 ()
b ＝ 局1_句柄
鼠标_消息 (b, 119, 100, 1, 1)
鼠标_消息 (b, 119, 100, 1, 1)
文本_投递 (b, 文本_取随机范围数字 (100000000, 999999999, ))
鼠标_消息 (b, 635, 119, 1, 1)
延迟 (500)
鼠标_消息 (b, 126, 308, 1, 1)
延迟 (1000)
功能_取句柄 ()
a ＝ 局_句柄
鼠标_消息 (a, 343, 346, 1, 1)
鼠标_消息 (a, 343, 346, 1, 1)
延迟 (1000)
鼠标_消息 (a, 448, 20, 1, 1)
_无限加按钮_被单击 ()
.子程序 功能_取句柄, 整数型, , 本子程序采用【精易编程助手】生成,成功返回窗口句柄,失败返回0
局_句柄 ＝ 窗口_取句柄 (, , “TXGuiFoundation”, 编辑框1.内容 ＋ “ - 添加好友”)
返回 (局_句柄)
.子程序 功能1_取句柄, 整数型, , 本子程序采用【精易编程助手】生成,成功返回窗口句柄,失败返回0
局1_句柄 ＝ 窗口_取句柄 (, , “TXGuiFoundation”, “查找”)
返回 (局_句柄)
.子程序 __启动窗口_将被销毁
结束 ()
.子程序 _加一次按钮_被单击
功能1_取句柄 ()
b ＝ 局1_句柄
鼠标_消息 (b, 119, 100, 1, 1)
鼠标_消息 (b, 119, 100, 1, 1)
文本_投递 (b, 文本_取随机范围数字 (100000000, 999999999, ))
鼠标_消息 (b, 635, 119, 1, 1)
延迟 (500)
鼠标_消息 (b, 126, 308, 1, 1)
延迟 (1000)
功能_取句柄 ()
a ＝ 局_句柄
鼠标_消息 (a, 343, 346, 1, 1)
鼠标_消息 (a, 343, 346, 1, 1)
延迟 (1000)
鼠标_消息 (a, 448, 20, 1, 1)

运行结果：