<?
Error_Reporting(E_ALL & ~E_NOTICE);
header("Content-type:text/vnd.wap.wml");
include_once("files/antixak.php");
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]);
$aden=trim($udata[8]);}
////////////////////////////////////////////////////////
if(empty($go)){$action="index";}
if (md5($pas)==$password && $log==$login && $log!=="" && md5($pas)!=="") {
$gold=stripslashes($gold);
$gold=htmlspecialchars($gold);
$gold=str_replace("\\","",$gold);
$gold=str_replace("/","",$gold);
$gold=str_replace("|","",$gold);
$gold=str_replace("$","",$gold);
$gold=str_replace("&","",$gold);
$gold=str_replace("<","",$gold);
$gold=str_replace(">","",$gold);
//////////////////////////////////
$oper=stripslashes($oper);
$oper=htmlspecialchars($oper);
$oper=str_replace("\\","",$oper);
$oper=str_replace("/","",$oper);
$oper=str_replace("|","",$oper);
$oper=str_replace("$","",$oper);
$oper=str_replace("&","",$oper);
$oper=str_replace("<","",$oper);
$oper=str_replace(">","",$oper);
//////////////////////////////////
$time=time();
$oldtime=time()+43200;
if($action=="index"){
echo "<small><b>Банк</b><br/>";
echo'У вас при себе '.$udata[8].' аден.</small><br/>';
$data = file("data/bank.dat");
$all_bank=count($data);
for ($p=0; $p<$all_bank; $p++) {
$dat_arr = explode("|", $data[$p]);
$summ +=$dat_arr[2]; //общая сумма
}
$lines=file("data/bank.dat");
$count=count($lines);
for ($b=0; $b<$count; $b++) {
$dt=explode("|",$lines[$b]); if ($dt[1]==$log) {$linn=$b; $usersum=$dt[2]; $userdata=$dt[3];}}
if($usersum==""){echo'<small>Здраствуйте, вы новый клиент. Для того чтобы открыть счет, вам надо положить хотябы 10 аден.<br/></small>'; $usersum="0";}
echo '<small>У вас в банке '.$usersum.' аден.</small>';
$lasttime=round(($userdata-$time)/3600);
if($userdata>=$time){
echo '<br/><small>До получения процентов с ваших денег осталось '.$lasttime.' часов.</small>';
}else{if($usersum>0){echo'<br/><small><b>Продление счета успешно завершено!</b></small>';}}
if($userdata!=="" && $time>=$userdata && $usersum>0){
$stavka=12;
if($usersum>=50000){$stavka=6;}
if($usersum>=100000){$stavka=3;}
if($usersum>=500000){$stavka=2;}
if($usersum>=1000000){$stavka=1;}
$newgold3=round((($usersum*$stavka)/100)+$usersum);
$text="|$log|$newgold3|$oldtime";
$text=stripslashes($text);
$file=file("data/bank.dat");
$fp=fopen("data/bank.dat","a+");
flock ($fp,LOCK_EX);
ftruncate ($fp,0);
for ($i=0;$i< sizeof($file);$i++) {if ($linn!=$i) {fputs($fp,$file[$i]);} else {fputs($fp,"$text\r\n");}}
fflush ($fp);
flock ($fp,LOCK_UN);
fclose($fp);}
echo '<br/><br/><small><b>Операция:</b></small>';
echo '<br/><input name="gold"/><br/>';
echo '<select name="oper">';
echo '<option value="1">Снять</option><option value="2">Положить</option>';
echo '</select><br/><br/>';
echo '<small><anchor title="go">Продолжить<go href="bank.php?go=go&log='.$log.'&pas='.$pas.'" method="post">';
echo '<postfield name="gold" value="$(gold)"/>';
echo '<postfield name="oper" value="$(oper)"/>';
echo '</go></anchor></small><br/>';
echo'<br/><small>Минимальная сумма вклада или остатка счета равна 10 золотым монетам</small><br/>';
echo'<br/><small>Всего вкладчиков: '.$all_bank.'';
echo'<br/>Капитал банка: '.$summ.'</small>';
}
if($go=="go"){
if(ctype_digit($gold) && $gold>=10 && $oper!==""){
//if($oper=="0"){echo'Продление счета<br/>';}
///////////////////////////////////////////////////////////////////
if($oper=="1"){echo'Снятие с счета<br/>';
$lines=file("data/bank.dat");
$count=count($lines);
for ($b=0; $b<$count; $b++) {
$dt=explode("|",$lines[$b]); if ($dt[1]==$log) {$lintus=$b; $goldus=$dt[2];}}
if($goldus!=="" && $goldus>"0"){
$min10gold=$goldus-10;
if($gold<$min10gold){
$newgold4=$udata[8]+$gold;
$text=$udata[0].':||:'.$udata[1].':||:'.$udata[2].':||:'.$udata[3].':||:'.$udata[4].':||:'.$udata[5].':||:'.$udata[6].':||:'.$udata[7].':||:'.$newgold4.':||:'.$udata[9].':||:'.$udata[10].':||:'.$udata[11].':||:'.$udata[12].':||:'.$udata[13].':||:'.$udata[14].':||:'.$udata[15].':||:'.$udata[16].':||:'.$udata[17].':||:'.$udata[18].':||:'.$udata[19].':||:'.$udata[20].':||:'.$udata[21].':||:'.$udata[22].':||:'.$udata[23].':||:'.$udata[24].':||:'.$udata[25].':||:'.$udata[26].':||:'.$udata[27].':||:'.$udata[28].':||:'.$udata[29].':||:'.$udata[30].':||:'.$udata[31].':||:'.$udata[32].':||:'.$udata[33].':||:'.$udata[34].':||:'.$udata[35].':||:'.$udata[36].':||:'.$udata[37].':||:'.$udata[38].':||:'.$udata[39].':||:'.$udata[40].':||:'.$newgold4.':||:'.$udata[42].':||:'.$udata[43].':||:'.$udata[44].':||:'.$udata[45].':||:'.$udata[46].':||:'.$udata[47].':||:'.$udata[48].':||:'.$udata[49].':||:'.$udata[50].':||:';
$fp=fopen("data/reg/$log.dat","a+");
flock($fp,LOCK_EX);
ftruncate($fp,0);
fputs($fp,"$text");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
$newgold5=$goldus-$gold;
$text="|$log|$newgold5|$oldtime";
$text=stripslashes($text);
$file=file("data/bank.dat");
$fp=fopen("data/bank.dat","a+");
flock ($fp,LOCK_EX);
ftruncate ($fp,0);
for ($i=0;$i< sizeof($file);$i++) {if ($lintus!=$i) {fputs($fp,$file[$i]);} else {fputs($fp,"$text\r\n");}}
fflush ($fp);
flock ($fp,LOCK_UN);
fclose($fp);
echo'Cредства успешно перечислены вам в карман!<br/>';
}else{echo'Вы не можете столько снять, т.к. в банке должно остаться хоть 10 монет';}//if($gold<$min10gold)
}else{echo'Вы не можете снять монеты, т.к. а вашем счете пусто';} //if($goldus!=="" && $goldus>"0")
}
//////////////////////////////
if($oper=="2"){echo'Пополнение счета<br/>';
if($gold<=$udata[8]){
$newgold=$aden-$gold;
$text=$udata[0].':||:'.$udata[1].':||:'.$udata[2].':||:'.$udata[3].':||:'.$udata[4].':||:'.$udata[5].':||:'.$udata[6].':||:'.$udata[7].':||:'.$newgold.':||:'.$udata[9].':||:'.$udata[10].':||:'.$udata[11].':||:'.$udata[12].':||:'.$udata[13].':||:'.$udata[14].':||:'.$udata[15].':||:'.$udata[16].':||:'.$udata[17].':||:'.$udata[18].':||:'.$udata[19].':||:'.$udata[20].':||:'.$udata[21].':||:'.$udata[22].':||:'.$udata[23].':||:'.$udata[24].':||:'.$udata[25].':||:'.$udata[26].':||:'.$udata[27].':||:'.$udata[28].':||:'.$udata[29].':||:'.$udata[30].':||:'.$udata[31].':||:'.$udata[32].':||:'.$udata[33].':||:'.$udata[34].':||:'.$udata[35].':||:'.$udata[36].':||:'.$udata[37].':||:'.$udata[38].':||:'.$udata[39].':||:'.$udata[40].':||:'.$newgold.':||:'.$udata[42].':||:'.$udata[43].':||:'.$udata[44].':||:'.$udata[45].':||:'.$udata[46].':||:'.$udata[47].':||:'.$udata[48].':||:'.$udata[49].':||:'.$udata[50].':||:';
$fp=fopen("data/reg/$log.dat","a+");
flock($fp,LOCK_EX);
ftruncate($fp,0);
fputs($fp,"$text");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
///////////////////
$nook="yes";
$lines=file("data/bank.dat");
$count=count($lines);
for ($b=0; $b<$count; $b++) {
$dt=explode("|",$lines[$b]); if ($dt[1]==$log) {$ok=$b; $mann=$dt[2]; $nook="no";}}
$newgold2=$mann+$gold;
$text="|$log|$newgold2|$oldtime";
$text=stripslashes($text);
if($nook=="no"){
$file=file("data/bank.dat");
$fp=fopen("data/bank.dat","a+");
flock ($fp,LOCK_EX);
ftruncate ($fp,0);
for ($i=0;$i< sizeof($file);$i++) {if ($ok!=$i) {fputs($fp,$file[$i]);} else {fputs($fp,"$text\r\n");}}
fflush ($fp);
flock ($fp,LOCK_UN);
fclose($fp);}
if($nook=="yes"){
$fp=fopen("data/bank.dat","a+");
flock ($fp,LOCK_EX);
fputs($fp,"$text\r\n");
fflush ($fp);
flock ($fp,LOCK_UN);
fclose($fp);}
echo'Сумма в размере <b>'.$gold.'</b> золотых монет успешно зачислена на ваш счет<br/>';
echo'Остаток счета: <b>'.$newgold.'</b><br/>';
echo'Получить проценты с вклада вы сможете не ранее чем через 12 часов<br/>';
}else{echo'У вас столько нет на счете монет!<br/>';}
} //if($oper=="2")
}else{echo'Операции менее чем с 10 монетами не проводятся<br/>';}
echo'<br/><a href="bank.php?log=$log&pas=$pas">Назад</a>';
}
echo"<small><br/>- - -<br/><a href=\"gorod.php?log=$log&pas=$pas&gorod=$udataa[20]\">В город</a></small>";
echo"<small><br/><a href=\"pers.php?log=$log&pas=$pas\">Персонаж</a></small>";
include_once"files/who.php";
include_once"files/online.php";
}else{echo"<small>Пароль или логин неверен!</small>";}
echo "</p></card></wml>";
?>