独孤九剑的代码

hxsd · 发表于 2009-9-10 16:06

马上注册，结交更多侠友！

您需要登录才可以下载或查看，没有账号？我要成为铁血侠客

x

// lonely-sword.c 独孤九剑

#include <ansi.h>
#include <combat.h>
#include "/kungfu/skill/eff_msg.h";

inherit SKILL;
string *order = ({""HIY"", ""HIG"", ""RED"", ""MAG"", ""YEL"", ""HIC"", ""HIW"", ""HIR"",""HIB"", ""CYN"",""WHT"",""HIM"",""BLU""});
string *parry_msg = ({
      "却见$n踏前一步，剑式斜指你的右臂，想要使$P闪身而退。\n",
      "$n以攻为守，以进为退，凝神运气向$P猛攻快打地挥出方位大异的泰山「快活三」三剑。\n",
      "$n剑法突变，剑势伸缩不定，奔腾矫夭，逆使嵩山剑法的「天外玉龙」企图迫使$P变招。\n",
      "$n突然一剑点向$P的$l，虽一剑却暗藏无数后着，$P手足无措，攻势不由自主停了下来。\n"
      "$n不闪不避，举剑闪电般使出「叠翠浮青」反削$P的$l，想挡过你此招。\n",
      "$n突然使出青城派松风剑法的「鸿飞冥冥」，长剑对着$P一绞，企图突破$P的攻势。\n"
      "$n挺剑一招象是「白云出岫」回刺$P的$l，企图将$P的攻势化解。\n",
      "只见$n不退反进，身如飘风，一式「天柱云气」动向无定，挡住了$P的\n进攻。\n",
      "$n不退反进，使出恒山剑招「绵里藏针」，森森剑气充溢四周！架开了$P的这招\n",
      });

