weituo-gun.c

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

// weituo-gun.c 韦陀棍
// modified by Venus Oct.1997

inherit SKILL;

mapping *action = ({
([	"action" : "$N将左脚伸直，成弓箭步站定，一招「迎手托架」，右手翻掌上架，左手顺势压掌下封",
	"force" : 90,
        "dodge" : 45,
	"lvl" : 5,
	"skill_name" : "迎手托架",
	"damage_type" : "瘀伤"
]),
([	"action" : "$N一招「采压冲捶」，右脚原地跺步，使身体转正，接着左封掌下压，右掌向前直击$n",
	"force" : 160,
        "dodge" : 35,
	"lvl" : 15,
	"skill_name" : "采压冲捶",
	"damage_type" : "瘀伤"
]),
([	"action" : "$N接着「转身拦截」，顺著身体右转之势，收右拳，撩左掌，双手交叉，向$n横劈而出",
	"force" : 170,
        "dodge" : 25,
	"lvl" : 25,
	"weapon" : "掌缘",
	"skill_name" : "转身拦截",
	"damage_type" : "割伤",
]),
([	"action" : "$N右脚向右踏出　使身体冲向右方，一招「进步冲捶」，收左手扣腰，右手化掌向$n圈封而出",
	"force" : 80,                                    
        "dodge" : 120,
	"lvl" : 25,
	"skill_name" : "进步冲捶",
	"damage_type" : "瘀伤"
]),
([	"action" : "$N一式「回马拉捶」，步法左转，成马步坐定，左手挑回扣住腰际，右掌顺势向$n$l击出",
	"force" : 100,
        "dodge" : 125,
	"lvl" : 45,
	"skill_name" : "回马拉捶",
	"damage_type" : "瘀伤"
]),
([	"action" : "$N又一招「进步冲捶」，右手顺势向前圈采而出，步法随著右转之势，左手化掌向$n直击而出",
        "force" : 120,
        "dodge" : 115,
	"lvl" : 45,
	"skill_name" : "进步冲捶",
	"damage_type" : "瘀伤"
]),
([	"action" : "$N右脚向右落步，以脚尖轻点地面，一招「跨步反砸」，左掌一直护肩不动，右掌向右反崩而出",
        "force" : 140,
        "dodge" : 115,
	"lvl" : 65,
	"skill_name" : "跨步反砸",
	"damage_type" : "瘀伤"
]),
([	"action" : "$N双腿顺势转正，原地跺步，成弓箭步站定，一招「穿刁斜打」，右手化掌，向$n$l横切",
        "force" : 160,
        "dodge" : 130,
	"lvl" : 65,
	"weapon" : "右掌",
	"skill_name" : "穿刁斜打",
	"damage_type" : "割伤"
]),
([ 	"action" : "$N步法原地向下成马步坐定，一招「低马击砸」，右拳击砸於左膝前方，左掌则翻掌硬推",
        "force" : 180,
        "dodge" : 115,
	"lvl" : 85,
	"skill_name" : "低马击砸",
	"damage_type" : "瘀伤"
]),
([	"action" : "$N一招「起胳托架」，将左脚撑直，成弓箭步站定，右拳顺势翻肘，向$n架出",
        "force" : 210,
        "dodge" : 120,
	"lvl" : 101,
	"skill_name" : "起胳托架",
	"damage_type" : "瘀伤"
]),
([      "action":"$N一招「黄石纳履」，手中$w如蜻蜓点水般，招招向$n的下盘要害点去
",
    "force" : 160,
    "dodge" : 5,
    "parry" : 5,
    "damage": 40,
    "lvl" : 0,
    "skill_name" : "黄石纳履",
    "damage_type":"挫伤"
]),
([      "action":"$N把$w平提胸口，一拧身，一招「勒马停锋」，$w猛地撩向$n的颈部",
    "force" : 180,
    "dodge" : 5,
    "parry" : 10,
    "damage": 65,
    "lvl" : 20,
    "skill_name" : "勒马停锋",
    "damage_type":"挫伤"
]),
([      "action":"$N一招「平地龙飞」，全身滴溜溜地在地上打个大转，举棍向$n的胸腹
间戳去",
    "force" : 210,
    "dodge" : 5,
    "parry" : 15,
    "damage": 40,
    "lvl" : 60,
    "skill_name" : "平地龙飞",
    "damage_type":"挫伤"
]),
([      "action":"$N伏地一个滚翻，一招「伏虎听风」，$w挟呼呼风声迅猛扫向$n的足胫
",
    "force" : 250,
    "dodge" : 15,
    "parry" : 5,
    "damage": 100,
    "lvl" : 60,
    "skill_name" : "伏虎听风",
    "damage_type":"挫伤"
]),
([      "action":"$N一招「流星赶月」，身棍合一，棍端逼成一条直线，流星般向顶向$n
的$l",
    "force" : 300,
    "dodge" : 20,
    "parry" : 15,
    "damage": 110,
    "lvl" : 80,
    "skill_name" : "流星赶月",
    "damage_type":"挫伤"
]),
([      "action":"$N双手持棍划了个天地大圈，一招「红霞贯日」，一棍从圆心正中击出
，撞向$n的胸口",
    "force" : 350,
    "dodge" : 20,
    "parry" : 15,
    "damage": 125,
    "lvl" : 100,
    "skill_name" : "红霞贯日",
    "damage_type":"挫伤"
]),
([      "action":"$N一招「投鞭断流」，$w高举，以雷霆万钧之势对准$n的天灵当头劈下
",
    "force" : 410,
    "dodge" : 25,
    "parry" : 20,
    "damage": 140,
    "lvl" : 120,
    "skill_name" : "投鞭断流",
    "damage_type":"挫伤"
]),
([      "action":"$N潜运真力，一招「苍龙归海」，$w顿时长了数丈，矫龙般直射$n的胸
口",
    "force" : 470,
    "dodge" : 30,
    "parry" : 25,
    "damage": 150,
    "lvl" : 150,
    "skill_name" : "苍龙归海",
    "damage_type":"挫伤"
]),
});

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

int valid_learn(object me)
{
    if ((int)me->query("max_neili") < 100)
   return notify_fail("你的内力不够。\n");
    if ((int)me->query_skill("hunyuan-yiqi", 1) < 20)
   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("weituo-gun",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)
{
    object weapon;

    if (!objectp(weapon = me->query_temp("weapon"))
    || (string)weapon->query("skill_type") != "staff")
   return notify_fail("你使用的武器不对。\n");
    if ((int)me->query("qi") < 50)
   return notify_fail("你的体力不够练韦陀棍。\n");
    me->receive_damage("qi", 25);
    return 1;
}

string perform_action_file(string action)
{
        return __DIR__"weituo-gun/" + action;
}