item15.c

C实现的MUD,对大家基本入门网络游戏很有帮助!

// 回复剂

#include <ansi.h>
inherit ITEM;
object offensive_target(object me)
{
	int sz;
	object *enemy;

	enemy = me->query_enemy();
	if( !enemy || !arrayp(enemy) ) return 0;

	sz = sizeof(enemy);
	if( sz > 4 ) sz = 4;

	if( sz > 0 ) return enemy[random(sz)];
	else return 0;
}

void create()
{
        set_name(HIY"天堂药剂"NOR, ({ "heal iteme", "15item" }) );
        set_weight(500);
        if( clonep() )
                set_default_object(__FILE__);
        else {
                set("long", "这是一个天堂药剂可以使用(use id)。\n") ;
set("treasure",1);
                set("unit", "个");
                set("value", 85000);
                set("zhen", 1);
        }
        setup();
}

void init()
{
        add_action("do_shot","use");
}

int do_shot(string arg)
{
        object me,ob,target;
        int myskill , tgskill;
        int mylev ,damage;

        me = this_player();

 	if (!id(arg))
	return notify_fail("你要用什么东西?\n");

        if(me->is_busy() )
                return notify_fail("你正忙着哪。\n");


        if( me->query("combat_exp")< 500000)
        return notify_fail("你的经验太少用不了！\n");

        if( !objectp(ob = present("heal iteme", me)) )
                return notify_fail("你没有这种东西。\n");

        message_vision(HIG"\n$n"HIG"一口喝下了$N"HIY"  $n觉的全身舒服多了!  \n"NOR,this_object(),me);
me->add("qi",1800);
me->add("eff_qi",1800);
        me->start_busy(1) ;
	if((int)me->query("qi") < (int)me->query("max_qi")+(int)me->query("max_qi")/2)
        {
        me->add("qi",me->query("eff_qi")/3);
        me->add("eff_qi",me->query("eff_qi")/4);
if (me->query("qi") > me->query("max_qi")+1950)
me->set("qi",me->query("max_qi")+1950);
if (me->query("eff_qi") > me->query("max_qi"))
me->set("eff_qi",me->query("max_qi"));
message_vision(HIG"$N身上的伤好了不少!!\n"NOR, me);
        }


        destruct(this_object());

        return 1;
}