/* -*- LPC -*- */
/*
* $Locker: $
* $Id: inv_entory.c,v 1.4 2001/03/11 00:17:11 ceres Exp $
* $Log: inv_entory.c,v $
* Revision 1.4 2001/03/11 00:17:11 ceres
* Moved burden to the start of the inventory.
*
* Revision 1.3 2001/03/09 22:22:40 pinkfish
* Add in a burden message.
*
* Revision 1.2 1998/04/14 02:44:58 pinkfish
* Changed to use add_command.
*
* Revision 1.1 1998/01/06 05:29:43 ceres
* Initial revision
*
*/
inherit "/cmds/base";
mixed cmd()
{
if (this_player()->query_property("dead")) {
object *obs;
write("You are just a disembodied spirit. "
"You have mist; what else do you want?\n");
obs = all_inventory(this_player());
obs = filter_array(obs, (: $1->query_property("dead usable") :));
if (sizeof(obs)) {
write("Hang on! You appear to have " +
query_multiple_short(obs) + ". Amazing.\n");
}
return 1;
}
write(sprintf("You are %s by:\n", this_player()->burden_string()) +
this_player()->query_living_contents(1));
if (this_player()->query_auto_loading()) {
write("\n%^YELLOW%^Please note that your inventory is still being "
"generated.%^RESET%^\n");
}
return 1;
} /* cmd() */
mixed *query_patterns()
{
return ({ "", (: cmd() :) });
} /* query_patterns() */
