tianwai.c

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

#include <ansi.h>

inherit F_SSERVER;

int perform(object me, object target)
{
        object weapon;
           
   if( !target ) target = offensive_target(me);

	if( !target
	||	!target->is_character()
	||	!me->is_fighting(target) )
		return notify_fail("天外飞仙只能对战斗中的对手使用。\n");

        if((int)me->query("neili") < 1500 )
                return notify_fail("你的真气不够！\n");

        if ((int)me->query("max_neili") < 2000)
                return notify_fail("你的内力不够！\n");
       
        if (!objectp(weapon = me->query_temp("weapon"))
                || (string)weapon->query("skill_type") != "sword")
                return notify_fail("你使用的武器不对。\n");

        if((int)me->query("jing") < 200 )
                return notify_fail("你的精神不足，没法子施用外功！\n");


        if((int)me->query_skill("chuixue-jian", 1) < 200)
                return notify_fail("你的寒天吹雪剑法等级不够，无法使用『天外飞仙』！\n");
 
             weapon=me->query_temp("weapon");
           me->delete("env/brief_message");
           message_vision(HIY"\n$N飞身跃起，使出寒天吹雪剑法终极绝技「天外飞仙」!n"NOR, me);
           message_vision(HIB"\n突然只见$N使出寒天吹雪剑法终极绝技『天外飞仙』！\n"NOR, me);
                      me->delete("env/brief_message");
   target->delete("env/brief_message");
message_vision(HIC"\n$N飞身跃起，使出寒天吹雪剑法终极绝技「天外飞仙」!\n"NOR,me,target);
        if( random(me->query("combat_exp")) >(int)target->query("combat_exp")/3 )
        {
message_vision(HIB"$N长啸：“天！！”\n"NOR,me,target);        
        COMBAT_D->do_attack(me, target, me->query_temp("weapon")); 
message_vision(HIM"$N长啸：“外！！”\n"NOR,me,target);        
        COMBAT_D->do_attack(me, target, me->query_temp("weapon"));
message_vision(HIR"$N长啸：“飞！！”！\n"NOR,me,target);                
        COMBAT_D->do_attack(me, target, me->query_temp("weapon"));
message_vision(HIR"$N长啸：“仙！！”！\n"NOR,me,target);                
        COMBAT_D->do_attack(me, target, me->query_temp("weapon"));
message_vision(HIW"\n$N乘招势未收,劲吐内力，狂风暴雨之剑气向$n卷去！\n"NOR, me, weapon);
           COMBAT_D->do_attack(me, target, me->query_temp("weapon"));
           COMBAT_D->do_attack(me, target, me->query_temp("weapon"));
           COMBAT_D->do_attack(me, target, me->query_temp("weapon"));
           COMBAT_D->do_attack(me, target, me->query_temp("weapon"));
           message_vision(HIC"\n$N无法控制内息流动，只好后跃收招。\n"NOR, me, weapon);
           me->add("neili", -500);

          if( !target->is_fighting(me) ) {
                    if( living(target) ) {
                    if( userp(target) ) me->fight_ob(target);
                        else me->kill_ob(target);
                }
        }

   me->start_busy(4);
}        
        else
        {

           message_vision(HIC"\n可是$N看破了$n的企图，并没有上当。\n"NOR, target, me);
                me->add("neili", -500);
                me->start_busy(4);
        }

   return 1;
}