易语言制作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)
运行结果:
总结
以上是 易语言制作QQ前台全自动无限加好友的代码 的全部内容, 来源链接: utcz.com/z/336510.html