<?
Error_Reporting(E_ALL & ~E_NOTICE);
include_once("files/zag.php");
if (md5($pas)==$password && $log==$login && $log!=="" && md5($pas)!=="") {
switch($go) {
default:
if(!@file("data/ali/$log.dat")){
echo"<small>
Добро пожаловать!<br/>
Чтобы создать альянс вам нужно 1000000 аден и 500000 опыта.<br/>
<a href=\"ali.php?log=$log&pas=$pas&go=name\">Создать альянс</a></small>";}else{
$text = @file("data/ali/$log.dat");
$clan = explode(":||:",$text[0]);
echo"<small>Добро пожаловать!<br/>
Имя альянса: <b>$clan[1]</b><br/><br/>
<a href=\"ali.php?log=$log&pas=$pas&go=toclan\">Взять клан</a><br/>
<a href=\"ali.php?log=$log&pas=$pas&go=list\">Список кланов</a>
</small>";
}
break;
case 'create':
if(!@file("data/clan/$log.dat")){echo"<small>У вас нет клана!</small>";include_once"files/down.php"; exit; }
if($udata[8]<"1000000"){echo"<small>У вас недостаточно денег!</small>";include_once"files/down.php"; exit; }
if($udata[19]<"500000"){echo"<small>У вас недостаточно опыта!</small>";include_once"files/down.php"; exit; }
if ($name == "" || strlen($name) > 11 || strlen($name) < 3) { echo"Название альянса не должно быть более 11 букв и не менее 3."; echo "</p></card></wml>"; exit;}
$name = htmlspecialchars(stripslashes($name));
$text=$log.':||:'.$name.':||::||:';
$fp=fopen("data/ali/$log.dat","w");
flock($fp,LOCK_EX);
ftruncate($fp,0);
fputs($fp,"$text");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
chmod ("data/ali/$log.dat", 0666);
$fp=fopen("data/ali/clans/$log.dat","w");
flock($fp,LOCK_EX);
ftruncate($fp,0);
fputs($fp,"");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
chmod ("data/ali/clans/$log.dat", 0666);
$udata[19]=round($udata[19]-500000);
$udata[8]=round($udata[8]-1000000);
$text=$udata[0].':||:'.$udata[1].':||:'.$udata[2].':||:'.$udata[3].':||:'.$udata[4].':||:'.$udata[5].':||:'.$udata[6].':||:'.$udata[7].':||:'.$udata[8].':||:'.$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].':||:';
$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);
echo"<small>Альянс успешно создан!</small>";
break;
case 'name':
if(!@file("data/clan/$log.dat")){echo"<small>У вас нет клана!</small>";include_once"files/down.php"; exit; }
if($udata[8]<"1000000"){echo"<small>У вас недостаточно денег!</small>";include_once"files/down.php"; exit; }
if($udata[19]<"500000"){echo"<small>У вас недостаточно опыта!</small>";include_once"files/down.php"; exit; }
echo "<small>Название альянса:</small><br/>";
echo "<input name=\"name\" maxlength=\"11\" title=\"name\"/><br/>";
echo "<small><anchor title=\"go\">Создать<go href=\"ali.php?go=go&log=".$log."&pas=".$pas."&go=create\" method=\"post\">";
echo "<postfield name=\"name\" value=\"$(name)\"/>";
echo "</go></anchor></small><br/>";
break;
case 'toclan':
if(!@file("data/ali/$log.dat")){echo"<small>У вас нет альянса!</small>"; include_once"files/down.php"; exit; }
echo "<small>Введите ник главы клана:</small><br/>";
echo "<input name=\"name\" maxlength=\"11\" title=\"name\"/><br/>";
echo "<small><anchor title=\"go\">Создать<go href=\"ali.php?go=go&log=".$log."&pas=".$pas."&go=tocreate\" method=\"post\">";
echo "<postfield name=\"name\" value=\"$(name)\"/>";
echo "</go></anchor></small><br/>";
break;
case 'tocreate':
if(!@file("data/ali/$log.dat")){echo"<small>У вас нет альянса!</small>"; include_once"files/down.php"; exit; }
if(!@file("data/reg/$name.dat")){echo"<small>Такого игрока нет.</small>"; include_once"files/down.php"; exit; }
if(!@file("data/clan/$name.dat")){echo"<small>У этого игрока нет клана.</small>"; include_once"files/down.php"; exit; }
if(@file("data/ali/names/$name.dat")){echo"<small>Этот клан состоит в другом альянсе.</small>"; include_once"files/down.php"; exit;}
$name = htmlspecialchars(stripslashes($name));
$text=$log.':||:'.$name.':||:';
$fp=fopen("data/ali/tmp/$name.dat","w");
flock($fp,LOCK_EX);
ftruncate($fp,0);
fputs($fp,"$text");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
chmod ("data/ali/tmp/$name.dat", 0666);
echo"<small>Предложение отослано!</small>";
break;
case 'ok':
$uzer = htmlspecialchars(stripslashes($uzer));
if(!@file("data/ali/$uzer.dat")){echo"<small>Такого альянса не существует.</small>";
include_once"files/down.php"; exit; }
if(@file("data/ali/names/$log.dat")){echo"<small>Вы в альянсе! Вы не можете вступить в еще один.</small>";
include_once"files/down.php"; exit; }
$text='|'.$log.'';
$fp=fopen("data/ali/clans/$uzer.dat","a+");
flock($fp,LOCK_EX);
fputs($fp,"$text\r\n");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
@chmod ("data/ali/clans/$uzer.dat", 0666);
$fp=fopen("data/ali/names/$log.dat","w");
flock($fp,LOCK_EX);
fputs($fp,"$uzer|\r\n");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
@chmod ("data/ali/names/$uzer.dat", 0666);
@unlink ("data/ali/tmp/$log.dat");
echo"<small>Вы успешно вступили в альянс!</small>";
break;
case 'del':
unlink ("data/ali/tmp/$log.dat");
echo"<small>Вы отказались.</small>";
break;
case 'list':
if(@file("data/ali/clans/$log.dat")){
echo"<small>Нажмите на ник чтобы выгнать из альянса.</small><br/>";
$file = @file("data/ali/clans/$log.dat");
$total = count($file);
if (empty($_GET['start'])) $start = 0;
else $start = $_GET['start'];
if ($total < $start + 10){ $end = $total; }
else {$end = $start + 10; }
for ($i = $start; $i < $end; $i++){
$file = @file("data/ali/clans/$log.dat");
$file = array_reverse($file);
$data = explode("|",$file[$i]);
$i2=round($i+1);
$id=$total-$i-1;
$data[1]=trim($data[1]);
$file = @file("data/clan/$data[1].dat");
$data2 = explode(":||:",$file[0]);
echo"<small><a href=\"ali.php?log=$log&pas=$pas&go=out2&name=$data[1]\">$data[1]</a> - $data2[1]</small><br/>";
}
if($total=="0"){echo"<small>В альянсе никого нет.</small>";}
}else{echo"<small>В клане альянсе никого нет.</small>";}
if ($start != 0) {echo '<a href="ali.php?start='.($start - 10).'&log='.$log.'&pas='.$pas.'&go=list">Назад</a> ';}
if ($total > $start + 10) {echo ' <a href="ali.php?start='.($start + 10).'&log='.$log.'&pas='.$pas.'&go=list">Далее</a>';}
break;
case 'out':
if($udata[23]!==$log){echo"<small>У вас нет прав на выход из альянса.</small>"; include_once"files/down.php"; exit;}
if(!@file("data/ali/names/$log.dat")){echo"<small>Вы не в альянсе.</small>"; include_once"files/down.php"; exit;}
$fak = @file("data/ali/clans/$log.dat");
$total=count($fak);
for($i=0; $i<$total; $i++){
$data = explode("|",$fak[$i]);
if($log==trim($data[1])){
$file=file("data/ali/clans/$log.dat");
$fp=fopen("data/ali/clans/$log.dat","w");
flock ($fp,LOCK_EX);
unset($file[$i]);
fputs($fp, implode("",$file));
flock ($fp,LOCK_UN);
fclose($fp);
@unlink("data/ali/names/$log.dat");
echo"<small>Вы вышли из альянса.</small>";
}
}
break;
case 'out2':
if(!@file("data/ali/$log.dat")){echo"<small>Вы не в альянсе.</small>"; include_once"files/down.php"; exit;}
$name=htmlspecialchars(stripslashes(addslashes(trim($name))));
$fak = @file("data/ali/clans/$log.dat");
$total=count($fak);
for($i=0; $i<$total; $i++){
$data = explode("|",$fak[$i]);
if(trim($data[1])==trim($name)){
$file=file("data/ali/clans/$log.dat");
$fp=fopen("data/ali/clans/$log.dat","w");
flock ($fp,LOCK_EX);
unset($file[$i]);
fputs($fp, implode("",$file));
flock ($fp,LOCK_UN);
fclose($fp);
@unlink("data/ali/names/$name.dat");
echo"<small>$name выгнан из альянса</small>";
}
}
break;
}}else{echo"<small>Пароль или логин неверен!</small>";}
include_once"files/down.php";
?>