anranxiaohun-zhang.c

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

([	"action" : "$N一招"HIY"呆若木鸡"NOR"双目直直的盯着$n，身体动也不动一下的飞向$n",
	"force" : 500,
	"dodge" : 150,
	"attack":this_player()->query_skill("anranxiaohun-zhang",1),
	"damage" : (int)this_player()->query("age")*15,
	"lvl" : 130,
	"skill_name" : "呆若木鸡",
           "damage_type" : "内伤"
]),
([	"action" : "$N低头冥想，一招"HIB"若有所失"NOR"右掌向外平平推向$n的$l。",
	"force" : 500,
	"dodge" : 150,
	"attack":this_player()->query_skill("anranxiaohun-zhang",1),
	"damage" : (int)this_player()->query("age")*16,
	"lvl" : 140,
	"skill_name" : "若有所失",
           "damage_type" : "瘀伤"
]),
([	"action" : "$N一招"HIB"四通八达"NOR"双掌晃出千万掌影将$n笼罩在掌力之下。",
	"force" : 580,
	"dodge" : 160,
	"attack":this_player()->query_skill("anranxiaohun-zhang",1),
	"damage" : (int)this_player()->query("age")*17,
	"lvl" : 150,
	"skill_name" : "四通八达",
           "damage_type" : "内伤"
]),
([	"action" : "$N错步上前，一招"HIB"鹿死谁手"NOR"招招抢先，以快打慢，一个转身已经转到了$n的身后，运指如风点向$n的大椎穴。",
	"force" : 600,
	"dodge" : 160,
	"attack":this_player()->query_skill("anranxiaohun-zhang",1),
	"damage" : (int)this_player()->query("age")*18,
	"lvl" : 160,
	"skill_name" : "鹿死谁手",
           "damage_type" : "点穴"
]),

});

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


int valid_learn(object me)
{
	if(!me->query("couple/have_couple")) 
		return notify_fail("你还没有所爱的人，不能领会其中的精要！\n");
//	if (me->query("gender") != "男性") 
//                return notify_fail("你体会不到男人思念一个人的心情。\n");
	if (me->query_temp("weapon") || me->query_temp("secondary_weapon"))
		return notify_fail("练黯然消魂掌必须空手。\n");
	if ((int)me->query("max_neili") < 2000)
		return notify_fail("你的内力太弱，无法练黯然消魂掌。\n");
	if ((int)me->query_str()< 30)
		return notify_fail("你的臂力太弱，无法练黯然消魂掌。\n");	
	if ((int)me->query_con() < 30 )
		return notify_fail("你没有雄厚的体质无法黯然消魂掌。\n");
        if ((int)me->query_skill("dodge") < 100)
                return notify_fail("你的轻功太差，无法练黯然消魂掌。\n");
        if ((int)me->query_skill("yunv-jian", 1) < 80)
                return notify_fail("你的玉女剑法火候太浅。\n");
        if ((int)me->query_skill("yunv-shenfa", 1) < 80)
                return notify_fail("你的玉女身法火候太浅。\n");
        if ((int)me->query_skill("tianluo-diwang", 1) < 80)
                return notify_fail("你的天罗地网火候太浅。\n");
        if ((int)me->query_skill("meinv-quan", 1) < 80)
                return notify_fail("你的美女拳火候太浅。\n");
        if ((int)me->query_skill("yinsuo-jinling", 1) < 80)
                return notify_fail("你的银索金铃火候太浅。\n");
	return 1;
}

string query_skill_name(int level)
{
        int i = sizeof(action);
        while (i--)
                if(level > action[i]["lvl"])
                        return action[i]["skill_name"];
}
 
mapping query_action(object me, object weapon)
{
    int i, j, level, adjust, tmp;
//    object target; 
string msg;            
    level   = (int) me->query_skill("anranxiaohun-zhang",1);
    for(i = sizeof(action); i > 0; i--) {
        if(level > action[i-1]["lvl"]) {
            j = NewRandom(i, 20, level/5);
//            target = offensive_target(me);    
              switch(random(3)){
                  case 0: msg = HIC"$N心下万念俱灰，没精打采的挥袖卷出，拍出一掌，只听得噗的一声，这一掌正好击向$n肩头"NOR; break;
                  case 1: msg = HIY"$N心下万念俱灰，没精打采的挥袖卷出，拍出一掌，只听得噗的一声，这一掌正好击向$n肩头"NOR; break;
                  case 2: msg = HIR"紧跟着$N踢出一脚。这一脚发出时恍恍惚惚，隐隐约约，若有若无。砰的一响，向$n胸口袭去"NOR; break;
                  default: msg = HIC"$N心下万念俱灰，没精打采的挥袖卷出，拍出一掌，只听得噗的一声，这一掌正好击向$n肩头"NOR; break;
              }


            if (me->query_temp("anran")
               && me->query("jiali") >= 50 
               && random(10) >= 5
               && me->query_skill("yunv-xinfa",1)>10) {                
                    return ([  
                      "action":msg, 
                    "force" : action[j]["force"]+30,
                    "dodge":action[j]["dodge"]+50,
                    "damage": level+700,
                    "lvl" : action[j]["lvl"],
                    "weapon" : random(2)?"黯然掌掌风":"黯然掌掌力",
                    "damage_type" : random(2)?"瘀伤":"割伤",
                    ]);
               }
            if (level >= 130 && random(6) > 4
               && me->query("jiali") >= 50 
               && random(10) >= 5
               && me->query_skill("yunv-xinfa",1)>10) {                
                    return ([  
                      "action":msg, 
                    "force" : action[j]["force"],
                    "dodge":action[j]["dodge"],
                    "damage": level/2+600,
                    "lvl" : action[j]["lvl"],
                    "weapon" : random(2)?"掌风":"黯然掌力",
                    "damage_type" : "割伤",
                    ]);
               }
if(!me->query_skill("yunv-xinfa"))
{
    action[j]["force"]  = action[j]["force"]/2;
    action[j]["dodge"] = action[j]["dodge"]/2;
    action[j]["parry"]  = action[j]["parry"]/2;
    action[j]["attack"] = action[j]["attack"]/2;
    action[j]["damage"] = action[j]["damage"]/2;
}
            return action[j];
        }
    }
} 


