yang.c

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

// yang.c 鸯刀
// zly 99.6.22

#include <weapon.h>
#include <ansi.h>

inherit BLADE;
inherit F_UNIQUE;

void create()
{
        set_name(HIC"鸯刀"NOR, ({"yang dao","yang","dao", "blade"}));
        set_weight(4000);
        if( clonep() )
               set_default_object(__FILE__);
        else{
               set("treasure", 1);
               set("unit", "把");
               set("long", HIC"这是鸳鸯刀中的鸯刀，但见精光耀眼，刀刃上刻著「无敌」二字。\n" NOR);
               set("value",400000);
               set("material","steel");
               set("weapon_prop/parry",5);
               set("unique", 1);
               set("rigidity", 3);
               set("sharpness", 1);
               set("wield_neili", 100);
               set("wield_maxneili", 700);
               set("wield_str", 20);
               set("wield_msg", HIC"$N抽出一把青光闪耀，寒气逼人的长刀握在手中。心中豪气顿生，口中不
觉轻啸一声。\n" NOR);
	       set("unwield_msg", HIC"$N轻轻将手中的鸯刀插入腰间的刀鞘。\n" NOR);
        }
        init_blade(380);
        setup();
}

void init()
{
    add_action("do_add",({"he", "合"}));
}

int do_add()
{
     object me,ob, obj;

     me = this_player();
     ob = this_object();
     obj = present("yuan dao", me);
     if(!objectp(obj))
           return notify_fail("你手中只有一把鸯刀，先找到另一把再说吧。\n");
     if((int)me->query("neili") < 1000)
           return notify_fail("你感觉全身气血翻腾，头晕目眩，原来你真气不够，无法将双刀合并！\n");
     if((int)me->query_str() < 28)
           return notify_fail("你感觉使出了全身的力气，仍无法将双刀合并！\n");
     me->add("neili", -300);
     message_vision(HIC"\n只听一声轻响，你双手把刀一并，卡嗒一声合二为一，拿在$N的手里。\n"NOR, me);
     destruct(obj);   
     new(__DIR__"yyd")->move(me, 1);     
     destruct(ob);
     return 1;
}