.版本 2 .支持库 iext .子程序 __启动窗口_首次激活 .局部变量 sz, 整数型, , "0" .局部变量 i, 整数型 .局部变量 bx, 整数型 .局部变量 内存, 类_内存 .局部变量 内容, 文本型, , "3" .局部变量 a, 文本型 .局部变量 b, 文本型 进程_取ID数组 (“WeChat.exe”, 进程id) 输出调试文本 (“首次激活 ” ＋ 到文本 (取数组成员数 (进程id))) 内存.搜索 (进程id [1], 到字节集 (“v1_”), sz) .计次循环首 (取数组成员数 (sz), i) 内容 [1] ＝ 编码_URL解码 (内存.读文本 (进程id [1], sz [i] － 子程序 (进程id [1], sz [i]), 200), 真) .如果真 (寻找文本 (内容 [1], “http”, , 假) ＝ -1 或 超级列表框1.查找表项 (内容 [1], , , 5) ≠ -1) 到循环尾 () .如果真结束 bx ＝ 超级列表框1.插入表项 (, 到文本 (超级列表框1.取表项数 () ＋ 1), , , , ) 超级列表框1.置标题 (bx, 5, 内容 [1]) .如果真 (取文本左边 (内容 [1], 5) ＝ “wxid_”) 超级列表框1.置标题 (bx, 1, 取文本左边 (内容 [1], 19)) 内容 [1] ＝ 取文本右边 (内容 [1], 取文本长度 (内容 [1]) － 19) .如果真结束 .如果真 (取文本左边 (内容 [1], 3) ＝ “gh_”) 超级列表框1.置标题 (bx, 1, 取文本左边 (内容 [1], 15)) 内容 [1] ＝ 取文本右边 (内容 [1], 取文本长度 (内容 [1]) － 15) .如果真结束 超级列表框1.置标题 (bx, 2, 取文本左边 (内容 [1], 寻找文本 (内容 [1], “v1_”, , 假) － 1)) 内容 [1] ＝ 取文本右边 (内容 [1], 取文本长度 (内容 [1]) － 倒找文本 (内容 [1], “v1_”, , 假) ＋ 1) 超级列表框1.置标题 (bx, 3, 取文本左边 (内容 [1], 寻找文本 (内容 [1], “@stranger”, , 假) － 1)) 超级列表框1.置标题 (bx, 4, 文本_取出中间文本 (内容 [1], “@stranger”, “http”, , ))