luohan-quan.c

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

// luohan-quan.c 罗汉拳
// modified by Venus Oct.1997
inherit SKILL;

mapping *action = ({
([      "action" : "$N连续上步，一式「黄莺落架」，左右手分靠，变拳为掌，击向$n的
$l",
    "force" : 180,
    "dodge" : 5,
    "lvl" : 0,
    "skill_name" : "黄莺落架",
    "damage_type" : "瘀伤"
]),
([      "action" : "$N左脚虚踏，全身右转，一招「丹凤朝阳」，右掌猛地插向$n的$l",
    "force" : 200,
    "dodge" : 10,
    "lvl" : 8,
    "skill_name" : "丹凤朝阳",
    "damage_type" : "瘀伤"
]),
([      "action" : "$N双手大开大阖，宽打高举，使一招「洛钟东应」，双拳向$n的$l打
去",
    "force" : 220,
    "dodge" : 15,
    "lvl" : 15,
    "skill_name" : "洛钟东应",
    "damage_type" : "瘀伤"
]),
([      "action" : "$N左掌圈花扬起，屈肘当胸，虎口朝上，一招「偏花七星」打向$n的
$l",
    "force" : 260,
    "dodge" : 20,
    "lvl" : 24,
    "skill_name" : "偏花七星",
    "damage_type" : "瘀伤"
]),
([      "action" : "$N使一招「苦海回头」，上身前探，双手划了个半圈，击向$n的$l",
    "force" : 300,
    "dodge" : 25,
    "lvl" : 33,
    "skill_name" : "苦海回头",
    "damage_type" : "瘀伤"
]),
([      "action" : "$N双掌划弧，一记「挟山超海」，掌出如电，一下子切到$n的手上",
    "force" : 360,
    "dodge" : 30,
    "lvl" : 42,
    "skill_name" : "挟山超海",
    "damage_type" : "瘀伤"
]),
([      "action" : "$N施出「慑服外道」，双拳拳出如风，同时打向$n头，胸，腹三处要
害",
    "force" : 420,
    "dodge" : 35,
    "lvl" : 50,
    "skill_name" : "慑服外道",
    "damage_type" : "瘀伤"
]),
([      "action" : "$N左脚内扣，右腿曲坐，一式「三入地狱」，双手齐齐按向$n的胸口
",
    "force" : 480,
    "dodge" : 40,
    "lvl" : 58,
    "skill_name" : "三入地狱",
    "damage_type" : "瘀伤"
]),
([	"action" : "$N一式「抱手起式」，身体保持站立的姿势不变，双眼平视前方，双掌前探，双手握拳，抓向$n腰间",
	"force" : 50,
        "dodge" : 30,
	"lvl" : 2,
	"skill_name" : "抱手起式",
        "damage_type" : "瘀伤"
]),
([	"action" : "$N左脚虚踏，一招「平步栽掌」，身体仍然保持站立的姿势不变，左手化掌，向前直封而出",
	"force" : 60,
        "dodge" : 20,
	"lvl" : 5,
	"skill_name" : "平步栽掌",
        "damage_type" : "瘀伤"
]),
([	"action" : "$N右脚原地跺步，左脚踏前勾出，成七星步坐定，一招「跺脚崩挂」，右手向右横拉而出",
	"force" : 170,
        "dodge" : 15,
	"lvl" : 25,
	"skill_name" : "跺脚崩挂",
        "damage_type" : "瘀伤"
]),
([	"action" : "$N全身向前，一招「进步劈砸」，右掌向前直劈而落，左掌同时翻掌硬接，自然击出声音",
	"force" : 80,
        "dodge" : 112,
	"lvl" : 25,
	"skill_name" : "进步劈砸",
        "damage_type" : "瘀伤"
]),
([	"action" : "$N左掌护住右腕不动，右手原地向外翻手抓采，出「采刁出掌」，右手不动，左掌向$n直切而出",
	"force" : 100,
        "dodge" : 15,
	"lvl" : 45,
	"weapon" : "手掌",
	"skill_name" : "采刁出掌",
	"damage_type" : "割伤"
]),
([	"action" : "$N右脚拖进，向下蹲成玉环步坐定，右手反拳一式「跟步击砸」向前劈落，左掌更翻掌而出",
        "force" : 120,
        "dodge" : 118,
	"lvl" : 45,
	"skill_name" : "跟步击砸",
        "damage_type" : "瘀伤"
]),
([	"action" : "$N保持玉环步姿势坐定不动，左手扣腕，右掌上翻出「顺势采手」，以缠丝手向$n$l采出",
        "force" : 140,
        "dodge" : 21,
	"lvl" : 65,
	"skill_name" : "顺势采手",
        "damage_type" : "内伤"
]),
([	"action" : "$N的缠丝手向下采压，身体原地向上立起「双落蹬子」，接着起右腿向$n直蹬而出",
        "force" : 260,
        "dodge" : 24,
	"lvl" : 64,
	"skill_name" : "双落蹬子",
        "damage_type" : "瘀伤"
]),
([	"action" : "$N将右脚尖回勾，以膝盖向前直顶而出「提膝顶破」，顺势右拳收腰，左手封掌前推",
        "force" : 280,
        "dodge" : 24,
	"lvl" : 84,
	"skill_name" : "提膝顶破",
        "damage_type" : "瘀伤"
]),
([	"action" : "$N一招「移步截砸」，身体微仰不动，双掌向左同时以圈封手向前采出，接着左掌前托，右拳顺势向前低劈$n",
        "force" : 300,
        "dodge" : 24,
	"lvl" : 105,
	"skill_name" : "移步截砸",
        "damage_type" : "瘀伤"
]),
});

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

int valid_learn(object me)
{
    if (me->query_temp("weapon") || me->query_temp("secondary_weapon"))
       return notify_fail("练罗汉拳必须空手。\n");
    if ((int)me->query_skill("hunyuan-yiqi", 1) < 10)
       return notify_fail("你的混元一气功火候不够，无法学罗汉拳。\n");
    if ((int)me->query("max_neili") < 50)
       return notify_fail("你的内力太弱，无法练罗汉拳。\n");
    return 1;
}

string query_skill_name(int level)
{
    int i;
    for(i = sizeof(action)-1; i >= 0; i--)
   if(level >= action[i]["lvl"])
      return action[i]["skill_name"];
}

mapping query_action(object me, object weapon)
{
    int i, level;
    level   = (int) me->query_skill("luohan-quan",1);
    for(i = sizeof(action); i > 0; i--)
   if(level > action[i-1]["lvl"])
      return action[NewRandom(i, 20, level/5)];
}

int practice_skill(object me)
{
    if ((int)me->query("qi") < 30)
       return notify_fail("你的体力太低了。\n");
    if ((int)me->query("neili") < 20)
       return notify_fail("你的内力不够练罗汉拳。\n");
    me->receive_damage("qi", 25);
    me->add("neili", -5);
    return 1;
}

string perform_action_file(string action)
{
        return __DIR__"luohan-quan/" + action;
}