mapping *action = ({
([    "action" : "但见$N挺身而上，$w一旋，一招仿佛泰山剑法的"+(order[random(13)])+"「来鹤清泉」"NOR"直刺$n
的$l！",
      "force" : 110,
      "dodge" : 65,
      "damage": 250,
      "lvl" : 0,
      "damage_type" : "刺伤"
]),
([    "action" : "$N奇诡地向$n挥出"+(order[random(13)])+"「泉鸣芙蓉」"NOR"、"+(order[random(13)])+"「鹤翔紫盖」"NOR"、"+(order[random(13)])+"「石廪书声」"NOR"、"+(order[random(13)])+"「
天柱云气」"NOR"及"+(order[random(13)])+"「雁回祝融」"NOR"衡山五神剑！",
      "force" : 110,
      "dodge" : 60,
      "damage": 250,
      "lvl" : 7,
      "damage_type" : "刺伤"
]),
([
      "action" : "$N剑随身转，续而刺出十九剑，竟然是华山"+(order[random(13)])+"「玉女十九剑」"NOR"，但奇的
是这十九剑便如一招，手法之快，直是匪夷所思！",
      "force" : 110,
      "dodge" : 65,
      "damage": 250,
      "lvl" : 14,
      "damage_type" : "刺伤"
]),
([    "action" : ""+(order[random(13)])+"$N剑势忽缓而不疏，剑意有余而不尽，化恒山剑法为一剑，向$n慢慢
推去！",
      "force" : 120,
      "dodge" : 65,
      "damage": 250,
      "lvl" : 21,
      "damage_type" : "刺伤"
]),
([    "action" : ""+(order[random(13)])+"$N剑意突焕气象森严，便似千军万马奔驰而来，长枪大戟，黄沙千里
，尽括嵩山剑势击向$n的$l！",
      "force" : 120,
      "dodge" : 80,
      "damage": 250,
      "lvl" : 28,
      "damage_type" : "刺伤"
]),
([    "action" : "却见$N身随剑走，左边一拐，右边一弯，剑招也是越转越加狠辣，竟
化"+(order[random(13)])+"「泰山十八盘」"NOR"为一剑攻向$n！",
      "force" : 130,
      "dodge" : 100,
      "damage": 255,
      "lvl" : 35,
      "damage_type" : "刺伤"
]),
([    "action" : "$N剑招突变，使出衡山的"+(order[random(13)])+"「一剑落九雁」"NOR"，削向$n的$l，怎知剑到中
途，突然转向，大出$n意料之外！",
      "force" : 140,
      "dodge" : 100,
      "damage": 260,
      "lvl" : 42,
      "damage_type" : "刺伤"
]),
([    "action" : "$N吐气开声，一招似是"+(order[random(13)])+"「独劈华山」"NOR"，手中$w向下斩落，直劈向$n的
$l！",
      "force" : 150,
      "dodge" : 100,
      "damage": 280,
      "lvl" : 49,
      "damage_type" : "刺伤"
]),
([    "action" : "$N手中$w越转越快，使的居然是衡山的"+(order[random(13)])+"「百变千幻云雾十三式」"NOR"，剑
式有如云卷雾涌，旁观者不由得目为之眩！",
      "force" : 160,
      "dodge" : 100,
      "damage": 290,
      "lvl" : 56,
      "damage_type" : "刺伤"
]),
([    "action" : "$N含笑抱剑，气势庄严，$w轻挥，尽融"+(order[random(13)])+"「达摩剑」"NOR"为一式，闲舒地刺
向$n！",
      "force" : 170,
      "dodge" : 100,
      "damage": 300,
      "lvl" : 63,
      "damage_type" : "刺伤"
]),
([    "action" : "$N举起$w运使"+(order[random(13)])+"「太极剑」"NOR"剑意，划出大大小小无数个圆圈，无穷无尽
源源不绝地缠向$n！",
      "force" : 280,
      "dodge" : 100,
      "damage": 320,
      "lvl" : 70,
      "damage_type" : "刺伤"
]),
([    "action" : "$N神声凝重，$w上劈下切左右横扫，挟雷霆万钧之势逼往$n，"+(order[random(13)])+"「伏摩
剑」"NOR"的剑意表露无遗！",
      "force" : 290,
      "dodge" : 105,
      "damage": 330,
      "lvl" : 77,
      "damage_type" : "刺伤"
]),
([    "action" : "却见$N突然虚步提腰，使出酷似武当"+(order[random(13)])+"「蜻蜓点水」"NOR"的一招！",
      "force" : 200,
      "dodge" : 105,
      "damage": 360,
      "lvl" : 84,
      "damage_type" : "刺伤"
]),
([    "action" : "$N运剑如风，剑光霍霍中反攻$n的$l，尝试逼$n自守，剑招似是"+(order[random(13)])+"「伏
魔剑」"NOR"的"+(order[random(13)])+"「龙吞式」"NOR"。",
      "force" : 220,
      "dodge" : 100,
      "damage": 395,
      "lvl" : 91,
      "damage_type" : "刺伤"
]),
([    "action" : "$N突然运剑如狂，一手关外的"+(order[random(13)])+"「乱披风剑法」"NOR"，猛然向$n周身乱刺乱
削！",
      "force" : 240,
      "dodge" : 100,
      "damage": 320,
      "lvl" : 98,
      "damage_type" : "刺伤"
]),
([    "action" : "$N满场游走，东刺一剑，西刺一剑，令$n莫明其妙，分不出$N剑法的
虚实！",
      "force" : 260,
      "dodge" : 100,
      "damage": 350,
      "lvl" : 105,
      "damage_type" : "刺伤"
]),
([    "action" : "$N抱剑旋身，转到$n身后，杂乱无章地向$n刺出一剑，不知使的是什
么剑法！",
      "force" : 280,
      "dodge" : 100,
      "damage": 380,
      "lvl" : 112,
      "damage_type" : "刺伤"
]),
([    "action" : "$N突然一剑点向$n的$l，虽一剑却暗藏无数后着，$n手足无措，不知
如何是好！",
      "force" : 200,
      "dodge" : 100,
      "damage": 485,
      "lvl" : 119,
      "damage_type" : "刺伤"
]),
([    "action" : "$N剑挟刀势，大开大阖地乱砍一通，但招招皆击在$n攻势的破绽，迫
得$n不得不守！",
      "force" : 320,
      "dodge" : 100,
      "damage": 450,
      "lvl" : 126,
      "damage_type" : "刺伤"
]),
([    "action" : "$N反手横剑刺向$n的$l，这似有招似无招的一剑，威力竟然奇大，$n
难以看清剑招来势！",
      "force" : 340,
      "dodge" : 105,
      "damage": 480,
      "lvl" : 133,
      "damage_type" : "刺伤"
]),
([    "action" : "$N举剑狂挥，迅速无比地点向$n的$l，却令人看不出其所用是什么招
式。",
      "force" : 460,
      "dodge" : 100,
      "damage": 450,
      "lvl" : 140,
      "damage_type" : "刺伤"
]),
([    "action" : "$N随手一剑指向$n，落点正是$n的破绽所在，端的是神妙无伦，不可
思议！",
      "force" : 480,
      "dodge" : 100,
      "damage": 450,
      "lvl" : 147,
      "damage_type" : "刺伤"
]),
([    "action" : "$N脸上突现笑容，似乎已看破$n的武功招式，胸有成竹地一剑刺向$n
的$l！",
      "force" : 500,
      "dodge" : 100,
      "damage": 520,
      "lvl" : 154,
      "damage_type" : "刺伤"
]),
([
"action" : "$N将$w随手一摆，但见$n自己向$w撞将上来，神剑之威，实人所难测！",
      "force" : 600,
      "dodge" : 100,
      "damage": 665,
      "lvl" : 180,
"damage_type" : "刺伤"
]),
([    "action" : HIW "但见$N手中$w" HIW "破空长吟，平平一剑刺向$n，毫无招式可言",
      "force" : 600,
      "attack": 100,
      "dodge" : 100,
      "parry" : 300,
      "damage": 560,
      "lvl" : 250,
      "damage_type" : "刺伤"
]),
([    "action" : HIW "$N揉身欺近，轻描淡写间随意刺出一剑，简单之极，无招无式",
      "force" : 600,
      "attack": 100,
      "dodge" : 100,
      "parry" : 300,
      "damage": 560,
      "lvl" : 300,
      "damage_type" : "刺伤"
]),
([    "action" : HIW "$N身法飘逸，神态怡然，剑意藏于胸中，手中$w" HIW "随意挥洒而出，独孤"
               "九剑已到了收发自如的境界",
      "force" : 600,
      "attack": 100,
      "dodge" : 100,
      "parry" : 300,
      "damage": 560,
      "lvl" : 350,
      "damage_type" : "刺伤"
])
});

