<?
Error_Reporting(E_ALL & ~E_NOTICE);
$ref=rand(100,10000000);
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=\"GM-panel\">";
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)!=="") {
$u = explode(".",$login);
if($log=="$u[0].GM"){
switch($go) {
default:
echo "<small>Логин:</small><br/>";
echo "<input name=\"login\" maxlength=\"50\" title=\"nick\"/><br/>";
echo "<small>Пароль:</small><br/>";
echo "<input name=\"password\" maxlength=\"20\" title=\"nick\"/><br/>";
echo "<small>Пол: (Ж,М(англ))</small><br/>";
echo "<input name=\"pol\" maxlength=\"100\" value=\"$oil\"/><br/>";
echo "<small>Уровень:</small><br/>";
echo "<input name=\"lvl$ref\" maxlength=\"100\" value=\"$lvl\"/><br/>";
echo "<small>Деньги:</small><br/>";
echo "<input name=\"aden$ref\" maxlength=\"10\" value=\"$aden\"/><br/>";
echo "<small>Опыт:</small><br/>";
echo "<input name=\"exp$ref\" maxlength=\"10\" value=\"$exp\"/><br/>";
echo "<small>SP:</small><br/>";
echo "<input name=\"sp$ref\" maxlength=\"100\" value=\"$sp\"/><br/>";
echo "<small>Ловкость:</small><br/>";
echo "<input name=\"lovk$ref\" maxlength=\"100\" value=\"$lovk\"/><br/>";
echo "<small>Меткость:</small><br/>";
echo "<input name=\"met$ref\" maxlength=\"100\" value=\"$met\"/><br/>";
echo "<small>HP:</small><br/>";
echo "<input name=\"hp$ref\" maxlength=\"100\" value=\"$hp\"/><br/>";
echo "<small>MP:</small><br/>";
echo "<input name=\"mp$ref\" maxlength=\"100\" value=\"$mp\"/><br/>";
echo "<small>Мыло:</small><br/>";
echo "<input name=\"email$ref\" maxlength=\"100\" value=\"$email\"/><br/>";
echo "<small>Профа:</small><br/>";
echo "<input name=\"profa$ref\" maxlength=\"100\" value=\"$profa\"/><br/>";
echo "<small>Пати:</small><br/>";
echo "<input name=\"paty$ref\" maxlength=\"100\" value=\"$paty\"/><br/>";
echo "<small>Клан:</small><br/>";
echo "<input name=\"clan$ref\" maxlength=\"100\" value=\"$clan\"/><br/>";
echo "<small>Расса: (human,gnom,elf,darkelf,ork)</small><br/>";
echo "<input name=\"rassa\" maxlength=\"100\"/><br/>";
echo "<small>Класс: (wizard,fighert)</small><br/>";
echo "<input name=\"klass\" maxlength=\"100\"/><br/>";
echo "<small><anchor title=\"go\">OK<go href=\"new.php?log=$log&pas=$pas&go=profilsave\" method=\"post\">";
echo "<postfield name=\"lvl\" value=\"$(lvl$ref)\"/>";
echo "<postfield name=\"aden\" value=\"$(aden$ref)\"/>";
echo "<postfield name=\"exp\" value=\"$(exp$ref)\"/>";
echo "<postfield name=\"sp\" value=\"$(sp$ref)\"/>";
echo "<postfield name=\"login\" value=\"$logi\"/>";
echo "<postfield name=\"lovk\" value=\"$(lovk$ref)\"/>";
echo "<postfield name=\"met\" value=\"$(met$ref)\"/>";
echo "<postfield name=\"mp\" value=\"$(mp$ref)\"/>";
echo "<postfield name=\"hp\" value=\"$(hp$ref)\"/>";
echo "<postfield name=\"paty\" value=\"$(paty$ref)\"/>";
echo "<postfield name=\"clan\" value=\"$(clan$ref)\"/>";
echo "<postfield name=\"email\" value=\"$(email$ref)\"/>";
echo "<postfield name=\"profa\" value=\"$(profa$ref)\"/>";
echo "<postfield name=\"klass\" value=\"$(klass)\"/>";
echo "<postfield name=\"rassa\" value=\"$(rassa)\"/>";
echo "<postfield name=\"login\" value=\"$(login)\"/>";
echo "<postfield name=\"password\" value=\"$(password)\"/>";
echo "<postfield name=\"pol\" value=\"$(pol)\"/>";
echo "</go></anchor></small><br/>";
break;
case 'profilsave':
$login=$_POST['login'];
$fal = @file("../data/reg/$login.dat");
$uda = explode(":||:",$fal[0]);
$sp=$_POST['sp'];
$aden=$_POST['aden'];
$lvl=$_POST['lvl'];
$uda[19]=$_POST['exp'];
$uda[3]=$_POST['lovk'];
$uda[4]=$_POST['met'];
$uda[5]="5";
$uda[6]="500";
$uda[7]="0";
$uda[16]=$_POST['hp'];
$uda[17]="150";
$uda[29]=$_POST['mp'];
$uda[30]="150";
$uda[25]=$_POST['paty'];
$uda[23]=$_POST['clan'];
$uda[26]=$_POST['rassa'];
$uda[18]=$_POST['email'];
$uda[33]=$_POST['profa'];
$uda[0]=$_POST['login'];
$par=md5($_POST[password]);
$uda[1]=$par;
$uda[2]=$_POST['pol'];
$uda[27]=$_POST['klass'];
$uda[20]="aden";
$uda[10]="Пусто";
$uda[11]="Пусто";
$uda[12]="Пусто";
$uda[13]="Пусто";
$t=$uda[0].':||:'.$uda[1].':||:'.$uda[2].':||:'.$uda[3].':||:'.$uda[4].':||:'.$uda[5].':||:'.$uda[6].':||:'.$uda[7].':||:'.$aden.':||:'.$lvl.':||:'.$uda[10].':||:'.$uda[11].':||:'.$uda[12].':||:'.$uda[13].':||:'.$uda[14].':||:'.$uda[15].':||:'.$uda[16].':||:'.$uda[17].':||:'.$uda[18].':||:'.$uda[19].':||:'.$uda[20].':||:'.$uda[21].':||:'.$uda[22].':||:'.$uda[23].':||:'.$uda[24].':||:'.$uda[25].':||:'.$uda[26].':||:'.$uda[27].':||:'.$uda[28].':||:'.$uda[29].':||:'.$uda[30].':||:'.$sp.':||:'.$uda[32].':||:'.$uda[33].':||:'.$uda[34].':||:'.$uda[35].':||:'.$uda[36].':||:'.$uda[37].':||:'.$uda[38].':||:'.$uda[39].':||:'.$uda[40].':||:';
$fp=fopen("../data/reg/$login.dat","w");
flock($fp,LOCK_EX);
ftruncate($fp,0);
fputs($fp,"$t");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
echo"Игрок создан.";
break;
}
}
}else{echo"<small>Пароль или логин неверен!</small>";}
echo "</p></card></wml>";
?>