//jiuyin-baiguzhao.c#include <ansi.h>inherit SKILL;mapping *action = ({([  "action" : "$N左爪虛晃，右爪蓄力，一招「勾魂奪魄」直插向$n的$l",    "force" : 320,    "dodge" : 10,    "damage": 30,    "lvl"   : 0,    "skill_name" : "勾魂奪魄" ,	"damage_type" : "抓傷"]),([  "action" : "$N雙手連環成爪，爪爪鉤向$n，「九子連環」已向$n的$l抓出",    "force" : 380,    "dodge" : 20,    "damage": 45,    "lvl"   : 20,    "skill_name" : "九子連環" ,	"damage_type" : "抓傷"]),([  "action" : "$N身形圍$n一轉，使出「天羅地網」，$n的$l已完全籠罩在爪影下",    "force" : 440,    "dodge" : 30,    "damage": 55,    "lvl"   : 40,    "skill_name" : "天羅地網" ,	"damage_type" : "抓傷"]),([  "action" : "$N使一招「風卷殘云」，雙爪幻出滿天爪影抓向$n全身",    "force" : 520,    "dodge" : 40,    "damage": 70,    "lvl"   : 60,    "skill_name" : "風卷殘云" ,	"damage_type" : "抓傷"]),([  "action" : "$N吐氣揚聲，一招「唯我獨尊」雙爪奮力向$n天靈戳下",    "force" : 620,    "dodge" : 50,    "damage": 100,    "lvl"   : 100,    "skill_name" : "唯我獨尊" ,    "damage_type" : "抓傷"]),([  "action" : "$N身形微晃，一招「相思深入骨」，十指如戟，插向$n的雙肩鎖骨",    "force" : 200,    "dodge" : 10,    "damage_type" : "內傷",    "lvl"   : 0,    "skill_name" : "相思深入骨" ,]),([  "action" : "$N出手如風，十指微微抖動，一招「素手裂紅裳」抓向$n的前胸",      "force" : 220,    "dodge" : 20,    "damage_type" : "內傷",    "lvl"   : 10,    "skill_name" : "素手裂紅裳" ,]),([  "action" : "$N雙手忽隱忽現，一招「鐵指破殘陽」，鬼魅般地抓向$n的肩頭",      "force" : 250,    "dodge" : 30,    "damage_type" : "內傷",    "lvl"   : 20,    "skill_name" : "鐵指破殘陽" ,]),([  "action" : "$N左手當胸畫弧，右手疾出，一招「明月當空照」，猛地抓向$n的額頭",    "force" : 290,    "dodge" : 25,    "damage_type" : "內傷",    "lvl"   : 31,    "skill_name" : "明月當空照" ,]),([  "action" : "$N使一招「陰氣動四方」，激起漫天的勁風，撞向$n",    "force" : 340,    "dodge" : 40,    "damage_type" : "內傷",    "lvl"   : 43,    "skill_name" : "陰氣動四方" ,]),([  "action" : "$N突然雙手平舉，$n一呆，正在猜測間，便見$N嗖的一下將雙手    收回胸前，接著一招「森然見白骨」，五指如鉤，直抓向$n的腰間",    "force" : 400,    "dodge" : 35,    "damage_type" : "內傷",    "lvl"   : 56,    "skill_name" : "森然見白骨" ,]),([  "action" : "$N使出「陰魂仍不散」，驀然游身而上，繞著$n疾轉數圈，$n正眼  花繚亂間，$N已悄然停在$n身后，右手劃出一道光圈，接著右手沖出光圈猛抓$n的后背",      "force" : 430,    "parry" : 20,    "dodge" : 20,    "damage_type" : "內傷",    "lvl"   : 71,    "skill_name" : "陰魂仍不散" ,]),([  "action" : "$N面無表情，雙臂忽左忽右地疾揮，使出「九陰搜魂手」，十指    忽伸忽縮，迅猛無比地襲向$n全身各處大穴",    "force" : 460,    "parry" : 5,    "dodge" : 30,    "damage_type" : "內傷",    "lvl"   : 87,    "skill_name" : "九陰搜魂手" ,]),([  "action" : "$N左手輕揮，蕩起陣陣陰風，一道青光閃過，$N的右手已變成青白  色，接著集中精神施展出「爪現鬼神亡」祭出九道爪影擊向$n的頭頂",    "force" : 520,    "parry" : 10,    "dodge" : 20,    "damage_type" : "內傷",    "lvl"   : 110,    "skill_name" : "爪現鬼神亡" ,]),});int valid_enable(string usage) { return usage=="claw" ||  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") < 200)            return notify_fail("你的內力太弱，無法練九陰白骨爪。\n");	return 1;}string query_skill_name(int level){	int i;	for(i = sizeof(action); i > 0; i--)		if(level >= action[i-1]["lvl"])			return action[i-1]["skill_name"];}mapping query_action(object me, object weapon){	int i, level;	level = (int) me->query_skill("jiuyin-baiguzhao",1);	for(i = sizeof(action); i > 0; i--)		if(level > action[i-1]["lvl"])            return action[NewRandom(i, 5, level/5)];}int practice_skill(object me){	object* ob, obj;	int i,skill,damage;	skill = me->query_skill("jiuyin-baiguzhao",1);	if (me->query("qi") < 250)		return notify_fail("你的體力太低了。\n");	if (me->query("jing") < 60)		return notify_fail("你的精力太低了。\n");	if (me->query("neili") < 250)		return notify_fail("你的內力不夠練九陰白骨爪。\n");	if( environment(me)->query("no_fight") )		return notify_fail("這里練功會誤傷他人。\n");	if( environment(me)->query("sleep_room") )		return notify_fail("這里練功會打擾別人休息。\n");        if( !objectp(obj=present("corpse", environment(me))))		return notify_fail("練九陰白骨抓需有尸體。\n");        if( skill > 100 && me->query("shen") > -100)		return notify_fail("這種邪惡武功不是俠義道當練的。\n");	me->receive_damage("qi", 40);	me->receive_damage("jing", 30);	me->add("neili", -100);	tell_room(environment(me), HIB"只見"+me->query("name")+"左手上圈下鉤、左旋右轉，連變了七八般花樣，驀地里右手一伸，噗的一響，五根手指直插入地上尸體的腦門。隨后五根手指"HIR"血淋淋"HIB"的提將起來。\n");//	ob = all_inventory(environment(me));//	for(i=0; i<sizeof(ob); i++)//	{//		if( !living(ob[i]) || ob[i]==me ) continue;//		if(skill+random(skill/2)<(int)ob[i]->query("con")*2) continue;//		damage = skill - ((int)ob[i]->query("neili") );//		if( damage > 0 )//		{//			ob[i]->receive_damage("qi", damage );//			if( (int)ob[i]->query("neili") < skill * 2 )//				ob[i]->receive_wound("qi", damage);//			tell_object(ob[i], //HIB"忽然眼前黑影狂舞，你覺得眼前一陣陰氣直襲面門，全身驟然感到要被撕裂開一樣！\n"NOR);//		}//		if( userp(ob[i]) ) ob[i]->fight_ob(me);//		else if( !ob[i]->is_killing(me) ) ob[i]->kill_ob(me);//	}	return 1;}void skill_improved(object me){    tell_object(me, HIR "你忽然從心底生出一股惡念：殺、殺、殺！我要殺絕天下人！\n" NOR );if (random(2)==0)    me->add("shen", -(me->query_skill("jiuyin-baiguzhao", 1)));}mixed hit_ob(object me, object victim, int damage_bonus){	if( damage_bonus < 100 ) return 0;	if( random(damage_bonus/2) > victim->query_str() ) {if (random(10)>8){victim->apply_condition("jy-poison",5);}		victim->receive_wound("qi", (damage_bonus - 100) / 3 );		return HIR "你聽到「喀啦」一聲輕響，竟似是骨碎的聲音！\n" NOR;	}}string perform_action_file(string action){    return __DIR__"jiuyin-baiguzhao/" + action;}