取消QQ主显易语言源码（关闭QQ查找）

取消QQ主显易语言源码（关闭QQ查找）

@精易-亮亮

.版本 2

.子程序 取消主显, 文本型, 公开
.参数 Cookie, 文本型
.参数 是否取消, 逻辑型, 可空, 真 开启主显  假 关闭主显  默认为关闭
.局部变量 JSON, 类_json
.局部变量 URL, 文本型
.局部变量 Uin, 文本型
.局部变量 Isseach, 文本型
.局部变量 Skey, 文本型

.如果真 (是否为空 (是否取消))
    是否取消 ＝ 假
.如果真结束
.如果真 (是否取消 ＝ 真)
    Isseach ＝ “1”
.如果真结束
.如果真 (是否取消 ＝ 假)
    Isseach ＝ “0”
.如果真结束
Uin ＝ 网页_取单条Cookie (Cookie, “uin”, 真)
Uin ＝ 文本_取右边 (Uin, “o”, , )
Skey ＝ 网页_取单条Cookie (Cookie, “skey”, 真)
Cookie ＝ “uin=o” ＋ Uin ＋ “; ” ＋ “skey=” ＋ Skey
URL ＝ “https://accountadm.qq.com/cgi-bin/set_acc?bkn=” ＋ Get_值 (Skey) ＋ “&type=0&acc=” ＋ Uin ＋ “&1546750110744&isseach=” ＋ Isseach
JSON.解析 (编码_URL解码 (到文本 (网页_访问 (URL, 0, , Cookie, , , , , , , )), 真))
.如果真 (JSON.取属性 (“ec”).取数据文本 () ＝ “0”)
    .如果真 (是否取消 ＝ 真)
        返回 (“开启主显成功”)
    .如果真结束
    .如果真 (是否取消 ＝ 假)
        返回 (“关闭主显成功”)
    .如果真结束
    ' 本源码来自三叶资源网(www.sanye.cx)
.如果真结束
.如果真 (JSON.取属性 (“ec”).取数据文本 () ≠ “0”)
    返回 (“开启或关闭主显失败 未知错误”)
.如果真结束
返回 (“”)