//combatd.c第346-390修改如下

       //(2) 加上特殊内功的防御能力 added by yeahsi
       //for 圣斗士 7hai   added by huarong 2004/7

       if ( (victim->query_temp("jldl")||victim->query_temp("fantan")) && living(victim) )       //如果敌人运用了jldl,而且不是晕的                          
       {
       	    afp = skill_power(me, "force", SKILL_USAGE_ATTACK);
            if( afp < 1) afp = 1;
            vfp = skill_power(victim, "force", SKILL_USAGE_DEFENSE);
            if( vfp < 1 ) vfp = 1;
            mod_val = 0;
            mod_val -= random(25);
            if (!victim->query_temp("weapon")) mod_val += 10;
            if( vfp > 1000000 )     mod_val = vfp / 100 * (100 + mod_val);
            else   mod_val = (100 + mod_val) * vfp / 100;
            if( mod_val < 1 ) mod_val = 1;
            force_adj=random(afp + vfp);
       }
       else {force_adj=1;mod_val=1;}
    

    //
    // (3) Fight!
    //     Give us a chance of AP/(AP+DP) to "hit" our opponent. Since both
    //     AP and DP are greater than zero, so we always have chance to hit
    //     or be hit.
    //


       //for 圣斗士 7hai   added by huarong 2004/7
            if(victim->query_temp("fantan")&& force_adj = mod_val )
              {force_adj=1;mod_val=2;}
              
        if ( force_adj < mod_val )
        {
          if ( victim->query_temp("jldl") )
           {
            foo = "/daemon/skill/wuxiangforce/jldl"->jldl_result(victim, me, mod_val, force_adj,action);
           }
          if ( victim->query_temp("fantan") )//for 圣斗士 7hai   added by huarong 2004/7
           {
            foo = "/d/shengdoushi/fantan"->fantan_result(victim, me, mod_val, force_adj,action);
           }
                result += foo;
                damage = RESULT_FORCE;
        }    



///////////////////////////////////////////
//shengjian.c 增加到 /cmds/std/shengjian.c
//yingzhan.c 增加到 /cmds/std/yingzhan.c



////////
//fingerd.c最后面增加

string finger_date(string name)
{
	object ob, body;
	string msg, mud;
        int timeold,time,timecom;
	reset_eval_cost();
	if( sscanf(name, "%s@%s", name, mud)==2 ) {
		GFINGER_Q->send_gfinger_q(mud, name, this_player(1));
		return "网路指令传送过程可能需要一些时间，请稍候。\n";
	}

	ob = new(LOGIN_OB);
	ob->set("id", name);
	if( !ob->restore() ) {
	  destruct(ob);
	  return "没有这个玩家。\n";
        }
        timeold=ob->query("last_off");
        time=time();
        timecom=time-timeold;
	if( objectp(body = find_player(name)) 
		&& geteuid(body)==name 
		&& interactive(body)  ) 
	 {
	   msg = sprintf("目前正在连线中。\n");
         }
	else
	 {
	   msg = sprintf("距上次连线：\n");
	   msg = msg + age_string(timecom);
	 }  
	return msg;
}