LPMUD/
LPMUD/BIN/
LPMUD/DOC/
LPMUD/MUDLIB/
LPMUD/MUDLIB/BANISH/
LPMUD/MUDLIB/D/
LPMUD/MUDLIB/DOC/
LPMUD/MUDLIB/DOC/DOMAINS/
LPMUD/MUDLIB/DOC/EFUN/
LPMUD/MUDLIB/DOC/EXAMPLES/
LPMUD/MUDLIB/DOC/EXAMPLES/ARMOUR/
LPMUD/MUDLIB/DOC/EXAMPLES/CONTAIN/
LPMUD/MUDLIB/DOC/EXAMPLES/FOOD/
LPMUD/MUDLIB/DOC/EXAMPLES/MAGIC/
LPMUD/MUDLIB/DOC/EXAMPLES/MONSTER/
LPMUD/MUDLIB/DOC/EXAMPLES/ROOM/
LPMUD/MUDLIB/DOC/EXAMPLES/WEAPONS/
LPMUD/MUDLIB/FUNCTION/
LPMUD/MUDLIB/INCLUDE/
LPMUD/MUDLIB/INCLUDE/FN_SPECS/
LPMUD/MUDLIB/INCLUDE/SKILLS/
LPMUD/MUDLIB/INFO/
LPMUD/MUDLIB/INHERIT/BASE/
LPMUD/MUDLIB/LOG/
LPMUD/MUDLIB/MANUALS/312/
LPMUD/MUDLIB/NEWS/
LPMUD/MUDLIB/OBJ/PARTY/
LPMUD/MUDLIB/OBJ/SHADOWS/
LPMUD/MUDLIB/OBJECTS/COMPONEN/
LPMUD/MUDLIB/OPEN/
LPMUD/MUDLIB/OPEN/LIBRARY/
LPMUD/MUDLIB/OPEN/PARTY/
LPMUD/MUDLIB/PLAYERS/
LPMUD/MUDLIB/PLAYERS/ZIL/
LPMUD/MUDLIB/ROOM/
LPMUD/MUDLIB/ROOM/CITY/ARENA/
LPMUD/MUDLIB/ROOM/CITY/CREATOR/
LPMUD/MUDLIB/ROOM/CITY/GARDEN/MONST/
LPMUD/MUDLIB/ROOM/CITY/OBJ/
LPMUD/MUDLIB/ROOM/CITY/PUB/
LPMUD/MUDLIB/ROOM/CITY/SHOP/
LPMUD/MUDLIB/ROOM/DEATH/
LPMUD/MUDLIB/ROOM/REGISTRY/
LPMUD/MUDLIB/SECURE/
LPMUD/MUDLIB/SECURE/UDP_CMD_/
LPMUD/MUDLIB/SKILLS/
LPMUD/MUDLIB/SKILLS/FIGHTER/
LPMUD/MUDLIB/SKILLS/THIEF/
LPMUD/MUDLIB/USR/
LPMUD/MUDLIB/USR/CREATORS/
LPMUD/MUDLIB/USR/PLAYERS/
/* potion */

inherit "inherit/drink";
inherit "inherit/wand";

string spell;

string query_spell();
status set_spell(string s);

void reset(status arg) {
  if(arg) return;
  set_name("potion");
  set_short("Potion");
  set_info("@@query_potion_string:$this_object()$@@");
  set_spell("cure wounds"); /* default potion */
  set_weight(1);
  set_room_msg("@@query_name:$this_player()$@@ quaffs a potion.\n");
}

string query_object_type() { return "Potion"; }

string query_spell()       { return spell; }

status set_spell(string s) { 
  string *loading_spell;
  int i;

  if(!s) return 0;
  loading_spell = (mixed *)clone_object("obj/shadows/get_spell")->get_spell(s);  
  if(member_array("passive", loading_spell) == -1) return 0;
  if((i = member_array("level", loading_spell)) != -1) {
    set_cast_level(loading_spell[i+1]);
    set_charges(100);
    spell = s;
    set_casting_msg("You quaff a @@query_name:$this_object()$@@ of "+
                    spell +".\n");
    set_spells(({ "drink", spell,
                  "quaff", spell,
    }));  /* activation 'words' have to be query_verb() to add_action() */
    return 1;
  }
  return 0;
}

void add_spell(mixed arg) {
  if(!arg) return;
  if(stringp(arg)) arg = ({ arg, });
  set_spell(arg[0]);
}

status drink(string str) {
  if(!::drink(str)) return 0;
  if(spell && query_charges()) load_spell(0);
  return 1;
}

void end_spell() {
  charges = 0;
}
 
string query_potion_string() {
  if(query_full() && spell) {
    return "It is a Potion of "+ capitalize(spell) +".\n";
  }
  else {
    return "You find nothing special.\n";
  }
}