int practice_skill(object me)
{
	if (me->query_skill("anranxiaohun-zhang",1) > 100
	&& (int)me->query_skill("yunv-xinfa", 1) < (int)me->query_skill("anranxiaohun-zhang",1) )
		return notify_fail("你现在只能用learn的来学黯然消魂掌。\n");	
	if ((int)me->query("jing") < 100)
		return notify_fail("你的体力太低了。\n");
	if ((int)me->query("qi") < 100)
		return notify_fail("你的体力太低了。\n");
	if ((int)me->query_str() < 30 )
		return notify_fail("你没有雄壮的臂力无法黯然消魂掌。\n");
	if ((int)me->query_con() < 30 )
		return notify_fail("你没有雄厚的体质无法黯然消魂掌。\n");
        if ((int)me->query_skill("dodge") < 100)
                return notify_fail("你的轻功太差，无法练黯然消魂掌。\n");
	if ((int)me->query("neili") < 50)
		return notify_fail("你的内力不够练黯然消魂掌。\n");
        if ((int)me->query_skill("yunv-jian", 1) < 80)
                return notify_fail("你的玉女剑法火候太浅。\n");
        if ((int)me->query_skill("yunv-shenfa", 1) < 80)
                return notify_fail("你的玉女身法火候太浅。\n");
        if ((int)me->query_skill("tianluo-diwang", 1) < 80)
                return notify_fail("你的天罗地网火候太浅。\n");
        if ((int)me->query_skill("meinv-quan", 1) < 80)
                return notify_fail("你的美女拳火候太浅。\n");
        if ((int)me->query_skill("yinsuo-jinling", 1) < 80)
                return notify_fail("你的银索金铃火候太浅。\n");

        me->receive_damage("jing", 70);
	me->receive_damage("qi", 70);
	me->add("neili", -70);
	return 1;
}
mixed hit_ob(object me, object victim, int damage_bonus)
{
    string msg;
    int j;
    j = me->query_skill("anranxiaohun-zhang", 1);
    if( damage_bonus < 100 ) return 0;
    if( !random(8) && !victim->is_busy() && j > 140
     && me->query_skill_mapped("parry") == "anranxiaohun-zhang"
     && me->query("neili") > 1000 && me->query("max_neili") > 1500 
     && j > random(victim->query_skill("dodge",1))
     && (int)me->query_skill("yunv-xinfa", 1) > 10
     && me->query_skill_mapped("force") == "yunv-xinfa"){
          switch(random(3)){
            case 0 :
               msg = YEL"$N抬头向天，浑若不见，呼的一掌向头顶空空拍出，手掌斜下，掌力化成弧形，四散落下！\n"NOR;
               msg += HIR"结果$n被这一招「杞人忧天」带得别说挣扎，竟连站定脚步也是不能。\n"NOR; 
               if (!victim->is_busy())victim->start_busy(4);
               break;
            case 1 :
               msg = HIB"$N右手云袖飘动，宛若流水，左掌却重滞之极，便似带着几千斤泥沙一般！\n"NOR;
               msg += HIR"结果$n被这一招「拖泥带水」带得犹如身陷洪涛巨浪，跌跌撞撞。\n"NOR;
               if (!victim->is_busy())victim->start_busy(4);               
               break;
            case 2 :
               msg = HIG"突然间$N手足齐动，左掌右袖、双足头锤、连得胸背腰腹尽皆有招式发出！\n"NOR;
               msg += HIR"结果$n被这一招「无中生有」带得自身全然身不由主的境地。\n"NOR;
               if (!victim->is_busy())victim->start_busy(4);
               break;               
          }         
          message_vision(msg, me, victim);
    }
	if( damage_bonus < 100 ) return 0;
	if( damage_bonus/2 > victim->query_str() ) {
if((int)me->query_skill("yunv-xinfa", 1) > 10 || random(10) > 5
&& me->query_skill_mapped("force") == "yunv-xinfa")
{
if (me->query_skill_mapped("unarmed") == "anranxiaohun-zhang")
{
		victim->receive_wound("qi", (damage_bonus) / 2 );
		victim->receive_damage("qi", (damage_bonus) /2 );
		return HIR "只听到“哇”的一声，"+ victim->name()+"喷出了一大口鲜血！\n" NOR;
}
}
	}
}
string perform_action_file(string action)
{
	return __DIR__"anranxiaohun-zhang/" + action;
}