int valid_enable(string usage)
{
      return usage=="sword" || usage=="parry";
}

mapping query_action(object me, object weapon)
{
      return action[random(sizeof(action))];
}

string query_parry_msg(string limb)
{
      return parry_msg[random(sizeof(parry_msg))];
}

int valid_learn(object me)
{
      object ob;

      mapping myfam;
      myfam = (mapping)me->query("family");
      if(!myfam || myfam["family_name"] != "华山派"|| myfam["master_id"] != "feng qingyang")
            return notify_fail("独孤九剑只有向风清扬老前辈学习。\n");
      if( (int)me->query("max_neili") < 600 )
            return notify_fail("你的内力不够，没有办法练独孤九剑。\n");
      if( (int)me->query_skill("zixia-shengong",1)<100)
            return notify_fail("独孤九剑必须配合紫霞神功才能练习。\n");
   if (((int)me->query_skill("huashan-sword", 1)+150) < (int)me->query_skill("lonely-sword", 1))
            return notify_fail("你的剑宗华山剑法太低了。\n");
   if (((int)me->query_skill("kuangfeng-jian", 1)+150) < (int)me->query_skill("lonely-sword", 1))
            return notify_fail("你的气宗狂风快剑太低了。\n");
   if (((int)me->query_skill("poyu-quan", 1)+200) < (int)me->query_skill("lonely-sword", 1))
            return notify_fail("你的破玉拳太低了。\n");
   if (((int)me->query_skill("hunyuan-zhang", 1)+200) < (int)me->query_skill("lonely-sword", 1))
            return notify_fail("你的混元掌太低了。\n");
   if (((int)me->query_skill("feiyan-huixiang", 1)+200) < (int)me->query_skill("lonely-sword", 1))
            return notify_fail("你的飞燕回翔太低了。\n");
   if (((int)me->query_skill("huashan-neigong", 1)+200) < (int)me->query_skill("lonely-sword", 1))
            return notify_fail("你的剑宗内功太低了。\n");
   if (((int)me->query_skill("zixia-shengong", 1)+200) < (int)me->query_skill("lonely-sword", 1))
            return notify_fail("你的气宗内功太低了。\n");

      if( !(ob = me->query_temp("weapon"))
      ||    (string)ob->query("skill_type") != "sword" )
            return notify_fail("你必须先找一把剑才能练剑法。\n");
      if ((int)me->query_skill("lonely-sword",1) > 120)
            return notify_fail("这套剑法我就教到这儿，以后就要靠你自己练了。\n");

      return 1;
}

