<?
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/clan/$log.dat")){
echo"<small>
Добро пожаловать!<br/>
Вы можете создать клан чтобы захватывать замки и управлять ими.<br/>
Чтобы создать клан вам нужно 1000000 аден и 500000 опыта.<br/>
<a href=\"clan.php?log=$log&pas=$pas&go=name\">Создать клан</a></small>";}else{
$text = @file("data/clan/$log.dat");
$clan = explode(":||:",$text[0]);
echo"<small>Добро пожаловать!<br/>
Имя клана: <b>$clan[1]</b><br/><br/>
<a href=\"clan.php?log=$log&pas=$pas&go=toclan\">Взять в клан</a><br/>
<a href=\"clan.php?log=$log&pas=$pas&go=items\">Склад клана</a><br/>
<a href=\"clan.php?log=$log&pas=$pas&go=logo\">Эмблема клана</a><br/>
<a href=\"clan.php?log=$log&pas=$pas&go=list\">Список клановцев</a>
</small>";
}
break;
case 'create':
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/clan/$log.dat","w");
flock($fp,LOCK_EX);
ftruncate($fp,0);
fputs($fp,"$text");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
chmod ("data/clan/$log.dat", 0666);
$fp=fopen("data/clan/name/$log.dat","w");
flock($fp,LOCK_EX);
ftruncate($fp,0);
fputs($fp,"");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
chmod ("data/clan/name/$log.dat", 0666);
$udata[23]=$log;
$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($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=\"clan.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/clan/$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=\"clan.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/clan/$log.dat")){echo"<small>У вас нет клана!</small>"; include_once"files/down.php"; exit; }
$text = @file("data/reg/$name.dat");
$clan = explode(":||:",$text[0]);
if(!empty($clan[23])){echo"<small>Этот игрок уже в другом клане.</small>"; include_once"files/down.php"; exit;}
$text = @file("data/clan/$log.dat");
$clan = explode(":||:",$text[0]);
$name = htmlspecialchars(stripslashes($name));
if(!@file("data/reg/$name.dat")){echo"<small>Такого игрока нет.</small>"; include_once"files/down.php"; exit; }
$text=$log.':||:'.$name.':||:'.$clan[1].':||:';
$fp=fopen("data/clan/tmp/$name.dat","w");
flock($fp,LOCK_EX);
ftruncate($fp,0);
fputs($fp,"$text");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
chmod ("data/clan/tmp/$name.dat", 0666);
echo"<small>Предложение отослано!</small>";
break;
case 'ok':
$uzer = htmlspecialchars(stripslashes($uzer));
$text = @file("data/clan/name/$uzer.dat");
$count=count($text);
for($i=0; $i<$count; $i++){
$data = explode("|",$text[$i]);
if(trim($data[1])==$log){echo"<small>Вы уже вступили в этот клан!</small>";
include_once"files/down.php"; exit; }
}
$text='|'.$log.'';
$fp=fopen("data/clan/name/$uzer.dat","a+");
flock($fp,LOCK_EX);
fputs($fp,"$text\r\n");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
@chmod ("data/clan/name/$uzer.dat", 0666);
$fa = @file("data/clan/tmp/$log.dat");
$clann = explode(":||:",$fa[0]);
$udata[23]=$clann[0];
$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].':||:'.$count.':||:'.$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);
@unlink ("data/clan/tmp/$log.dat");
echo"<small>Вы успешно вступили в клан!</small>";
break;
case 'del':
unlink ("data/clan/tmp/$log.dat");
echo"<small>Вы отказались.</small>";
break;
case 'list':
if(@file("data/clan/name/$log.dat")){
echo"<small>Нажмите на ник чтобы выгнать из клана.</small><br/>";
$file = @file("data/clan/name/$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/clan/name/$log.dat");
$file = array_reverse($file);
$data = explode("|",$file[$i]);
$i2=round($i+1);
$id=$total-$i-1;
$data[1]=trim($data[1]);
echo"<small><a href=\"clan.php?log=$log&pas=$pas&id=$id&go=out&name=$data[1]\">$data[1]</a></small><br/>";
}
if($total=="0"){echo"<small>В клане никого нет.</small>";}
}else{echo"<small>В клане никого нет.</small>";}
if ($start != 0) {echo '<a href="clan.php?start='.($start - 10).'&log='.$log.'&pas='.$pas.'&go=list">Назад</a> ';}
if ($total > $start + 10) {echo ' <a href="clan.php?start='.($start + 10).'&log='.$log.'&pas='.$pas.'&go=list">Далее</a>';}
break;
case 'out':
$fak = @file("data/clan/name/$log.dat");
$okk = explode("|",$fak[$id]);
$pod=$okk[1];
if($_GET[name]==$pod){echo"Так и бан легко плучить..."; include_once"files/down.php"; exit;}
if(!@file("data/clan/$log.dat")){echo"Такого клана не существует!"; include_once"files/down.php"; exit;}
$_GET[name] = htmlspecialchars(stripslashes($_GET[name]));
$file=file("data/clan/name/$log.dat");
$fp=fopen("data/clan/name/$log.dat","w");
flock ($fp,LOCK_EX);
unset($file[$id]);
fputs($fp, implode("",$file));
flock ($fp,LOCK_UN);
fclose($fp);
$fa = @file("data/reg/$_GET[name].dat");
$udata = explode(":||:",$fa[0]);
$udata[23]="";
$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/$_GET[name].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 'items':
echo"<small>Нажмите на вещь чтобы положить её на склад клана.</small><br/>";
if(@file("data/item/$log.dat")){
$file = @file("data/item/$log.dat");
$total = count($file);
for ($i = 0; $i < $total; $i++){
$file = @file("data/item/$log.dat");
$file = array_reverse($file);
$data = explode(":||:",$file[$i]);
$i2=round($i+1);
$id=$total-$i-1;
if($data[2]=="weapon"){
echo"<b><small><a href=\"clan.php?log=$log&pas=$pas&name=$data[4]&id=$id&go=tosklad\">$data[4]</a></small></b> <small>- ($data[2]) [+$data[0]]</small><br/>";}
if($data[2]=="golova"){
echo"<b><small><a href=\"clan.php?log=$log&pas=$pas&name=$data[4]&id=$id&go=tosklad\">$data[4]</a></small></b> <small>- ($data[2]) [+$data[0]]</small><br/>";}
if($data[2]=="nogi"){
echo"<b><small><a href=\"clan.php?log=$log&pas=$pas&name=$data[4]&id=$id&go=tosklad\">$data[4]</a></small></b> <small>- ($data[2]) [+$data[0]]</small><br/>";}
if($data[2]=="body"){
echo"<b><small><a href=\"clan.php?log=$log&pas=$pas&name=$data[4]&id=$id&go=tosklad\">$data[4]</a></small></b> <small>- ($data[2]) [+$data[0]]</small><br/>";}
}}else{echo"<small>У вас нет вещей.</small>";}
break;
case 'tosklad':
//echo"Склад временно не работает."; include_once"files/down.php"; exit;
$id=$_GET['id'];
$name=$_GET['name'];
if($udata[10]=="$name" || $udata[11]=="$name" || $udata[12]=="$name" || $udata[13]=="$name"){echo"<small>Вы не можете положить на склад одетую вещь!</small>"; include_once"files/down.php"; exit;}
if($name=="Dragon Leather Armor Hight" || $name=="Dragon Leather Armor Hight*1" || $name=="Dragon Leather Armor Hight*2" || $name=="Dragon Leather Armor Hight*3" || $name=="Dragon Leather Armor Hight*4" || $name=="Dragon Leather Armor Hight*5" || $name=="Talum Blade*Dark Legion's Edge" || $name=="Talum Blade*Dark Legion's Edge*1" || $name=="Talum Blade*Dark Legion's Edge*2" || $name=="Talum Blade*Dark Legion's Edge*3" || $name=="Talum Blade*Dark Legion's Edge*4" || $name=="Talum Blade*Dark Legion's Edge*5" || $name=="Sealed Apella Brigadine" || $name=="Sealed Apella Brigadine*1" || $name=="Sealed Apella Brigadine*2" || $name=="Sealed Apella Brigadine*3" || $name=="Sealed Apella Brigadine*4" || $name=="Sealed Apella Brigadine*5"){
echo"<small>Нельзя передовать вещи из люксор магазина!</small>";
include_once"files/down.php";
exit;
}
if($name=="Olimpiad Medal"){echo"<small>Передача медалей ЗАПРЕЩЕНА!</small>"; include_once"files/down.php"; exit; }
$file=file("data/item/$log.dat");
$total=count($file);
for($i=0; $i<$total; $i++){
$datat = explode(":||:",$file[$i]);
if($datat[4]==$name){
$text=''.$datat[0].':||:'.$datat[1].':||:'.$datat[2].':||:'.$datat[3].':||:'.$datat[4].':||:';
$fp=fopen("data/item/$log.dat","w");
flock ($fp,LOCK_EX);
unset($file[$i]);
fputs($fp, implode("",$file));
flock ($fp,LOCK_UN);
fclose($fp);
$fp=fopen("data/clan/sklad/$log.dat","a+");
flock($fp,LOCK_EX);
fputs($fp,"$text\r\n");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
chmod ("data/clan/sklad/$log.dat", 0666);
echo"<small>Вещь положена на склад.</small>";}}
break;
case 'logo':
$dira = opendir ("pic/clan");
while ($filea = readdir ($dira))
{if (( $filea != ".") && ($filea != ".."))
{$aa[]=$filea;}}
closedir ($dira);
$totala = count($aa);
for ($ia = 0; $ia < $totala; $ia++){
$data_namea[]=$aa[$ia];
}
foreach($data_namea as $ka=>$va)
{
$dat_screena[]="<img src=\"pic/clan/$data_namea[$ka]\" alt=\"$data_namea[$ka]\"/><small> - <a href=\"clan.php?log=$log&pas=$pas&name=$data_namea[$ka]&go=oklogo\">выбрать</a><br/></small>";
}
$totala = count($dat_screena);
if (empty($_GET['logs'])) $logs = 0;
else $logs = $_GET['logs'];
if ($totala < $logs + 10){ $end = $totala; }
else {$end = $logs + 10; }
for ($ia = $logs; $ia < $end; $ia++){
echo"$dat_screena[$ia]";
}
if ($logs != 0) {echo '<small><a href="clan.php?logs='.($logs - 10).'&log='.$log.'&pas='.$pas.'&go=logo">Назад</a> </small>';}
if ($totala > $logs + 10) {echo '<small> <a href="clan.php?logs='.($logs + 10).'&log='.$log.'&pas='.$pas.'&go=logo">Далее</a></small>';}
echo"<br/><small>Всего: $totala эмблем</small>";
break;
case 'oklogo':
$name = htmlspecialchars(stripslashes(addslashes($name)));
if(!@file("pic/clan/$name")){echo"<small>Такой эмблемы не существует.</small>"; include_once"files/down.php"; exit;}
$text = @file("data/clan/$log.dat");
$data = explode(":||:",$text[0]);
$text=$data[0].':||:'.$data[1].':||:'.$name.':||:';
$fp=fopen("data/clan/$log.dat","w");
flock($fp,LOCK_EX);
ftruncate($fp,0);
fputs($fp,"$text");
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
echo"<small>Эмблема успешно добавлена.</small>";
break;
}}else{echo"<small>Пароль или логин неверен!</small>";}
include_once"files/down.php";
?>