十一、支持信息查询,请加这个命令qqinfo /cmds/std/qqinfo.c
/*个人信息查询命令
带参数,查询某人
不带参数,查询自己的。
*/
/*个人信息查询命令
带参数,查询某人
不带参数,查询自己的。
*/
Copy code
int main(object me,string arg)
{
object obj;
string str;
if(!arg)
obj=me;
if(arg&&sscanf(arg,"set %s",arg))
{
arg=replace_string(arg,"\"","");
arg=replace_string(arg,"'","");
arg=replace_string(arg,"\\","");
me->set("qqinfo",arg);
write(ALERT("你的个人信息已经设置成功!\n"));
return 1;
}
if(arg&&!objectp(obj))
obj = UPDATE_D->global_find_player(arg);
if(!objectp(obj)) return notify_fail(ALERT("无法查询对方信息。"));
if(stringp(str=obj->query("qqinfo")))
{
write(TMI("qqinfo"+((obj==me)?"0":"1")+" "+str));
return 1;
}
write(TMI("qqinfo"+((obj==me)?"0":"1")+""));
if(obj->query_temp("temp_loaded"))
UPDATE_D->global_destruct_player(obj,0);
return 1;
}