int practice_skill(object me)
{
      return notify_fail("独孤九剑只能通过"+(order[random(13)])+"「总诀式」"NOR"来演练。\n");
}

int valid_effect(object me, object weapon, string name, int skill)
{
}

[发帖际遇]: hxsd答应假扮小宝应老婆之约,得到偿金银两4.

hxsd · 发表于 2009-9-10 16:06

mixed hit_ob(object me, object victim, int damage_bonus, int factor, string limb)
{
int level, jiali, time,level2;
int i, ap, dpp, dpd, dpf,lvl;
int damage;
object weapon,weapon2;
string type, msg;
weapon = me->query_temp("weapon");
lvl = me->query_skill("lonely-sword", 1);
      if (random(me->query_skill("lonely-sword",1)) < 100 ||                me->query_skill("force",1) < 100 )
      return 0;

weapon = me->query_temp("weapon");
      level = (int) me->query_skill("zixia-shengong",1);
      level2= (int) me->query_skill("zixia-shengong",1);
if (random(8)==0 && level>=300 && me->query_skill_mapped("force") == "zixia-shengong")
{
if (random(2)==0)
{
victim->start_busy(2);
}
else victim->receive_wound("qi", (random(damage_bonus))+200);
               return random(2) ? HIR "$N" HIR "运起紫霞神功，一剑攻出，剑气横飞，,$n双眼一花,不知如何是好!\n" NOR:
                                 HIR "$N" HIR "剑随意走,手中" + weapon->name() + HIR "犹如生了眼睛一般，随意挥出几剑,$n双眼一花,不知如何是好!\n"NOR;
}
weapon = me->query_temp("weapon");
level2= (int) me->query_skill("zixia-shengong",1);
if (random(3)==1 && me->query_skill("zixia-shengong",1)>300)
{
if( damage_bonus > 50 && random(level2)>100) {
victim->receive_wound("qi", (random(damage_bonus)));
return HIM"$N剑气纵横! 一道剑气划过了$n的$l。结果鲜血狂奔!\n"NOR;
      }
}

if (me->query_skill_mapped("force") != "zixia-shengong")
return 0;
if (me->query("neili") < 500)
return 0;
if (me->query_skill_mapped("sword") != "lonely-sword")
return 0;
if (me->query_skill_mapped("parry") != "lonely-sword")
return 0;

if (!objectp(weapon = me->query_temp("weapon"))
      || (string)weapon->query("skill_type") != "sword")
return 0;
      ap = (int)me->query("combat_exp");
      dpp = (int)victim->query("combat_exp");
      switch(random(5))
      {
         case 1:
            if (random(ap) > dpp/2 && random(lvl)> 180)
            {
               me->add("neili", -20);
               victim->receive_wound("qi", (damage_bonus) , me);

               return random(2) ? HIR "$N" HIR "一剑攻出，剑气横飞，" + weapon->name() + HIR
                                 "时若游龙穿空，时若惊鸿渡云，却不知这普通的"
                                 "一剑之中竟蕴藏着如此威力。\n" NOR:
                                 HIR "$N" HIR "手中" + weapon->name() + HIR "犹"
                                 "如生了眼睛一般，一剑随意挥出，竟直刺向$n" HIR
                                 "小腹，看似平淡，但方位、力道却拿捏得恰倒好处。\n" NOR;
         }
         break;

         case 2:
            if (random(ap) > dpp/2 && me->query("con") >= 36 && random(lvl)> 180)
            {
               me->add("neili", -120);
               victim->receive_wound("qi", (damage_bonus ) , me);

               return random(2) ? HIR "$N" HIR "一剑攻出，剑气横飞，" + weapon->name() + HIR
                                 "时若游龙穿空，时若惊鸿渡云，却不知这普通的"
                                 "一剑之中竟蕴藏着如此威力。\n" NOR:
                                 HIR "$N" HIR "手中" + weapon->name() + HIR "犹"
                                 "如生了眼睛一般，一剑随意挥出，竟直刺向$n" HIR
                                 "小腹，看似平淡，但方位、力道却拿捏得恰倒好处。\n" NOR;
         }
         break;

      case 3:
         message_vision(HIC "\n$N" HIC "随意挥洒手中的" + weapon->name() +
                        HIC "，招招从出其不意的方位直指$n" HIC "招式中的"
                        "破绽！\n" NOR, me, victim);

         if (! me->is_busy() && random(lvl)> 180)
         {
               weapon = me->query_temp("weapon");
               weapon2 = victim->query_temp("weapon");
               if (random(ap) > dpp/2 && weapon2
                  && !weapon2->query("ownmake") )
               {
                        msg = HIW "$n" HIW "觉得眼前眼花缭乱，手中"
                              "的" + weapon2->name() + HIW "一时竟"
                              "然拿捏不住，脱手而出！\n" NOR;
                        weapon2->move(environment(me));
                        me->add("neili", -100);
               } else
               {
                        msg = HIY "$n" HIY "略得空隙喘息，一时间却"
                              "也无力反击。\n" NOR;
                        me->add("neili", -10);
               }
         }else
         if (random(ap) > dpp/2 && random(lvl)> 180)
         {
                        msg = HIY "$n" HIY "连忙抵挡，一时间不禁手忙脚乱，"
                              "无暇反击。\n" NOR;

                        me->start_busy(1);
                        victim->start_busy(2 + random(lvl / 30));
         }
         else
         {
                        msg = HIC "$N" HIC "随意挥洒着手中的" + weapon->name() +
                              HIC "刺向$n" HIC "，不过$n" HIC "防守的异常严密，$N"
                              HIC "一时竟然无法找到破绽。\n" NOR;
                        me->start_busy(1);
                        victim->start_busy(3);
         }
         message_combatd(msg, me, victim);
         break;

      case 4:
         if (random(ap) > dpp/2 &&
               ! me->is_busy() &&
               ! me->query_temp("dugu-jiujian/lian") &&
               me->query("dex") >= 36
               && random(lvl)> 180
               )
         {
            weapon = me->query_temp("weapon");
            message_vision(HIY "\n$N" HIY "胸藏剑意，手中" + weapon->name() + HIY
                           "随意挥洒而出，速度之快，方位之准，显是独孤九剑已达到"
                           "\n收发自如的境界。\n" NOR,
                           me, victim);

            me->add("neili", -20);

            me->set_temp("dugu-jiujian/lian", 1);
            for (i = 0; i < 7; i++)
            {
                  if (! me->is_fighting(victim))
                        break;

                  if (! victim->is_busy() && random(2) == 1)
                        victim->start_busy(2);

                  COMBAT_D->do_attack(me, victim, weapon, 0);
            }
            me->delete_temp("dugu-jiujian/lian");

         }
         break;

      default :
         if (random(ap) > dpp/2 &&
               ! me->is_busy() &&
               ! me->query_temp("dugu-jiujian/lian")
               && random(lvl)> 180)
         {
            weapon = me->query_temp("weapon");
            message_vision(HIY "\n$N" HIY "胸藏剑意，手中" + weapon->name() + HIY
                           "随意挥洒而出，速度之快，方位之准，显是独孤九剑已达到"
                           "\n收发自如的境界。\n" NOR,
                           me, victim);

            me->add("neili", -20);

            me->set_temp("dugu-jiujian/lian", 1);
            for (i = 0; i < 7; i++)
            {
                  if (! me->is_fighting(victim))
                        break;

                  if (! victim->is_busy() && random(2) == 1)
                        victim->start_busy(2);

                  COMBAT_D->do_attack(me, victim, weapon, 0);
            }
            me->delete_temp("dugu-jiujian/lian");

         }
         break;
   }

      if (random(me->query_skill("lonely-sword",1)) > 200 &&
      random(me->query_skill("sword",1))>180 &&
     me->query_skill("force",1) > 250
     && !victim->is_busy())
{
      me->add("neili", -50);
      victim->map_skill("dodge");

  if( !victim->is_busy() )
{
      victim->start_busy(random(3)+2);
}
      message_vision(HIC "$n突然举剑一刺，剑招随便无章，却莫明奇妙地突破了$N的攻势，大出$N意料！" NOR, victim,me  );
      return HIR"$n大吃一惊，竟然忘了闪避！\n"NOR;

}
      if (random(me->query_skill("lonely-sword",1)) > 140 &&
   random(me->query_skill("sword",1))>140 &&
         me->query_skill("force",1) > 200
         && !victim->is_busy())
{

      me->add("neili", -30);
      victim->map_skill("parry");
  if( !victim->is_busy() )
{
      victim->start_busy(random(2)+2);
}
      message_vision(HIC "$n举剑反攻，后发先至地刺向$N，不仅把$N招术封死，更进一步发出攻击！" NOR, victim,me);
      return HIY"$n难以看清剑招来势,竟然忘了招架！\n"NOR;
}
      if (random(me->query_skill("lonely-sword",1)) > 130 &&
      random(me->query_skill("sword",1))>130 &&
   me->query_skill("force",1) > 150
   && !victim->is_busy())
{
      me->add("neili", -50);
  if( !victim->is_busy() )
{
      victim->start_busy(random(3)+2);
}
      message_vision(HIC "$n提剑回刺，落点正是$N的破绽，$N不得不撤招严守，身形一晃间已退出丈许！" NOR, victim,me );
      return HIG"$n手忙脚乱，慌乱不堪！\n"NOR;
}
      if (random(me->query_skill("lonely-sword",1)) > 100 &&
      random(me->query_skill("sword",1))>100 &&
      me->query_skill("force",1) > 120
      && !victim->is_busy() )
{
if (victim->query("neili")>600)
{
      victim->add("neili", -500);
}
      message_vision(HIC "$n一转剑势，剑招源源而出，对$N发动攻势！\n" NOR, victim,me );
return HIM"$n使出浑身解数才脱出剑圈！\n"NOR;
}
      if (random(me->query_skill("lonely-sword",1)) > 80 &&
      random(me->query_skill("sword",1))>80 &&
   me->query_skill("force",1) > 100
   && !victim->is_busy())
{

  if( !victim->is_busy() )
{       victim->start_busy(random(2)+2);
}
      message_vision(HIC "$n眼见避无可避，只好提剑乱刺一通，居然出乎意料地将$N的攻击接去大半。" NOR, victim,me );
return HIW"$n顿时手足无措，不知如何是好！\n"NOR;
  }

jiali = me->query("jiali");

if (!jiali) jiali=10;
if( damage_bonus > 100 && random(me->query_skill("lonely-sword",1))>140
&& me->query("fengset")
) {
victim->receive_wound("qi", (random(jiali)+200));
return HIM"$N剑气纵横! 一道剑气划过了$n的$l。结果鲜血狂奔!\n"NOR;
}
}
string perform_action_file(string action)
{
      return __DIR__"lonely-sword/" + action;
}

