Steam登录易语言源码

Steam登录易语言源码

.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口
.程序集变量 cookie, 文本型
.程序集变量 cookie1, 文本型
.程序集变量 captchagid, 文本型

.子程序 _按钮1_被单击
.局部变量 返回值, 文本型
.局部变量 key, 文本型
.局部变量 密码, 文本型

返回值 ＝ 到文本 (网页_访问_对象 (“http://store.steampowered.com/”, , , cookie, cookie1))
返回值 ＝ 到文本 (网页_访问_对象 (“https://store.steampowered.com/login/getrsakey/”, 1, “donotcache=” ＋ 时间_取现行时间戳 () ＋ “&username=” ＋ 编辑框1.内容, cookie, cookie1))
key ＝ 文本_取出中间文本 (返回值, “publickey_mod” ＋ #引号 ＋ “:” ＋ #引号, #引号)
调试输出 (返回值)
密码 ＝ Getjs (编辑框2.内容, key)
返回值 ＝ 到文本 (网页_访问_对象 (“https://store.steampowered.com/login/dologin/”, 1, “donotcache=” ＋ 时间_取现行时间戳 () ＋ “&password=” ＋ 密码 ＋ “&username=” ＋ 文本_替换 (编辑框2.内容, , , , “@”, “&40”) ＋ “&twofactorcode=&emailauth=&loginfriendlyname=&captchagid=” ＋ captchagid ＋ “&captcha_text=” ＋ 编辑框3.内容 ＋ “&emailsteamid=&rsatimestamp=” ＋ 文本_取出中间文本 (返回值, “timestamp” ＋ #引号 ＋ “:” ＋ #引号, #引号) ＋ “&remember_login=false”, cookie, cookie1))
调试输出 (返回值)
调试输出 (密码)

.子程序 _图片框1_鼠标左键被放开, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
.局部变量 返回值, 文本型

返回值 ＝ 到文本 (网页_访问_对象 (“https://store.steampowered.com/login/refreshcaptcha/”, 1, “donotcache=” ＋ 时间_取现行时间戳 (), cookie, cookie1))
调试输出 (文本_取出中间文本 (返回值, “gid” ＋ #引号 ＋ “:” ＋ #引号, #引号))

captchagid ＝ 文本_取出中间文本 (返回值, “gid” ＋ #引号 ＋ “:” ＋ #引号, #引号)
图片框1.图片 ＝ 网页_访问_对象 (“https://store.steampowered.com/login/rendercaptcha/?gid=” ＋ captchagid, , , cookie, cookie1)

.子程序 Getjs, 文本型, , ★此代码由人善帝王心POST助手生成☆
.参数 value1, 文本型
.参数 value2, 文本型
.局部变量 obj, 类_脚本组件
.局部变量 tmp, 文本型

线程_初始化COM库 ()
obj.执行 (#常量2)
tmp ＝ obj.计算表达式 (“txt('” ＋ value1 ＋ “','” ＋ value2 ＋ “')”)
线程_取消COM库 ()
返回 (tmp)

@易商软件制作