/* snoopers command, trial out by Turrican for a commands daemon. */ #include <creator.h> inherit COMMAND_BASE; mixed cmd(string str) { object *obs; int i; obs = (object *)PEOPLER->get_people(str); obs = filter_array(obs, "check_snoop", this_object()); if (!sizeof(obs)) { notify_fail("No one is being snooped by anyone.\n"); return 0; } for (i=0;i<sizeof(obs);i++) write(obs[i]->query_cap_name()+" is snooping "+ obs[i]->query_snoopee()->query_cap_name()+".\n"); return 1; } int check_snoop(object ob) { if((object)ob->query_snoopee()) return 1; else return 0; }