#include <lib.h>
inherit LIB_DAEMON;
string *foenames = ({});
mixed cmd(string str) {
object *foes = ({});
object ob;
string ret;
foenames = ({});
if(sizeof(str) && !creatorp(this_player())){
if(find_player(lower_case(str)) != this_player())
return "You can only know about your own enemies.";
}
if(!str) str = this_player()->GetKeyName();
ob = find_player(lower_case(str));
if(!ob) return "No such player found.";
foes = ob->GetEnemies();
if(!sizeof(foes)){
ret = "No creatures bear ill will toward "+capitalize(str)+".";
}
else {
ret = "The following creatures bear ill will toward "+
capitalize(str)+": ";
filter(foes, (: foenames += ({$1->GetShort()}) :) );
ret += implode(foenames, ", ")+".";
}
return ret;
}
void help() {
message("help",
"Syntax: enemies\n"
"This command reports who feels antagonism toward you.",
this_player() );
}
