// lingdan.c 灵丹
// 97.9.16  by Aug

#include <ansi.h>

inherit ITEM;

void create()
{
        set_name(HIG"灵丹"NOR, ({ "lingdan","dan" }) );
        set("long",
HIG"这是一颗很平常的丹药，看上去黑黑的，吃了它不知道会有什么后果，
听说一代大侠碧云子就是吃了它.........。\n"NOR);
        set("unit", "粒");
        set("weight", 50);
        set("value", 10000);
}

void init()
{
        add_action("do_eat", "eat");
}

int do_eat(string arg)
{
        object ob;
        if( !id(arg) ) return notify_fail("你要吃什麽？\n");

          if( living( this_player())==0) return 0;

        ob=this_player();
        
        ob->set("combat_exp", (int)ob->query("combat_exp")+10000);

        ob->set("food",((int)ob->query("str")-10)*10+200);
        ob->set("water",((int)ob->query("str")-10)*10+200);

   write(HIG+"你拿出一粒灵丹，放入口中，吞了下去，顿时有一阵剧痛
的感觉，感到浑身乏力。\n"NOR);

        message("vision", HIG + ob->name() +
"拿出一粒灵丹，放入口中，吞了下去，顿时有一阵剧痛
的感觉，感到浑身乏力。\n"+NOR,
                environment(ob), ob);
        destruct(this_object());
        return 1;
}
