// 屬性防護(hù)卷軸

#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(HIR"御火奇術(shù)卷軸"NOR, ({ "ffield axes", "11axes" }) );
        set_weight(500);
        if( clonep() )
                set_default_object(__FILE__);
        else {
                set("long", "這是一個(gè)魔法卷軸可以使用(spell id)上面的魔法。\n") ;

                set("unit", "個(gè)");
                set("value", 140000);
                set("zhen", 1);
        }
        setup();
}

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

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

        me = this_player();

 	if (!id(arg))
	return notify_fail("你無法使用這個(gè)卷軸!\n");

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

        if( me->query("combat_exp")< 500000)
        return notify_fail("你的經(jīng)驗(yàn)太少用不了！\n");


	
        if(me->query("magicgift")==1 )
                return notify_fail("你已經(jīng)是火屬性了!!\n");

        if( this_object()->query("zhen") < 1 ) {
        message_vision(HIY"\n$N"HIR"上的魔法力量用完了!  $N"HIR"消失了。\n"NOR,this_object(),me);
        destruct(this_object());
return 1;
                }

        if( !objectp(ob = present("ffield axes", me)) )
                return notify_fail("你沒有這種東西。\n");

        message_vision(HIR"\n$N"HIR"突然發(fā)光  御火奇術(shù)!!  $n被紅光包圍了。\n"NOR,this_object(),me);
        me->set("magicgift",1);
        this_object()->add("zhen", -1);
        me->start_busy(1) ;
        if( this_object()->query("zhen") < 1 ) {
        message_vision(HIY"\n$N"HIR"上的魔法力量用完了!  $N"HIR"消失了。\n"NOR,this_object(),me);
        destruct(this_object());
return 1;
                }

        return 1;
}