<?
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=\"Персонаж\">";
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_once"files/up.php";
$dir = opendir ("data/petshop");
while ($file = readdir ($dir))
{
if (( $file != ".") && ($file != ".."))
{ $file= str_replace(".dat","",$file);
$file2= "$file";
$text = @file("data/petshop/$file2.dat");
$udat = explode(":||:",$text[0]);
$hp=trim($udat[0]);
echo "<small><a href=\"bypetshop.php?log=$log&pas=$pas&vesh=$file\">$udat[4] М+$udat[0], ADEN - $udat[1]</a> <b>[FP]</b></small><br/>";
}}
closedir ($dir);
}else{echo"<small>Пароль или логин неверен!</small>";}
include_once"files/down.php";
?>