// taizu-quan 太祖長拳inherit SKILL;mapping *action = ({([     "action" : "$N一式「千里橫行」，雙臂直上直下，猛攻而前，打向$n的$l",       "force" : 100,        "dodge" : -20,        "parry" : -50,       "lvl" : 0,              "damage_type" : "內傷"]),([     "action" : "$N上身前傾，右拳直出呼的一聲打向$n，正是一招「沖陣斬將」",       "force" : 135,        "dodge" : -20,       "lvl" : 0,        "damage_type" : "瘀傷"]),([     "action" : "$N使招「河朔立威」，右手向上一揚，左手握拳打向$n",       "force" : 240,        "dodge" : -10,        "parry" : -25,       "lvl" : 10,        "damage_type" : "內傷"]),([     "action" : "$N雙拳呼呼打出，連接三遍，正和「擊鼓三通」之意",       "force" : 350,        "dodge" : -5,        "parry" : -30,       "lvl" : 10,        "damage_type" : "瘀傷"]),([     "action" : "$N跳起往左旋身一轉，左腳落地后雙拳齊出，搗向$n的$l，「揚馬立威」",       "force" : 400,        "dodge" : -10,        "parry" : -35,       "lvl" : 30,        "damage_type" : "瘀傷"]),});int valid_enable(string usage) { return usage=="cuff" || 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("max_neili") < 100)               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("taizu-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("jingli") < 30)               return notify_fail("你的體力太低了。\n");       if ((int)me->query("neili") < 20)               return notify_fail("你的內力不夠練太祖長拳。\n");       me->receive_damage("jingli", 30);       me->add("neili", -10);       return 1;}