File size: 1.97Kb
<?
Error_Reporting(E_ALL & ~E_NOTICE);
list($msec,$sec)=explode(chr(32),microtime());
$HeadTime=$sec+$msec;
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=\"Персонаж\">";
echo "<p align=\"left\">";
$log = htmlspecialchars(stripslashes($log));
$pas = htmlspecialchars(stripslashes($pas));
/////////////////////////////////////////////////////
$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("files/who.php");
$dir = opendir ("data/reg");
echo "<b><small>Самые сильные</small></b><br/><br/>";
$dir = opendir ("data/reg");
while ($file = readdir ($dir))
{if (( $file != ".") && ($file != ".."))
{$a[]=$file;}}
closedir ($dir);
$total = count($a);
for ($i = 0; $i < $total; $i++){
$tex = @file("data/reg/$a[$i]");
$data = explode(":||:",$tex[0]);
$dat_log3[]=$data[0];
$dat_gold3[]=$data[4];
}
arsort($dat_gold3);
foreach($dat_gold3 as $k2=>$v2)
{
$dat_ball2[]='<small><b><a href="search.php?nick='.$dat_log3[$k2].'&log='.$log.'&pas='.$pas.'&go=go">'.$dat_log3[$k2].'</a></b><br/>Сила: '.$dat_gold3[$k2].'<br/></small>';
}
for ($i = 0; $i < 10; $i++){
$i2=$i+1;
echo "<small>$i2.</small> $dat_ball2[$i]";
}
}else{echo"<small>Пароль или логин неверен!</small>";}
include_once"files/down.php";
?>