- .版本 2
- .子程序 获取本机在线QQ, 整数型
- .参数 返回QQ, 文本型, 参考 数组
- .局部变量 返回TIM进程ID, 整数型, , "0"
- .局部变量 i, 整数型
- .局部变量 读取的数据, 文本型
- .局部变量 类_内存, 类_内存
- 清除数组 (返回QQ)
- .如果真 (进程_是否存在 (“TIM.exe”, 真) 且 文件_取文件版本号 (进程_取路径 (进程_名取ID (“TIM.exe”))) = “3.4.8.22092”)
- 进程_取同名ID (“TIM.exe”, 返回TIM进程ID, 真)
- .计次循环首 (取数组成员数 (返回TIM进程ID), i)
- ' 调试输出 (文件_取文件版本号 (进程_取路径 (返回TIM进程ID <i>), ))
- 读取的数据 = 类_内存.读文本 (返回TIM进程ID <i>, 进程_取模块句柄1 (返回TIM进程ID <i>, “SSOHelpSdk.dll”) + 进制_十六到十 (“482800”), 20)
- .如果真 (读取的数据 ≠ “0”)
- 加入成员 (返回QQ, 读取的数据)
- .如果真结束
- .计次循环尾 ()
- .如果真结束
- .如果真 (进程_是否存在 (“QQ.exe”, 真) 且 文件_取文件版本号 (进程_取路径 (进程_名取ID (“QQ.exe”))) = “9.7.17.29225”)
- 进程_取同名ID (“QQ.exe”, 返回TIM进程ID, 真)
- .计次循环首 (取数组成员数 (返回TIM进程ID), i)
- 读取的数据 = 类_内存.读文本 (返回TIM进程ID <i>, 进程_取模块句柄1 (返回TIM进程ID <i>, “SSOHelpSdk.dll”) + 进制_十六到十 (“48EF80”), 20)
- .如果真 (读取的数据 ≠ “0”)
- 加入成员 (返回QQ, 读取的数据)
- .如果真结束
- .计次循环尾 ()
- .如果真结束
- 返回 (取数组成员数 (返回QQ))