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 ((int)me->query_skill("qingfu-shenfa", 1) < 80)		return notify_fail("你的青蝠身法火候太淺。\n");if ( lvl > 149){        me->receive_damage("jing", lvl/2);        me->receive_damage("qi", lvl);        me->add("neili", -lvl);}        return 1;//	return notify_fail("乾坤大挪移只能通過(guò)讀<<乾坤大挪移>>心法提高。\n");}string perform_action_file(string action){        return __DIR__"qiankun-danuoyi/"  + action;}int ob_hit(object ob, object me, int damage){        object wp,wp1, target;        string msg;        int p,j,skill, neili, neili1, exp, exp1;        wp = me->query_temp("weapon");        wp1 = ob->query_temp("weapon");        skill = me->query_skill("qiankun-danuoyi", 1);        neili = me->query("neili");        neili1 = ob->query("neili");        exp = me->query("combat_exp");        exp1 = ob->query("combat_exp");if (random(me->query_skill("jiuyang-shengong",1)) > 120&& me->query("neili") < me->query("max_neili")&& me->query_skill_mapped("force") == "jiuyang-shengong"){message_vision(HIR"$N運(yùn)起九陽(yáng)神功，全身內(nèi)力源源不斷的涌出!\n"NOR,me, ob);me->add("neili",random(me->query_skill("jiuyang-shengong",1))+100);}if (random(me->query_skill("jiuyang-shengong",1)) > 120&& me->query("qi") < me->query("max_qi")&& me->query_skill_mapped("force") == "jiuyang-shengong"&& random(2)==0){message_vision(RED"$N運(yùn)起九陽(yáng)神功，身上的傷好了很多!\n"NOR,me, ob);me->add("qi",random(me->query_skill("jiuyang-shengong",1))+180);if (me->query("eff_qi") < me->query("max_qi"))me->add("eff_qi",random(me->query_skill("jiuyang-shengong",1))+180);}if (random(me->query_skill("qiankun-danuoyi",1)) > 120&& me->is_busy()&& me->query_skill_mapped("force") == "jiuyang-shengong")&& random(2)=0{message_vision(HIC"$N暗運(yùn)乾坤大挪移，本來(lái)忙亂的動(dòng)作快了起來(lái)!\n"NOR,me, ob);me->start_busy(1);}      if(me->query_temp("yi_ob") && living(me)){         target = present(me->query_temp("yi_ob"), environment(me));         me->delete_temp("yi_ob");         if(!target){            tell_object(me, HIY"你發(fā)現(xiàn)你想挪移的目標(biāo)對(duì)象已經(jīng)不在這里了。\n"NOR);            return damage;            }         if(!living(target)){            tell_object(me, HIY"你發(fā)現(xiàn)你想挪移的目標(biāo)對(duì)象已經(jīng)昏迷不醒了。\n"NOR);            return damage;            }         if(neili < 800){            tell_object(me, HIY"你正要挪移，卻發(fā)現(xiàn)自己的真氣不夠了！\n"NOR);            return damage;            }         message_vision(WHT"$N突然雙手晃動(dòng)擊出陣陣氣流，左拔右?guī)б?n的招數(shù)向旁邊眾人牽引！\n"NOR,me, ob);         if(random(exp) < exp1/3){            me->add("neili", -125);            message_vision(HIY"結(jié)果$n并沒(méi)有受到干擾，反而順勢(shì)來(lái)到$N的側(cè)面，發(fā)出強(qiáng)力的一擊！\n"NOR,me, ob);            return random(damage);            }         me->add("neili", -250);         tell_room(environment(me), "結(jié)果引得"+ob->name()+"的力道直向"+target->name()+"沖擊過(guò)去！\n",({ target,ob }));         tell_object(target, HIR"結(jié)果你發(fā)現(xiàn)"+ob->name()+"的力道直向自己沖擊過(guò)來(lái)！\n"NOR);         tell_object(ob, HIR"結(jié)果你發(fā)現(xiàn)自己的力道直向"+target->name()+"沖擊過(guò)去！\n"NOR);         if(target->query_skill("dodge")>=damage)            msg = HIY"結(jié)果$n沒(méi)有受到任何傷害。\n"NOR;         else{            target->receive_damage("qi", damage-target->query_skill("dodge"), ob);            target->receive_wound("qi", damage-target->query_skill("dodge"), ob);            p = target->query("qi")*100/target->query("max_qi");            msg = damage_msg(damage/2, "傷害");            msg += "( $n"+eff_status_msg(p)+" )\n";            }         if(target->query("shen") < -1000 && !target->is_killing(ob->query("id"))){              if(random(target->query_int()) < 20)                   target->kill_ob(ob);              else if(random(target->query_int()) > 30)                   target->fight_ob(me);              }         if(target->query("shen") > -1000 && !target->is_killing(ob->query("id"))){              if(random(target->query_int()) < 20)                   target->fight_ob(ob);              else if(random(target->query_int()) > 30)                   target->fight_ob(me);              }         message_vision(msg, me, target);         return -5000;         }      if(me->query_temp("fanzhen")){           me->delete_temp("fanzhen");           return 1;           }      if(me->query("jiali") && living(me) &&         random(exp) < exp1/3 && skill > 50 && neili > 500 && living(ob)         && !ob->query("env/invisibility")){         if(random(2)==1) me->add_temp("fanzhen", 1);          me->add("neili", -(random(10)));        if(wp && wp1 && userp(me)){                               msg = msg_weapon[random(sizeof(msg_weapon))];           msg = replace_string(msg, "$W", wp->name());           msg = replace_string(msg, "$w", wp1->name());           if(neili >= neili1*2+damage){              if(random(me->query_str()) > ob->query_str()/2 && skill > 150){                  msg += HIW"結(jié)果$n一個(gè)抵擋不住，手中"+wp1->name()+HIW"脫手飛出！\n"NOR,                  me->add("neili", -50);                  wp1->unequip();                  wp1->move(environment(ob));                  j = -5000;                  }              else{                  if (damage>50){                  ob->receive_damage("qi", damage/2?damage/2:10, me);                  ob->receive_wound("qi", damage/10 > 0?damage/10:2, me);}                  p = ob->query("qi")*100/ob->query("max_qi");                  msg += damage_msg(damage/2, "傷害");                  msg += "( $n"+eff_status_msg(p)+" )\n";                  j = -5000;                  }              }           else if(neili >= random(neili1)*2+damage){              msg += "結(jié)果基本上卸掉了$n的力道。\n";                            j = -5000;              }           else{              j = damage/2+random(damage/2);              if(j<damage/2) msg += "結(jié)果卸掉了一些$n的力道。\n";              else msg += "結(jié)果卸掉了$n大半的力道。\n";              j = -j;              }                      message_vision(msg, me, ob);           return j;           }                  else{           msg = msg_unarmed[random(sizeof(msg_unarmed))];           if(neili >= neili1*2+damage){if (damage>50){              ob->receive_damage("qi", damage/2?damage/2:10, me);              ob->receive_wound("qi", damage/10 > 0?damage/10:2, me);}              p = ob->query("qi")*100/ob->query("max_qi");              msg += damage_msg(damage, "內(nèi)傷");              msg += "( $n"+eff_status_msg(p)+" )\n";              j = -5000;              }           else if(neili >= random(neili1)*2+damage){              msg += "結(jié)果基本上卸掉了$n的力道。\n";                            j = -5000;              }           else{              j = damage/2+random(damage/2);               if(j<damage/2) msg += "結(jié)果卸掉了一些$n的力道。\n";              else msg += "結(jié)果卸掉了$n一半的力道。\n";              j = -j;              }                      message_vision(msg, me, ob);           return j;           }     }}