温馨提示×

温馨提示×

您好,登录后才能下订单哦!

密码登录×
登录注册×
其他方式登录
点击 登录注册 即表示同意《亿速云用户服务条款》

使用易语言怎么实现QQ全自动批量点赞功能

发布时间:2021-05-22 16:53:35 来源:亿速云 阅读:290 作者:Leah 栏目:编程语言

本篇文章给大家分享的是有关使用易语言怎么实现QQ全自动批量点赞功能,小编觉得挺实用的,因此分享给大家学习,希望大家阅读完这篇文章后可以有所收获,话不多说,跟着小编一起来看看吧。

利用模拟操作的方式实现QQ全自动点赞

此功能需要加载精易模块

.版本 2
.支持库 iext
.支持库 HtmlView
.支持库 spec
.程序集 窗口程序集1
.程序集变量 停止变量, 逻辑型
.子程序 __启动窗口_创建完毕
' 不允许多个QQ登录,不然每次需要手动选择点赞的号
.子程序 _导入按钮_被单击
.局部变量 分割文本, 文本型, , "0"
.局部变量 文本, 文本型
.局部变量 i1, 整数型
.局部变量 索引, 整数型
通用对话框1.初始目录 = 取运行目录 ()
.如果真 (通用对话框1.打开 () = 真)
  超级列表框1.全部删除 ()
  文本 = 到文本 (读入文件 (通用对话框1.文件名))
  分割文本 = 分割文本 (文本, #换行符, )
  .计次循环首 (取数组成员数 (分割文本), i1)
    系统_处理事件 ()
    索引 = 超级列表框1.插入表项 (超级列表框1.取表项数 () + 1, 到文本 (超级列表框1.取表项数 () + 1), , , , )
    超级列表框1.置标题 (索引, 1, 分割文本 [i1])
  .计次循环尾 ()
.如果真结束
.子程序 _点赞按钮_被单击
QQ个人资料_批量点赞 ()
.子程序 QQ个人资料_批量点赞
.局部变量 局_当前行, 整数型
.局部变量 局_句柄1, 整数型
.局部变量 局_句柄_整组, 整数型, , "0"
.局部变量 局_横坐标, 整数型
.局部变量 局_纵坐标, 整数型
.局部变量 N, 整数型
.局部变量 局_所有QQ_文组, 文本型, , "0"
局_横坐标 = 336
局_纵坐标 = 334
.计次循环首 (超级列表框1.取表项数 (), N)
  .如果真 (停止变量 = 真)
    返回 ()
  .如果真结束
  加入成员 (局_所有QQ_文组, 超级列表框1.取标题 (N - 1, 1))
.计次循环尾 ()
' -----------------------
窗口_模糊遍历窗口 (, , “的资料”, 局_句柄_整组)
系统_处理事件 ()
.如果真 (取数组成员数 (局_句柄_整组) > 0)
  .计次循环首 (取数组成员数 (局_句柄_整组), N)
    窗口_关闭 (局_句柄_整组 [N])
  .计次循环尾 ()
.如果真结束
' -----------------------
.计次循环首 (取数组成员数 (局_所有QQ_文组), N)
  .如果真 (停止变量 = 真)
    返回 ()
  .如果真结束
  超级列表框1.现行选中项 = N - 1
  超文本浏览框1.地址 = “tencent://ContactInfo/?subcmd=ViewInfo&puin=0&uin=” + 局_所有QQ_文组 [N]
  .计次循环首 (10, )
    延迟 (1000)
    局_句柄1 = 窗口_取句柄_模糊 (“的资料”, “TXGuiFoundation”)
    系统_处理事件 ()
    .如果真 (局_句柄1 > 0)
      跳出循环 ()
    .如果真结束
  .计次循环尾 ()
  超级列表框1.置标题 (N - 1, 2, “√”)
  .如果真 (局_句柄1 = 0)
    信息框 (“打开QQ个人资料失败”, #错误图标, “注&意:”)
    点赞按钮.禁止 = 假
    返回 ()
  .如果真结束
  ' --------------
  程序_延时 (1000)
  .计次循环首 (10, )
    系统_处理事件 ()
    鼠标_消息 (局_句柄1, 局_横坐标 + 100, 局_纵坐标, 2, 1)
    系统_处理事件 ()
    鼠标_消息 (局_句柄1, 局_横坐标, 局_纵坐标, 1, 1)
    程序_延时 (300)
    系统_处理事件 ()
    ' 调试输出 (“ 鼠标_消息 ”)
  .计次循环尾 ()
  程序_延时 (1000)
  窗口_关闭 (局_句柄1)
.计次循环尾 ()
信息框 (“完成”, 0, “注&意:”)
.子程序 _停止按钮_被单击
停止变量 = 真

以上就是使用易语言怎么实现QQ全自动批量点赞功能,小编相信有部分知识点可能是我们日常工作会见到或用到的。希望你能通过这篇文章学到更多知识。更多详情敬请关注亿速云行业资讯频道。

向AI问一下细节

免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。

AI