int ob_hit(object ob, object me, int damage)
{
object weapon = me->query_temp("weapon");
      string msg,dodge_skill,*limbs;
      int i, j, level, p, q;
      string result;
      int ap, dp, mp;
      ap = (int)me->query("combat_exp");
      dp = (int)ob->query("combat_exp");
j=damage;
if (me->query_skill_mapped("force") != "zixia-shengong")
return damage;
if (me->query_skill_mapped("sword") != "lonely-sword")
return damage;
if (me->query_skill_mapped("parry") != "lonely-sword")
return damage;

if (me->query("neili") < 500)
return damage;
if (!objectp(weapon = me->query_temp("weapon"))
      || (string)weapon->query("skill_type") != "sword")
return damage;

         if (random(ap) > dp/2 && random(2)==0)
         {
                     result = HIG "$n" HIG "不理会$N" HIG "的攻势，"
                                 "随意挥出一剑，反攻向$N" HIG "。\n" NOR;
                                 if (!ob->is_busy()) ob->start_busy(3);
                  message_vision(result,ob,me);
         }

  if (random(ap) < dp/2  && me->query("fengset")
  && random(2)==0)
      {
            switch (random(9))
            {
            case 0:
                     result = HIC "却见$n" HIC "踏前一步，剑式斜指$P" HIC
                                          "右臂，招式迅捷无比，使得$N" HIC "闪身而退"
                                          "。\n" NOR;
                     break;

            case 1:
                     result = HIC "可$n" HIC "以攻为守，以进为退，凝神运"
                                          "气向$N" HIC "猛攻快打地挥出方位大异的泰山"
                                          "「" NOR + YEL "快活三" NOR + HIC "」剑法。"
                                          "\n" NOR;
                     break;

            case 2:
                     result = HIC "$n" HIC "突然一剑点向$N" HIC "，虽一剑"
                                          "却暗藏无数后着，$N" HIC "顿时手足无措，攻"
                                          "势不由自主停了下来。\n" NOR;
                     break;

            case 3:
                     result = HIC "可是$n" HIC "不闪不避，举剑闪电般使出"
                                          "「" NOR + HIG "叠翠浮青" NOR + HIC "」反削"
                                          "$N" HIC "手腕，挡开了此招。\n" NOR;
                     break;

            case 4:
                     result = HIC "却见$n" HIC "突然使出青城派松风剑法「"
                                          NOR + CYN "鸿飞冥冥" NOR + HIC "」，长剑对"
                                          "着$N" HIC "一绞，顿时突破了攻势。\n" NOR;
                     break;

            case 5:
                     result = HIC "$n" HIC "挺剑而射，若一招「" NOR + HIW
                                          "白云出岫" NOR + HIC "」回刺$N" HIC "，顿"
                                          "时已将攻势化解。\n" NOR;
                     break;

            case 6:
                     result = HIC "只见$n" HIC "不退反进，身如飘风，一式"
                                          "「" NOR + HIW "天柱云气" NOR + HIC "」动向"
                                          "无定，挡住了进攻。\n" NOR;
                     break;

            case 7:
                     result = HIC "但见$n" HIC "不退反进，使出恒山剑招「"
                                          NOR + HIY "绵里藏针" NOR + HIC "」，剑气四"
                                          "溢，架开了$N" HIC "这招。\n" NOR;
                     break;

            default:
                     result =  HIC "$n" HIC "剑法突变，剑势伸缩不定，奔腾"
                                          "矫夭，逆使嵩山剑法的「" NOR + HIY "天外玉"
                                          "龙" NOR + HIC "」企图迫使$N" HIC "变招。\n"
                                          NOR;
                     break;
            }
message_vision(result,ob,me);
                                 if (!ob->is_busy()) ob->start_busy(3);
if ((int)me->query("qi") < (int)me->query("eff_qi"))
me->add("qi",damage/3);
if ((int)me->query("eff_qi") < (int)me->query("max_qi"))
me->add("eff_qi",damage/3);
         damage=100;
         j=100;
         return j;

      }


if ((int)me->query("qi")>1 && (int)me->query("eff_qi")>1)
{
if ((int)me->query("qi") < (int)me->query("eff_qi"))
      i = (int)me->query("eff_qi") / (int)me->query("qi") + 1;
else       i = (int)me->query("max_qi") / (int)me->query("eff_qi") + 1;
      if ( i > 5 ) i = 5;
}
else i=1;
      limbs = ob->query("limbs");
      level = me->query_skill("lonely-sword", 1);

      if( me->is_busy()) return 1;
      if( damage < 100 ) return 1;
      if (  random(level) > 100 /i
      && me->query_skill_mapped("sword") =="lonely-sword"
      && me->query_skill_mapped("parry") =="lonely-sword"
      && me->query("fengset")
      && weapon
      && weapon->query("skill_type") == "sword"
      && me->query_skill("sword") > 300
      && random(me->query_skill("sword",1)) > 150
      && !me->is_busy()
      && me->query("neili") > 200
      && me->query("max_neili") > 4000
      && random(me->query_int()) >= 20 ){
         me->add("neili", -100);
         msg = HIW"$N身子摇摇欲坠，行动不便，知道这一招无可躲避，当即挺剑刺出，后发先至，噗的一声刺向$n的咽喉。\n"NOR;
         if ( random(level) > ob->query_skill("dodge", 1) / i){
         q = damage * i ;
         if ( q > 3500 ) q = 3500 + ( q - 3500 )/ 100;
         ob->receive_damage("qi", q);
         ob->receive_wound("qi", q/2);
         if (!ob->is_busy())
         ob->start_busy(2+random(2));
         if ( random(me->query("combat_exp")) > ob->query("combat_exp") / i)
         p = ob->query("qi")*100/ob->query("max_qi");
         msg += damage_msg(damage, "刺伤") + "( $n"+eff_status_msg(j)+" )\n";
         msg = replace_string(msg, "$l", limbs[random(sizeof(limbs))]);
         msg = replace_string(msg, "$w", "剑刃");
         j = -(damage/2+random(damage/2));
         }
         else {
            dodge_skill = ob->query_skill_mapped("dodge");
            if( !dodge_skill ) dodge_skill = "dodge";
            msg += SKILL_D(dodge_skill)->query_dodge_msg(ob, 1);
            j = -damage/4;
         }
         message_vision(msg, me, ob);
         return j;
      }
}

