|
|
发表于 2010-7-5 10:07:53
|
显示全部楼层
以前的，不知道master改了没有！
// modified by snowman@SJ 05/12/2000
// By Spiderii参照修改。。图省事。。grin
// by spiderii@ty 更新效果
#include <ansi.h>
inherit F_SSERVER;
#include <combat_msg.h>
int perform(object me,object target)
{
object weapon;
string msg;
int i = me->query_skill("huifeng-jian",1) / 4;
if( !target ) target = offensive_target(me);
if( !objectp(target) || !me->is_fighting(target) || !living(target)
|| environment(target)!=environment(me))
return notify_fail("灭绝心法只能对战斗中的对手使用。\n");
if(me->query_skill_mapped("force") != "linji-zhuang")
return notify_fail("你的内功不是峨嵋心法，无法使用灭绝心法！\n");
if( me->query_skill("linji-zhuang", 1) < 150 )
return notify_fail("你的内功还未练成，不能使用灭绝心法！\n");
if( me->query_skill("huifeng-jian", 1) < 150 )
return notify_fail("你的剑法还未练成，不能使用灭绝心法！\n");
if (!objectp(weapon = me->query_temp("weapon")) || weapon->query("skill_type") != "sword"
|| me->query_skill_mapped("sword") != "huifeng-jian")
return notify_fail("你手里没有剑，无法使用灭绝心法！\n");
if(me->query_skill_mapped("parry") != "huifeng-jian")
return notify_fail("你的招架功夫不对，无法使用灭绝心法！\n");
if(me->query("max_neili") < 2000 )
return notify_fail("你的内力修为不够，不能使用灭绝心法！\n");
if(me->query("neili") < 1000 )
return notify_fail("你现在真气不足，不能使用灭绝心法！\n");
if(me->query("jingli") < 750 )
return notify_fail("你现在精力不足，不能使用灭绝心法！\n");
if(me->query_temp("miejue"))
return notify_fail("你正在使用灭绝心法！\n");
if(me->query_skill("sword", 1) < 150 )
return notify_fail("你的基本剑法不够娴熟，不能在剑招中使用灭绝心法。\n");
if( target->is_busy() )
return notify_fail(target->name() + "目前正自顾不暇，放胆攻击吧。\n");
msg = HIW "$N飘身而起，使出峨嵋绝技「灭剑」心法，顿时剑意空灵飘逸而，似万千柳絮飞舞，又如和风阵阵拂过。\n"NOR;
me->start_perform(1+random(4),"「灭绝心法」");
if((random(me->query_skill("dodge",1)) + me->query_int()) >
(target->query_skill("dodge",1) + target->query_int())/2) {
msg = msg + HIG "结果$n大吃一惊，慌乱之下破绽迭出，被$N攻了个措手不及。\n" NOR;
target->add_busy(random(i/10) + 2);
me->add_temp("apply/attack", i);
me->add_temp("apply/damage", i);
me->add_temp("apply/sword", i);
me->set_temp("miejue", 1);
call_out("next1", 1, me, target, i);
}
else
msg = msg + MAG "可是$n冷静非凡，丝毫不为这奇幻的招数所动，凝神抵挡，不漏半点破绽。\n" NOR;
message_vision(msg, me, target);
return 1;
}
int next1(object me, object target, int i)
{
string msg;
int damage;
object weapon;
if (!me) return 0;
weapon = me->query_temp("weapon");
if (!weapon || !target || !living(me) || !me->is_fighting(target)) {
me->add_temp("apply/attack", -i);
me->add_temp("apply/damage", -i);
me->add_temp("apply/sword", -i);
me->delete_temp("miejue");
return 0;
}
msg = HIR "$N深吸一口气，运起峨嵋临济十二庄,配合「灭剑」,使出「绝剑」心法！\n"NOR;
if((random(me->query("max_neili")) + me->query_skill("force",1)) >
(target->query("max_neili") + target->query_skill("force",1))/4 ){
msg = msg + CYN"$n只觉$N灭剑、绝剑配合异常绝妙，不由压力大增。\n"NOR;
damage = me->query_skill("huifeng-jian",1);
damage += me->query_skill("sword",1);
damage += random(damage);
target->add("neili",-(500+random(150)));
target->add_condition("no_exert",1+random(2)); // 灭剑、绝剑配合异常绝妙，不由压力大增
target->add_condition("no_perform",1+random(2)); //中了第2个绝，才会有这效果。
message_vision(msg, me, target);
COMBAT_D->report_status(target, random(2));
me->add("neili",-300);
me->add("jingli",-100);
} else {
msg = msg + CYN"$n临危不乱，脚下步法连变，闪躲开来。\n"NOR;
message_vision(msg, me, target);
me->add_busy(1+random(2));
}
me->add_temp("apply/attack", -i);
me->add_temp("apply/damage", -i);
me->add_temp("apply/sword", -i);
me->delete_temp("miejue");
return 1;
}
string perform_name(){ return HIW"灭绝心法"NOR; }
int help(object me)
{
write(HIW"\n回风拂柳剑之「灭绝心法」："NOR"\n\n");
write(@HELP
要求： 当前内力 1000 以上；
最大内力 2000 以上；
当前精力 750 以上；
回风拂柳剑等级 150 以上；
临济十二庄等级 150 以上；
激发内功为临济十二庄；
激发剑法为回风拂柳剑；
激发招架为回风拂柳剑；
手持兵器。
HELP
);
return 1;
} |
|
闽公网安备 35050202000162号 )
