Просмотр архива Darkworld


<?

Error_Reporting(E_ALL & ~E_NOTICE);

include_once("files/antixak.php");

header("Content-type:text/vnd.wap.wml");

echo "<?xml version="1.0" encoding="UTF-8"?>";

echo "<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.2//EN" "http://www.wapforum.org/DTD/wml12.dtd">";

echo "<wml>n";

echo "<head><meta http-equiv="Cache-Control" content="no-cache" forua="true"/></head>";

echo "<card id="index" title="&#x421;&#x43F;&#x438;&#x441;&#x43E;&#x43A; &#x43A;&#x43B;&#x430;&#x43D;&#x43E;&#x432;">";

echo "<p align="left">";



$log = htmlspecialchars(stripslashes($log));

$pas = htmlspecialchars(stripslashes($pas));

$go = htmlspecialchars(stripslashes($go));

/////////////////////////////////////////////////////

$text = @file("data/reg/$log.dat"); 

if ($text!=""){

$udata = explode(":||:",$text[0]);

$login=trim($udata[0]);

$password=trim($udata[1]);}

////////////////////////////////////////////////////////

if (md5($pas)==$password && $log==$login && $log!=="" && md5($pas)!=="") {include_once"files/up.php";



$col="10";

$mmm=$col;



//////////////////////////////////////////////////////////////////////////////////////

if(empty($go)){$go="1";}

$dir=opendir("data/clan"); 

$n = "0";

while(($k=readdir($dir))!==false){ 

if ($k=='.'||$k=='..'||$k=='name'||$k=='tmp'||$k=='sklad'||$k=='zahvat'||$k=='desk'||$k=='chat'||$k=='logs'||$k=='bank') continue; 

$n++;



}

closedir($dir);

////////////////////

$num=($n/$col); 

if ($num!==(int)$num){$foo = (int) $num;



$fo = ($foo + 1);}   else  {$fo=$num;}



for ($i="1"; $i<=$fo; $i++) 



if ($go == "") {$c="0";}   else     {$c=($col*($go-1));}

///////////////////////





 $dir = opendir ("data/clan"); 

   while ($file = readdir ($dir)) 

 {

    if (( $file != ".") && ($file != "..") && ($file != "name") && ($file != "tmp") && ($file != "sklad") && ($file != "zahvat") && ($file != "chat") && ($file != "desk") && ($file != "logs") && ($file != "bank"))

    { $file= str_replace(".dat","",$file);



$file2= "$file";

   

$text = @file("data/clan/$file2.dat"); 



$udat = explode(":||:",$text[0]);

$name=trim($udat[1]);





    $la = $la + 1;

if($go=="1"){$col=round($mmm+1);}

if($la>$c-1 and $la<$c+$col){







if ($mode == "1"){$ee = strtr($e1,$tran);}else{$ee = $e1;}

$laa = $la + 1; 



$file=@file("data/clan/name/$file2.dat");

$total=count($file);



echo "<small>$la. $name (лидер $file2) [в клане $total человек]</small><br/>";

 }}

}

closedir ($dir);



  if ($go == "") {$c="0";}   else{$c=($col*($go-1));}

$lis = $go + 1;

$lis1 = $go - 1;

echo"<br/>";

if ($lis1 < "1") {} else{print "<small><a href="clanlist.php?go=$lis1&amp;log=$log&amp;pas=$pas">&#x41D;&#x430;&#x437;&#x430;&#x434;</a> | </small>";}

            

            

if ($lis == "$i")  {} else { print "<small><a href="clanlist.php?go=$lis&amp;log=$log&amp;pas=$pas">&#x412;&#x43F;&#x435;&#x440;&#x435;&#x434;</a></small>";}



echo"<small><br/><br/>&#x41F;&#x435;&#x440;&#x435;&#x439;&#x442;&#x438; &#x43A;: </small><input name="go"/> <small>&#x441;&#x442;&#x440;&#x430;&#x43D;&#x438;&#x446;&#x435;.</small><br/>";



echo"<small><anchor>&#x41F;&#x435;&#x440;&#x435;&#x439;&#x442;&#x438;

<go href="clanlist.php?$random&amp;log=$log&amp;pas=$pas" method="get">

<postfield name="go" value="$(go)"/>

</go>

</anchor></small><br/>";



echo"<small>&#x41A;&#x43B;&#x430;&#x43D;&#x43E;&#x432; &#x432;&#x441;&#x435;&#x433;&#x43E;: $n.</small>";



}else{echo"<small>&#x41F;&#x430;&#x440;&#x43E;&#x43B;&#x44C; &#x438;&#x43B;&#x438; &#x43B;&#x43E;&#x433;&#x438;&#x43D; &#x43D;&#x435;&#x432;&#x435;&#x440;&#x435;&#x43D;!</small>";}



include_once"files/down.php";

?>