
子程序 取QQ名称, 文本型, 公开
.参数 QQ号, 文本型
.局部变量 文本, 文本型
.局部变量 分割, 文本型, , "0"文本 = 到文本 (HTTP.读文件 (“ http://base.qzone.qq.com/fcg-bin/cgi_get_portrait.fcg?uins=” + QQ号))
分割 = 分割文本 (文本, #引号, )
分割 = 分割文本 (分割 [取数组成员数 (分割) - 1], “?” + #引号 + “,0]})” + #右引号, )
.如果真 (取数组成员数 (分割) = 0)
返回 (“未知???”)
.如果真结束
返回 (分割 [1])
.参数 QQ号, 文本型
.局部变量 文本, 文本型
.局部变量 分割, 文本型, , "0"文本 = 到文本 (HTTP.读文件 (“ http://base.qzone.qq.com/fcg-bin/cgi_get_portrait.fcg?uins=” + QQ号))
分割 = 分割文本 (文本, #引号, )
分割 = 分割文本 (分割 [取数组成员数 (分割) - 1], “?” + #引号 + “,0]})” + #右引号, )
.如果真 (取数组成员数 (分割) = 0)
返回 (“未知???”)
.如果真结束
返回 (分割 [1])