易语言制作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

回到顶部