115网盘扫码登录易语言源码

.版本 2
.支持库 EThread
.支持库 spec

.程序集 窗口程序集_窗口1
.程序集变量 cookie, 文本型

.子程序 _图片框1_鼠标左键被放开, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

启动线程 (&LOGIN, , )

.子程序 LOGIN
.局部变量 uid, 文本型
.局部变量 sign, 文本型
.局部变量 time, 文本型
.局部变量 返回值, 文本型
.局部变量 time13, 文本型
.局部变量 str, 文本型

返回值 ＝ 到文本 (网页_访问 (“https://qrcodeapi.115.com/api/1.0/web/1.0/token”, 0, , , , , , , , ))
uid ＝ 文本_取出中间文本 (返回值, “uid” ＋ #引号 ＋ “:” ＋ #引号, #引号 ＋ “,” ＋ #引号 ＋ “time”, , )
sign ＝ 文本_取出中间文本 (返回值, “sign” ＋ #引号 ＋ “:” ＋ #引号, #引号 ＋ “}}”, , )
time ＝ 文本_取出中间文本 (返回值, “time” ＋ #引号 ＋ “:”, “,” ＋ #引号 ＋ “sign”, , )
time13 ＝ 时间_到时间戳 (, )
str ＝ “https://qrcodeapi.115.com/api/1.0/web/1.0/qrcode?qrfrom=1&&uid=” ＋ uid ＋ “&_” ＋ time13 ＋ “&_t=” ＋ time13
图片框1.图片 ＝ 网页_访问_对象 (str, , , , , , , , , , , , , , , )
.判断循环首 (真)
    str ＝ “https://qrcodeapi.115.com/get/status/?uid=” ＋ uid ＋ “&sign=” ＋ sign ＋ “&time=” ＋ time ＋ “&_=” ＋ 时间_到时间戳 (, )
    返回值 ＝ 到文本 (网页_访问 (str, 0, , , , , , , , ))
    返回值 ＝ 编码_utf8到gb2312 (返回值)
    调试输出 (返回值)
    .判断开始 (寻找文本 (返回值, “扫描成功”, , 假) ≠ -1)
        标签1.标题 ＝ “扫描成功，请在手机点确认以登录”
    .判断 (寻找文本 (返回值, #常量1, , 假) ≠ -1)
        标签1.标题 ＝ “登录成功！”
        跳出循环 ()
    .默认

    .判断结束

.判断循环尾 ()
网页_访问 (“https://passport.115.com/?ct=login&ac=qrcode&key=” ＋ uid ＋ “&v=&goto=https%3A%2F%2Fpassport.115.com%2F%3Fct%3Dlogin%26ac%3Dempty_page%26is_ssl%3D1”, , , , cookie, , , 真, , )
调试输出 (cookie)

@啪嚓8848