yi.c

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

// yi.c 乾坤大挪移「移」字诀
#include <ansi.h>
inherit F_SSERVER;
int perform(object me, string target)
{
        object ob;
     string msg;
        if(!target)
             return notify_fail("你想把对方的劲力挪移至谁？\n");
        if(!objectp(ob = present(target, environment(me))))
             return notify_fail("这里没有你想挪移的目标这个人。\n");

        if(!me->is_fighting())
                return notify_fail("你没在打架，移什么移！\n");


        if ((int)me->query_skill("jiuyang-shengong", 1) < 100)
                return notify_fail("你的九阳神功火候还不够，小心走火入魔！\n");

        if(!ob->is_character()) 
                return notify_fail("看清楚一点，那并不是生物。\n");

//       if(userp(ob)) 
//                return notify_fail("你不能移到普通玩家身上去!\n");

        if(!living(ob))
		return notify_fail(ob->name()+"已经无法战斗了。\n"); 
	if(ob==me) return notify_fail("你不能攻击自己。\n");               

        if(!ob->is_fighting(me) || !me->is_fighting(ob) )
                return notify_fail("他没有和你打着呢。\n");

        if(me->query_skill("qiankun-danuoyi", 1) < 120 )
                return notify_fail("你的乾坤大挪移还不够娴熟，不会使用「移」字诀。\n");
        if(me->query_skill_mapped("parry") != "qiankun-danuoyi")
                return notify_fail("你没有使用乾坤大挪移作为招降，无法使用「移」字诀！\n"); 
        if((int)me->query("neili") < 800 )
                return notify_fail("你的内力不够！\n");
        if((int)me->query_skill("force") < 200 )
                return notify_fail("「移」字诀需要深厚的内功基础，你的条件好象还不够。\n");
        me->add("neili", -50);
        tell_object(me, BLU"你暗运乾坤大挪移「移」字诀，企图要把对方下一招的力道转移到"+ob->name()+"身上！\n"NOR); 
        me->set_temp("yi_ob", ob->query("id"));     
msg = HIR+me->name()+HIB"一刹那间化刚为柔的急剧转折，已使出属乾坤大挪移心法的第七层神功！\n";
        me->start_busy(1);
        message_vision(msg, me, target);


        return 1;
}