[发帖际遇]: hxsd给云中鹤擦背，得到奖赏银两3。

John哥 · 发表于 2009-9-10 16:24

这些是什么，看的头都晕了

[发帖际遇]: John哥遭太岳四侠打劫，落荒而逃中丢失银两2.

iuerniu21 · 发表于 2009-9-10 18:19

提示: 作者被禁止或删除内容自动屏蔽

adv123 · 发表于 2009-9-14 13:06

九劍後期威力真大

[发帖际遇]: adv123给云中鹤擦背，擦中腋窝,扣工钱银两10.

账号		自动登录	找回密码
密码			我要成为铁血侠客

iuerniu21 iuerniu21 当前离线积分 8 头像被屏蔽	发表于 2009-9-10 18:19 \| 显示全部楼层提示: 作者被禁止或删除内容自动屏蔽
iuerniu21 iuerniu21 当前离线积分 8 头像被屏蔽	【武侠.中国】铁血丹心论坛（大武侠）：致力于推广和发展武侠文化，让我们一起努力，做全球最大的武侠社区。可能是目前为止最好的金庸群侠传MOD游戏交流论坛，各种经典武侠游戏等你来玩，各种开源制作工具等你来实现你的游戏开发之梦。
	回复支持反对举报

[新手指南] 独孤九剑的代码

马上注册，结交更多侠友！

第2部分