#include <lib.h> #include <config.h> inherit LIB_DAEMON; mixed cmd(string args) { string *lines; object *avatars, *hms, *norms, *newbies, *adms, *cres, *obs; int i, x, screen; x = sizeof(obs=filter(users(), (: !((int)$1->GetInvis(this_player())) :))); obs = obs - (avatars = filter(obs, (: avatarp :))); obs = obs - (hms = filter(obs, (: high_mortalp :))); obs = obs - (adms = filter(obs, (: archp :))); obs = obs - (cres = filter(obs, (: creatorp :))); newbies = obs - (norms = filter(obs, (: (int)$1->GetLevel() > MAX_NEWBIE_LEVEL :))); screen = ((int *)this_player()->GetScreen())[0]; lines = ({ center(mud_name(), screen), center("There are " + x + " members of our reality!", screen), "" }); if( i = sizeof(avatars) ) { lines += ({ capitalize(consolidate(i, "avatar")) + ":" }); while(i--) lines += ({ "\t" + (string)avatars[i]->GetShort() }); lines += ({ "" }); } if( i = sizeof(hms) ) { lines += ({ capitalize(consolidate(i, "high mortal")) + ":" }); while(i--) lines += ({ "\t" + (string)hms[i]->GetShort() }); lines += ({ "" }); } if( i = sizeof(norms) ) { lines += ({ capitalize(consolidate(i, "mortal")) + ":" }); while(i--) lines += ({ "\t" + (string)norms[i]->GetShort() }); lines += ({ "" }); } if( i = sizeof(newbies) ) { lines += ({ capitalize(consolidate(i, "newbie")) + ":" }); while(i--) lines += ({ "\t" + (string)newbies[i]->GetShort() }); lines += ({ "" }); } if( i = sizeof(cres) ) { lines += ({ capitalize(consolidate(i, "creator")) + ":" }); while(i--) lines += ({ "\t" + (string)cres[i]->GetShort() }); lines += ({ "" }); } if( i = sizeof(adms) ) { lines += ({ capitalize(consolidate(i, "arch")) + ":" }); while(i--) lines += ({ "\t" + (string)adms[i]->GetShort() }); lines += ({ "" }); } this_player()->more(lines, "system"); return 1; }