inherit COMMAND_BASE; int cmd(object *obs) { object *ok, ob; string s; ok = ({ }); foreach (ob in obs) if (ob->remove_follower(TP)) ok += ({ ob }); if (!sizeof(ok)) { if (member_array(TP, obs) == -1) return notify_fail("You are not following "+query_multiple_short(obs)+ ".\n"); else return notify_fail("You are not following " + query_multiple_short(obs - ({ TP }) + ({ "yourself" })) + ".\n"); } write("You stop following "+(s=query_multiple_short(ok))+".\n"); say(TP->the_short()+" stops following "+s+".\n", ok); foreach (ob in ok) tell_object(ob, TP->the_short() + " stops following "+query_multiple_short((ok + ({"you"})) - ({ ob }))+".\n"); return 1; } mixed *query_patterns() { return ({ "<indirect:living>", (: cmd($1) :) }); }