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

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

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

.版本 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)