/*
* Externalize by Baldrick june '97.
*/
#include <standard.h>
#include <cmd.h>
inherit CMD_BASE;
inherit WIZ_CMD_BASE;
void setup(){
position = 1;
}
static int cmd(string str, object me) {
object *ob;
mixed *ob1;
string s,bing;
int i,j;
bing = "";
ob = wiz_present(str, me);
if (!sizeof(ob)) {
write("No such object.\n");
return 1;
}
for (j=0;j<sizeof(ob);j++) {
ob1 =ob[j]->stats();
if (!pointerp(ob1))
continue;
s = "";
for (i=0;i<(sizeof(ob1)-1);i++)
if(ob1[i])
if(ob1[i][0])
s += ob1[i][0] + ": "+ob1[i][1]+"\n";
bing += sprintf("%-*#s\n\n\n", me->query_cols(), s);
}
me->more_string(bing);
me->set_trivial_action();
return 1;
} /* show_stats() */