// qiankun-danuoyi.c 乾坤大挪移// by King 97.05inherit SKILL;#include "/kungfu/skill/eff_msg.h";string  *msg_weapon = ({YEL"$N回手一揮，想掠斜$w"YEL"來勢，哪料到這么輕輕一揮之力，回擊的力量竟如此大得異乎尋常！\n"NOR,RED"哪知$N的$W"RED"微轉，平平的搭在$w"RED"之上，一股柔和的勁力送出，將$w"RED"直蕩了開去！\n"NOR,HIY"$N向左踏出兩步，右手$W"HIY"揮出，一股勁風撲向$n的后心，方位時刻拿捏得恰到好處！\n"NOR,HIC"$n攻出的這一招，原是極高明的招數，但被$N手指一拂，勁力又斜斜卸了開去！\n"NOR,BLU"$N待$n的$w"BLU"將要觸及心口時，左足突然踢出，壓下$w"BLU"，一借力順勢踏落！\n"NOR,HIB"$N雙手同時施展挪移乾坤心法，一聲清嘯，拔身而起，在半空中輕輕一個轉折，飄然落在$n身旁！\n"NOR,HIW"$n武功雖高，但于$N剛猛掌力襲體而來，手中$w"HIW"再也難以拆解$N的$W"HIW"招式！\n"NOR,YEL"$N右手五指猶如撫琴鼓瑟，忽挑忽捻，忽彈忽撥，上身半點不動，片刻間將$n的力道盡數卸了！\n"NOR,GRN"$N右打出一招泰山劍法「來鶴清泉」，左手卻已使出乾坤大挪移的手法，拂向$n手中$w"GRN"！\n"NOR,CYN"$N單伸$W"CYN"，按在$n$w"CYN"邊上，依照所練的乾坤大挪移心法，微一運勁，便將$n的勁力輕輕移開了！\n"NOR,});string  *msg_unarmed = ({HIC"一剎那間$N化剛為柔的急劇轉折，已使出屬乾坤大挪移心法的第七層神功！\n"NOR,HIW"$N動也不動，待他進到身前，乾坤大挪移內力斜引，將他力道挪移推卸了開去！\n"NOR,GRN"豈知剛剛相觸，突然一股柔和而厚重的勁力從$N身上發出，擋住了$n的勁力。同時，$N右手五指也已按在$n胸口膻中穴的周遭！\n"NOR,RED"結果$N使出乾坤大挪移心法，依著八卦方位，倒反了$n這招的去勢。\n"NOR,CYN"$N運使乾坤大挪移，越奔越快，如風如火，似雷似電，跟著縱身而前，左手探出抓向$n！\n"NOR,BLU"$N此時體內真氣流轉，一遇外力，自然而然而生反擊，比之$n擊來的力道又大得多了！\n"NOR,BLU"$n右手一指戳向$N肩頭，卻不知如何被輕輕一帶，噗的一響，竟戳到了自己手臂，只痛得眼前金星直冒！\n"NOR,YEL"驀地里好象旁邊有一股力道飛來，將$n的力道一引，從$N身旁斜斜帶過！\n"NOR,YEL"$N當下潛運乾坤大挪移心法，使$n擊向$N的一招莫名奇妙的溜滑向一旁。\n"NOR,HIR"$N再使挪移乾坤心法，一牽一引，托的一響，將$n的力道引偏。\n"NOR,YEL"$N右手五指猶如撫琴鼓瑟，忽挑忽捻，忽彈忽拔，上身半點不動，將$n此招化于無形！\n"NOR,WHT"$N巧運乾坤大挪移心法，使$n這招莫名其妙的在中途轉了方向，力道化于無形！\n"NOR,CYN"乾坤大挪移神功變幻，何等奧妙，結果$N手指拂出，已點中了$n雙腕穴道！\n"NOR,GRN"$N使出挪移大乾坤，$n這招莫名其妙的在中途轉了方向，打出的力量向自己飛了回來！\n"NOR,});string *parry_msg = ({	"$N一招擊在$n身上，卻被$n暗運乾坤大挪移，將內力盡數移入地下。\n",	"$n輕輕一帶，$N發現自己招數回擊過來，嚇得往后倒退幾步。\n",        "$n手臂回轉，在$N手肘下輕輕一推，$N招數落空。\n",        "$n右手伸出，在$N手腕上輕輕一拉，$N收勢不住，直往前撲去。\n",        "$n身形不動，$N一招擊下，有如石沉大海，不覺呆住了。\n",	"$n左牽右引，$N如身處漩流，連續轉了好幾個圈。\n",	"$n雙手回圈，$N只覺得前面好象有一堵墻，再也攻不進去。\n",	"$n輕輕一轉，$N一招擊在地上，只打得塵土飛揚。\n",});string *dodge_msg = ({	"$N一招擊在$n身上，卻被$n暗運乾坤大挪移，將內力盡數移入地下。\n",	"$n輕輕一帶，$N發現自己招數回擊過來，嚇得往后倒退幾步。\n",        "$n手臂回轉，在$N手肘下輕輕一推，$N招數落空。\n",        "$n右手伸出，在$N手腕上輕輕一拉，$N收勢不住，直往前撲去。\n",        "$n身形不動，$N一招擊下，有如石沉大海，不覺呆住了。\n",	"$n左牽右引，$N如身處漩流，連續轉了好幾個圈。\n",	"$n雙手回圈，$N只覺得前面好象有一堵墻，再也攻不進去。\n",	"$n輕輕一轉，$N一招擊在地上，只打得塵土飛揚。\n",});int valid_enable(string usage) {     return (usage == "parry") || (usage == "dodge");}string query_parry_msg(string limb){       return parry_msg[random(sizeof(parry_msg))];}string query_dodge_msg(string limb){        return dodge_msg[random(sizeof(dodge_msg))];}int valid_learn(object me){	int lvl = (int)me->query_skill("qiankun-danuoyi", 1);	if ( me->query("gender") == "無性" && lvl > 99)		return notify_fail("你先天不足，再學下去難免走火入魔。\n");	if ((int)me->query_skill("force", 1) < 100)		return notify_fail("就這么點基本內功還想學乾坤大挪移？\n");	if (lvl > 150 && me->query("family/family_name") != "明教" )		return notify_fail("乾坤大挪移只能通過讀<<乾坤大挪移>>心法提高。\n");	if ((int)me->query("max_neili", 1) < 1500)		return notify_fail("就這么點內力還想學乾坤大挪移？\n");        if ((int)me->query_skill("force", 1) < lvl)                return notify_fail("你的基本內功火候還不夠，小心走火入魔！\n");        if ((int)me->query_skill("jiuyang-shengong", 1) < lvl)                return notify_fail("你的九陽神功火候還不夠，小心走火入魔！\n");	if ((int)(me->query("max_neili")/15) < lvl)		return notify_fail("你的內力火候還不夠，小心走火入魔！\n");       if( me->query("family/family_name") != "明教")           return notify_fail("你非明教弟子！只能通過讀<<乾坤大挪移>>心法提高。\n");        if ((int)me->query_skill("force", 1) < lvl)                return notify_fail("你的基本內功火候還不夠，小心走火入魔！\n");        if ((int)me->query_skill("qingfu-shenfa", 1) < 80)		return notify_fail("你的青蝠身法火候太淺。\n");		        if ((int)me->query_skill("jiuyang-shengong", 1) < lvl)                return notify_fail("你的九陽神功火候還不夠，小心走火入魔！\n");	if ((int)(me->query("max_neili")/15) < lvl)		return notify_fail("你的內力火候還不夠，小心走火入魔！\n");        if ((int)me->query("qi") < lvl)           return notify_fail("你的體力不夠練乾坤大挪移。\n");        if ((int)me->query("jing") < lvl)           return notify_fail("你的精力不夠練乾坤大挪移。\n");        if ((int)me->query("neili") < lvl)           return notify_fail("你的精力不夠練乾坤大挪移。\n");if ( lvl > 149){        me->receive_damage("jing", lvl/2);        me->receive_damage("qi", lvl);        me->add("neili", -lvl);}        return 1;}void skill_improved(object me){   int skill, lit, med;   skill = (int)me->query_skill("qiankun-danuoyi", 1);   lit = (int)me->query_skill("literate", 1);   med = me->query_skill("medicine", 1);   if( skill == 50 && !me->query("qkdny") && lit > 50){      tell_object(me, HIY"你按照羊皮上所書，運氣導行、移宮使勁，竟是毫不費力的便做到了。\n"NOR);      me->add("max_neili", 10+random(30));      me->set("qkdny", 1);//      me->add("qkdny", 1);      }else if(skill == 80 && me->query("qkdny") == 1 && lit > 80){      tell_object(me, HIM"你修煉第二層心法，依法施為，片刻真氣貫通，只覺十根手指之中，似乎有絲絲冷氣射出。\n"NOR);      me->add("max_neili", 10+random(30));      me->add("qkdny", 1);      }else if(skill == 100 && me->query("qkdny") == 2 && lit > 100){      tell_object(me, CYN"你按照羊皮上所書，邊讀邊練，精神為之大振！\n"NOR);      me->add("max_neili", 10+random(30));      me->add("qkdny", 1);      }else  if(skill == 130 && me->query("qkdny") == 3 && lit > 120){      message_vision(RED"$N半邊臉孔脹得血紅，半邊臉頰卻發鐵青，但神完氣足，雙眼精光炯炯，料是無礙。\n"NOR, me);      me->add("max_neili", 10+random(30));      me->add("qkdny", 1);      }else if(skill == 150 && me->query("qkdny") == 4 && lit > 140){      message_vision(HIW"$N臉上忽青忽紅，臉上青時身子微顫，如墮寒冰；臉上紅時額頭汗如雨下。\n"NOR, me);      me->add("max_neili", 10+random(30));      me->add("qkdny", 1);      }else if(skill == 170 && me->query("qkdny") == 5 && lit > 160){      tell_object(me, MAG"你覺得體內潛力便如山洪突發，沛然莫之能御。原來是乾坤大挪移心法發揮了你本身所蓄有的潛力！\n"NOR);      me->add("max_neili", 20+random(30));      me->add("qkdny", 1);      }else if(skill == 190 && me->query("qkdny") == 6 && lit > 180){      tell_object(me, MAG"你猛地里氣血翻涌，心跳加快，終于練成了乾坤大挪移神功！\n");            me->add("max_neili", 50+random(30));      me->add("qkdny", 1);      }}int practice_skill(object me){	int lvl = (int)me->query_skill("qiankun-danuoyi", 1);        if( me->query("family/family_name") != "明教")           return notify_fail("你非明教弟子！只能通過讀<<乾坤大挪移>>心法提高。\n");        if ((int)me->query_skill("force", 1) < lvl)                return notify_fail("你的基本內功火候還不夠，小心走火入魔！\n");        if ((int)me->query_skill("jiuyang-shengong", 1) < lvl)                return notify_fail("你的九陽神功火候還不夠，小心走火入魔！\n");	if ((int)(me->query("max_neili")/15) < lvl)		return notify_fail("你的內力火候還不夠，小心走火入魔！\n");        if ((int)me->query("qi") < lvl)