arrow.c

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

//Cracked by Kafei
// arrow.c 箭
// kane

#include <ansi.h>
#include <weapon.h>
inherit COMBINED_ITEM;
inherit F_EQUIP;
void create()
{
        set_name("狼牙箭", ({ "arrow" }) );
        set_weight(1000);
        if( clonep() )
                set_default_object(__FILE__);
        else {
        	set("long", "明晃晃的利箭，箭尾嵌着几束羽毛。\n");
        	set("unit", "袋");
		set("base_unit", "支");
        	set("value", 150);
		set("damage", 5);
		set("armor_type", "embed");
		set("weapon_type", "arrow");
                set("armor_prop/armor",1);
		set("armor_prop/attack", -50);
                set("armor_prop/defense", -50);
                set("armor_prop/unarmed", -50);
		set("no_sell", 1);
		set("unequip_msg", HIR"$N一咬牙将$n从伤口上拔了下来，一股鲜血猛地涌了出来。\n"NOR);
        }
	set_amount(15);
        set("bwdhpk",1);setup();
}
int wear() { return 0; }
int do_embed()
{
	::wear();
	set("no_drop", 1);
	set("no_get", 1);
	environment()->apply_condition("embedded", 100);
	return 1;
}
int unequip()
{
	::unequip();
	set("no_drop", 0);
	set("no_get", 0);
	delete("embedded");

	environment()->apply_condition("embedded", 0);
	environment()->receive_damage("qi", 200+random(500*query_amount()));
	environment()->delete("embedded_time");
	return 1;
}
string query_autoload() 
{ 
	if( query("equipped") )
	return query_amount() + ""; 
}

void autoload(string param)
{
        int amt;

        if( sscanf(param, "%d", amt)==1 )
                set_amount(amt);
	set("embedded", 1);
	set("no_drop", 1);
	set("no_get", 1);
	::wear();
}