WordPress, Shopify ir PHPFusion programuotojų bendruomenė

Parašė joka· 2010 Bal. 27 20:04:45

[code]<?php
header("Content-type: text/vnd.wap.wml");
header("Cache-control: no-store,no-cache,must-revalidate");
print '<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">
<wml>';
$aaa = date("H:i Y-m-d");
echo"<card id=\"index\" title=\" $aaa\">";
$kur = "Gaujose";
include("config.php");

$ka12 = $_GET['ka12'];
$dyyra = "zona1/$nick-gaujos-jegos-pasaulis.txt";

$katt = $_GET['katt'];

$DATA_FILE = "klaniukos/$ka-pm.txt";
$nuskk = file($DATA_FILE);
$viso_pm = count($nuskk);

$pons = @file("klaniukos/$ka.ta");
for($t = 0; $t < @count($pons); $t++){
$nary = @explode("|",$pons[$t]);
if ($nary[0] == $nick)
{ $sajt = "narys"; }
$nar = @explode("|",$pons[$t]);
if ($nar[0] == $nick)
{ $saj = "narys"; }
$kure = @explode("|",$pons[0]);
if ($kure[0] == $nick)
{ $saj = "admins"; }}

if ($id == "klanai"){

echo"
GAUJOS! 
$lin 
$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=ikurt\">Ikurti gauja</a> 
$ico <a href=\"gauju_topas.php?nick=$nick&pass=$pass&id=\">Gauju TOP</a> 
$lin ";

$na = 0;
$blo = glob("klaniukos/*.ta");

$lvlv = 0;
foreach($blo as $a){
$a = str_replace(array("klaniukos/",".ta"),"",$a);
$pons = file("klaniukos/$a.ta");
$n = count($pons);
$na = $na+$n;
$arr[]=array($n,"$a");
}

$viso_tm = count($arr);
$puslapiu_skaicius = 10;

echo"Gaujos [$viso_tm]: 
";

if ($viso_tm == 0)
{
echo"Nera nei vienos
gaujos... ";
}
else
{

echo"";

if ($page == "")

{ $page = 1; }
$next = $page + 1;
$back = $page - 1;
if ($page == 1){ $nuo = 0; $iki = $puslapiu_skaicius; } else { $nuo = $page * $puslapiu_skaicius - $puslapiu_skaicius; $iki = $page * $puslapiu_skaicius; }
if ($viso_tm <= $page * $puslapiu_skaicius){ $iki = $viso_tm; }

$gauja = file_get_contents("klaniukos/$nick.txt");

for ($f = $nuo; $f < $iki; $f++)
{
echo"$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=klan&ka={$arr[$f][1]}\">{$arr[$f][1]}</a>";

if ($gauja != "{$arr[$f][1]}" && file_exists("klaniukos/$nick.txt")) {
echo"(<a href=\"klanai.php?nick=$nick&pass=$pass&id=kovoti&ka={$arr[$f][1]}\">Pulti</a>)"; }

echo" "; }

$viso_puslapiu = $viso_tm / $puslapiu_skaicius;

$viso_puslapiai = 0;
$starto_skaicius = 1;
while ($viso_puslapiai < $viso_puslapiu){
if ($page == $starto_skaicius){ echo "[$starto_skaicius]"; }else{
echo"<a href=\"klanai.php?nick=$nick&pass=$pass&id=klanai&page=$starto_skaicius&ka=$ka\">[$starto_skaicius]</a>"; }
$viso_puslapiai++; $starto_skaicius++; }

echo"";
}
echo"
$lin 
Kreditai gauju nariams ir ju vadams bus ismoketi po "; echo round((file_get_contents("txt/klanu.txt")-time())/60,1); echo" minuciu. 
$lin 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a> 
";
}

if ($id == "klan" && file_exists("klaniukos/$ka.ta")){
if (!file_exists("sajungutopicai/$ka.ta")){
$atidarymasss = fopen("sajungutopicai/$ka.ta", "w");
fwrite($atidarymasss, "Cia $ka topicas, ji gali keisti tik gaujos nariai arba jos vadas");
fclose($atidarymasss);
chmod("sajungutopicai/$ka.ta",0777); }
$tpc = file_get_contents("sajungutopicai/$ka.ta");

$far = explode("|", file_get_contents("klaniukos/$ka-2.txt"));

echo"
<img src=\"$far[9]\" alt=\"$ka\"/> 
$lin 
$tpc 
:+: $ka :+: 
$lin ";

echo'';

echo"$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=stot&ka=$ka\">Stoti i sia gauja</a> ";

if ($saj == "admins")
{ echo"$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=cp&ka=$ka\">Vado CP</a> 
$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=gaujos_misija_1&ka=$ka\">1 Misija Jegos</a>(Bandomoji misija) "; }

if ($saj == "narys" or $saj == "admins")
{ echo"$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti_daigtu&ka=$ka\">Daigtu pervedimai</a> 
$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=cp&ka=$ka\">Nario CP</a> "; }

echo"$lin ";

if ($sajt == "narys")
{

$likod = explode("|",file_get_contents("klaniukos/$ka-2.txt"));
$likodd = round(($likod[8]-time())/60,1);

$dd2 = explode("-",$likodd);

if ($likodd == "-$dd2[1]") {

$likodd = "0";

$ddd = time()+240*60;

$ping = $far[1]+1000;

$openn = fopen("klaniukos/$ka-2.txt", "w+");
fwrite($openn, "$far[0]|$ping|$far[2]|$far[3]|$far[4]|$far[5]|$far[6]|30|$ddd|$far[9]|\n");
fclose($openn);
}

echo"Kiti gaujos puolimai uz $likodd minuciu. ";

echo"$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=pranesimai&ka=$ka\">Pranesimai! ($viso_pm)</a>";

if ($saj == "admins")
{ echo"<a href=\"klanai.php?nick=$nick&pass=$pass&id=valyti_pran&ka=$ka\">[x]</a>"; }
echo" $lin "; }

echo"Gaujos vadeiva: <a href=\"zaisti.php?nick=$nick&pass=$pass&id=apie&ka=$kure[0]\">$kure[0]</a> 
$lin ";

$viso_tm = count($pons);
$puslapiu_skaicius = 10;

echo"Nariai [$viso_tm]: ";

if ($page == ""){ $page = 1; }
$next = $page + 1;
$back = $page - 1;
if ($page == 1){ $nuo = 0; $iki = $puslapiu_skaicius; } else { $nuo = $page * $puslapiu_skaicius - $puslapiu_skaicius; $iki = $page * $puslapiu_skaicius; }
if ($viso_tm <= $page * $puslapiu_skaicius){ $iki = $viso_tm; }

for ($t = $nuo; $t < $iki; $t++){
$nar = @explode("|",$pons[$t]);
if ($saj == "admins" && $kure[0] != $nar[0])
{ echo"salinti: <a href=\"klanai.php?nick=$nick&pass=$pass&id=salint&katt=$nar[0]&ka=$ka\">[x]</a>"; }

echo"apie:<a href=\"zaisti.php?nick=$nick&pass=$pass&id=apie&ka=$nar[0]\">$nar[0]</a>";

if ($sajt == "narys" && $nar[0] != $nick)
{
echo"Pervesti(<a href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti&ka=$ka&kas=$nar[0]\">litu</a>,<a href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti_krd&ka=$ka&kas=$nar[0]\">kreditu</a>)"; } echo" ";
}

$viso_puslapiu = $viso_tm / $puslapiu_skaicius;

$viso_puslapiai = 0;
$starto_skaicius = 1;
while ($viso_puslapiai < $viso_puslapiu){
if ($page == $starto_skaicius){ echo "[$starto_skaicius]"; }else{
echo"<a href=\"klanai.php?nick=$nick&pass=$pass&id=klan&page=$starto_skaicius&ka=$ka\">[$starto_skaicius]</a>"; }
$viso_puslapiai++; $starto_skaicius++; }

echo'';

echo"
$lin 
Turi tasku: $far[0] 
Turi litu: $far[1] 
Puolimai: $far[7] ";

if ($sajt == "narys")
{
echo"Jega: $far[2] 
Gynyba: $far[3] 
Kovine galia: $far[4] ";
}
echo"Pergales: $far[5] 
Pralaimejimai: $far[6] 
$lin 
<a href=\"klanai.php?id=klanai&nick=$nick&pass=$pass\">[^] Atgal</a> 
<a href=\"zaisti.php?id=&nick=$nick&pass=$pass\">[<] Zaidimas</a>";
}

if ($id == "keistt" && file_exists("klaniukos/$ka.ta")){
echo"Gaujos topico keitimas 
<input name=\"zinute\" type=\"text\" maxlength=\"150\" title=\"Topic zinute\" value=\"\"/> 
$ico <anchor>Keisti<go href=\"klanai.php?nick=$nick&pass=$pass&id=topic2k&ka=$ka\" method=\"post\">
<postfield name=\"zinute\" value=\"$(zinute)\"/>
</go></anchor> 
$lin 
<a href=\"klanai.php?nick=$nick&pass=$pass&id=cp&ka=$ka\">[^] Atgal</a>";
}
if($id=='topic2k'){
$zinute = $_POST['zinute'];
$zinute = htmlspecialchars($zinute);
$zinute = str_replace("|","l",$zinute);
$zinute = str_replace("$","$$",$zinute);
$zinute = str_replace(";","; ",$zinute);
include("smilesreplace.php");
if (substr_count($zinute, "<img src=")>7){ $lkjss = "Perdaug smailu!"; }
if (strlen($zinute) > 2000){ $lkjss = "Topicas per ilgas!"; }
if (empty($zinute)){ $lkjss = "Topicas neivestas!"; }
$sdjh = "";
$pons = @file("klaniukos/$ka.ta");
for($t = 0; $t < @count($pons); $t++){
$nar = @explode("|",$pons[$t]);
if ($nar[0]==$nick){ $sdjh = "yra"; break; }}
if ($sdjh!="yra"){ $lkjss = "Tu ne sios gaujos narys!"; }

if (empty($lkjss)){
$fpaa = fopen("sajungutopicai/$ka.ta","w");
fwrite($fpaa, "$zinute ($vrd)");
fclose($fpaa); chmod("sajungutopicai/$ka.ta",0777);
$lkjss = "Pakeista sekmingai!"; }
echo"$lkjss 
$lin 
<a href=\"klanai.php?nick=$nick&pass=$pass&id=cp&ka=$ka\">[^] Atgal</a>";
}

if ($id == "iseitiisaj" && file_exists("klaniukos/$ka.ta")){
echo"
Ar tikrai norite iseiti is gaujos?? 
<a href=\"klanai.php?id=iseitissaj&nick=$nick&pass=$pass&ka=$ka\">Taip</a>|
<a href=\"klanai.php?nick=$nick&pass=$pass&id=cp&ka=$ka\">Ne</a> 
";
}

if ($id == "iseitissaj" && file_exists("klaniukos/$ka.ta")){
$sdjh = "";
$pons = @file("klaniukos/$ka.ta");
for($t = 1; $t < @count($pons); $t++){
$nar = @explode("|",$pons[$t]);
if ($nar[0]==$nick){ $sdjh = "yra"; break; }}
if ($sdjh != "yra"){ $df = "Tu nesi sios gaujos narys, arba esi jos vadas!"; } else {
$df = "Tu sekmingai isejai is gaujos!";
$nkh2 = file("klaniukos/$ka.ta");
$kiek_nkh2 = count($nkh2);
for($py2=0; $py2 < $kiek_nkh2; $py2++) {
$kly2 = explode("|",$nkh2[$py2]);
if ($nick==$kly2[0]){
$nkh2[$py2] = "";
$fpz2 = fopen("klaniukos/$ka.ta","w");
fwrite($fpz2,implode($nkh2));
fclose($fpz2);
}}}
echo"$df 
$lin 
<a href=\"klanai.php?id=klanai&nick=$nick&pass=$pass\">[^] Atgal</a> 
<a href=\"zaisti.php?id=&nick=$nick&pass=$pass\">[<] Zaidimas</a> 
";
}

if ($id == "gaujos_misija_1" && file_exists("klaniukos/$ka.ta") && file_exists("klaniukos/$ka-2.txt")){

$kur = "Gaujos Misijoje-Jegos Pasaulis";
include("config.php");

$tiu = time();
if (!file_exists("$dyyra")){
$nx = fopen("$dyyra","w+");
fwrite($nx,"+|+|+|+|+|$tiu|");
fclose($nx);
}

$m = explode("|",file_get_contents("$dyyra"));

$lik = round(($m[5]-time())/60,1);

$m2 = explode("-",$lik);

if ($lik == "-$m2[1]")
{
$tj = time()+1000*1000*1000*1000*1000*1000;
$nxz = fopen("$dyyra","w");
fwrite($nxz,"-|+|+|+|+|$tj|");
fclose($nxz);
}

if ($lik > 600)
{
$lik = "0";
}
if ($lik == "0")
{
echo"
Yvykdes Jegos pasaulio misija tu gausi 1000-65 000 jegos
 
$lin ";

echo"
";

if ($m[0] == "-"){
echo"$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=kautis12&ka12=1_jegos_sarga&ka=$ka\">1-Jegos sargas</a> (100lvl) ";
} else { echo"$ico 1 gaujos Jegos sargas (100lvl) ";
}
if ($m[1] == "-"){
echo"$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=kautis12&ka12=2_jegos_sarga&ka=$ka\">2-Jegos sargas</a> (140lvl) ";
} else { echo"$ico 2 gaujos Jegos sargas (140lvl) ";
}
if ($m[2] == "-"){
echo"$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=kautis12&ka12=3_jegos_sarga&ka=$ka\">3-Jegos sargas</a> (180lvl) ";
} else { echo"$ico 3 gaujos Jegos sargas (180lvl) ";
}
if ($m[3] == "-"){
echo"$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=kautis12&ka12=4_jegos_sarga&ka=$ka\">4-Jegos sargas</a> (220lvl) ";
} else { echo"$ico 4 gaujos Jegos sargas (220lvl) ";
}
if ($m[4] == "-"){
echo"$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=kautis12&ka12=Jegos_Bosa&ka=$ka\">Jegos BOSAS</a> (400lvl) ";
} else { echo"$ico gaujos Jegos BOSAS (400lvl) ";
}
echo"";
}
else
{
echo"
Jegos Pasaulio misija galesi vykdyti po $lik min. ";
}
echo"
$lin 
<a href=\"klanai.php?id=klanai&nick=$nick&pass=$pass\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a> 
";
}

if ($id == "kautis12" && file_exists("klaniukos/$ka.ta") && file_exists("klaniukos/$ka-2.txt")){

$far = explode("|", file_get_contents("klaniukos/$ka-2.txt"));
$mm = explode("|",file_get_contents("kitokiainf/$nick.txt"));

if ($gyvybes < 1)
{
echo"
Nebeturi gyvybiu! 
$lin 
<a href=\"klanai.php?id=klanai&nick=$nick&pass=$pass\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a>";
}
else{
if ($far[7] < 1)
{
echo"
Nebeturi gaujos puolimu! reikia 1. vienam misijos priesui. 
$lin 
<a href=\"klanai.php?id=klanai&nick=$nick&pass=$pass\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a>";
}
else
{
$m = explode("|",file_get_contents("$dyyra"));

if ($ka12 == "1_jegos_sarga") {
$mm[0] = $mm[0] - 1;
include("icludekitainf/mm.php");
$lyyygis = 100;
$kas = "1 Jegos Sargo gauju ";
$x = 200;
$h = "$m[0]"; }

if ($ka12 == "2_jegos_sarga") {
$mm[0] = $mm[0] - 1;
include("icludekitainf/mm.php");
$lyyygis = 140;
$kas = "2 Jegos Sargo gauju";
$x = 400;
$h = "$m[1]"; }

if ($ka12 == "3_jegos_sarga") {
$mm[0] = $mm[0] - 1;
include("icludekitainf/mm.php");
$lyyygis = 180;
$kas = "3 Jegos Sargo gauju";
$x = 800;
$h = "$m[2]"; }

if ($ka12 == "4_jegos_sarga") {
$mm[0] = $mm[0] - 1;
include("icludekitainf/mm.php");
$lyyygis = 220;
$kas = "4 Jegos Sargo gauju";
$x = 1000;
$h = "$m[3]"; }

if ($ka12 == "Jegos_Bosa") {
$mm[0] = $mm[0] - 1;
include("icludekitainf/mm.php");
$lyyygis = 400;
$kas = "Jegos Boso";
$x = 2500;
$h = "$m[4]"; }

$att22 = $lyyygis*3.8;
$damage1002 = rand(2,9);
$gaujos_jega = 1577.8*$damage1002*$far[2];
$att = $lyyygis*18.3;
$att2 = round((($lyyygis*2)/4),1);
$realatt = $att*$att22;
$penk = 5*$att;
$nuemeg = rand(5000,7000);
$nuemeg1 = rand(4000,5000);
$nuemeg2 = rand(3000,4000);
$nuemeg3 = rand(2000,3000);
$nuemeg4 = rand(1000,2000);
$ket = 4*$att;
$tri = 3*$att;
$two = 2*$att;
if ($two > $far[3]) {
$gyvs = $far[2]-$nuemeg; }
if ($two <= $far[3]) {
$realatt = $realatt-round(($realatt/5),2);
$gyvs = $far[2]-$nuemeg1; }
if ($tri <= $far[3]) {
$realatt = $realatt-round(($realatt/4),2);
$gyvs = $far[2]-$nuemeg2; }
if ($ket <= $far[3]) {
$realatt = $realatt-round(($realatt/3),2);
$gyvs = $far[2]-$nuemeg3; }
if ($penk <= $far[3]) {
$realatt = $realatt-round(($realatt/2),2);
$gyvs = $far[2]-$nuemeg4; }

if ($h != "-"){
echo"Taip negalima, gaujos misija turi vykdyti is eiles !! 
$lin 
<a href=\"klanai.php?id=klanai&nick=$nick&pass=$pass\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a> 
";
}
else
{
if ($far[3] <= $att2) { $prakisai = "+"; }
if ($gaujos_jega <= $realatt) { $prakisai = "+"; }
if ($prakisai=="+"){

echo"$ka Vadas sia kova prakiso!!! 
Ir prarado sawo puse turimu litu, bei visas gyvybes!! 
$ka gaujos jega: $gaujos_jega 
$kas jega: $realatt 
$lin 
$ico <a accesskey=\"1\" href=\"zaisti.php?nick=$nick&pass=$pass&id=apie&ka=$nick\">Tavo meniu</a> 
$lin 
<a href=\"klanai.php?id=klanai&nick=$nick&pass=$pass\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a> 
";

$los = "$loses"+"1";
$pinigai = round(($pinigai)/2,0);

$fp = fopen("$gameriai","w");
fwrite($fp,"$lygis|$inf[1]|$inf[2]|$jega|0|$gyvybess|$sugebejimas|$pinigai|$wins|$los|$ginklo_att|$ginklas|$uzregintas|$pask_prisijungimas|$p|$points|$gynyba|$tim|$rase|$exp|$ex_left||$sarvu_prot|$sarvai||\n");
fclose($fp);
}
else
{
$netekai = $far[2]-$gyvs;

echo"
Tu Laimejai! 
Nukovei $ka12 
$kas jega : $realatt 
$ka gaujos jega : $gaujos_jega 
$lin ";

$lvl = 99999;
$enda = 99999;
$qq = 1.1;
for ($rr=1; $rr<99999; $rr++){
if ($rr==1){ $qq = 1.1; } else { $qq = $qq*1.1; }
if ($qq >= $suma/10 && $enda != $rr){ $lvl = $rr; $enda = $rr+1; $buves = $qq; }
if ($enda==$rr){ $left = round($buves*10,1); break; }
}

if ($lvl > $lygis){
echo"Sveikinu! Tu pasikelei lygi 
Dabar tavo lygis: $lvl 
$lin ";
$pointsr = "$points"+"3";
} else { $pointsr = $points; }

if ($ka12 == "Jegos_Bosa" && file_exists("klaniukos/$ka.ta") && file_exists("klaniukos/$ka-2.txt")){

$far2 = explode("|", file_get_contents("klaniukos/$ka.ta"));

$gkro = rand(1000,13500);
$gkro20 = rand(1000,5000);

echo"$ka gauja Nukove visus Jegos pasaulio karius ir uz tai $ka gaujos vadas gauna 1000-13000 jegos. atsitiktinai., o kiekvienas $ka gaujos narys gauna 1000-5000 jegos, 
$lin ";

foreach (glob("klaniukos/$ka/*.txt") as $a)
{
$name2 = str_replace(array("klaniukos/$ka/", "txt"), "", $a);

$arr[] = array("$name2");
}
rsort($arr);

for ($k = 0; $k < 30; $k++)
{
if (!file_exists("kronoss/{$arr[$k][1]}.txt"))
{
$krou = 0;
}
else
{
$krou = file_get_contents("kronoss/{$arr[$k][1]}.txt");
}
if ($k == '0')
{
$krp = rand(1000,13000);
$krp2 = '$krp';
$tau = "Sveikinu tave $ka gaujos ykurejau, tu ywykdei gaujos misija ir uz tai gauni $krp2 jegos";
}
if ($k == '1')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '2')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '3')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '4')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '5')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}
if ($k == '6')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '7')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '8')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '9')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}
if ($k == '10')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '11')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '12')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '13')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '14')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '15')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '16')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '17')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '18')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '19')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}
if ($k == '20')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}
if ($k == '21')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '22')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '23')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '24')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '25')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}
if ($k == '26')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '27')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '28')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}

if ($k == '29')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}
if ($k == '30')
{
$krp = rand(1000,5000);
$krp2 = '$krp';
$tau = "Tawo gaujos $ka vadas katik ywykde gaujos misija ir uz tai tu gauni $krp2 jegos. ;)";
}
$fop = fopen("kronoss/{$arr[$k][1]}.txt", "w+");
fwrite($fop, $krou + 2);
fclose($fop);
chmod("kronoss/{$arr[$k][1]}.txt", 0777);

$atidaryma = fopen("priv_zin/{$arr[$k][1]}.txt", "a");
fwrite($atidaryma, "@sistema|$tau ir +2 kreditu. |$laikas|\n");
fclose($atidaryma);

$jega = $jega + $krp2;
$foppppp = fopen("zaideju_inf/{$arr[$k][1]}.txt", "w+");
fwrite($foppppp,"$lvl|$inf[1]|$inf[2]|$jega|$gyvs|$gyvybess|$sugebejimas|$pinig|$winai|$loses|$ginklo_att|$ginklas|$uzregintas|$pask_prisijungimas|$p|$pointsr|$gynyba|$tim|$rase|$suma|$left||$sarvu_prot|$sarvai||\n");
fclose($foppppp);

$mm = @explode("|",@file_get_contents("kitokiainf/{$arr[$k][1]}.txt"));
$mm[56] = $mm[56] + $krp2;
include("icludekitainf/mm.php");
$fop = fopen("kitokiainf/{$arr[$k][1]}.txt", "w+");
fwrite($fop, "$mm[0]|$mm[1]|$mm[2]|$mm[3]|$mm[4]|$mm[5]|$mm[6]|$mm[7]|$mm[8]|$mm[9]|$mm[10]|$mm[11]|$mm[12]|$mm[13]|$mm[14]|$mm[15]|$mm[16]|$mm[17]|$mm[18]|$mm[19]|$mm[20]|$mm[21]|$mm[22]|$mm[23]|$mm[24]|$mm[25]|$mm[26]|$mm[27]|$mm[28]|$mm[29]|$mm[30]|$mm[31]|$mm[32]|$mm[33]|$mm[34]|$mm[35]|$mm[36]|$mm[37]|$mm[38]|$mm[39]|$mm[40]|$mm[41]|$mm[42]|$mm[43]|$mm[44]|$mm[45]|$mm[46]|$mm[47]|$mm[48]|$mm[49]|$mm[50]|$mm[51]|$mm[52]|$mm[53]|$mm[54]|$mm[55]|$mm[56]|$mm[57]|$mm[58]|$mm[59]|$mm[60]|$mm[61]|$mm[62]|$mm[63]|$mm[64]|$mm[65]|$mm[66]|$mm[67]|$mm[68]|$mm[69]|$mm[70]|$mm[71]|$mm[72]|$mm[73]|$mm[74]|$mm[75]|$mm[76]|$mm[77]|$mm[78]|$mm[79]|$mm[80]|$mm[81]|$mm[82]|$mm[83]|$mm[84]|$mm[85]|$mm[86]|$mm[87]|$mm[88]|$mm[89]|$mm[90]|$mm[91]|$mm[92]|$mm[93]|$mm[94]|$mm[95]|$mm[96]|$mm[97]|$mm[98]|$mm[99]|\n");
fclose($fop);
chmod("kitokiainf/{$arr[$k][1]}.txt", 0777);

$atidaryma = fopen("klaniukos/$ka-pm.txt", "a");
fwrite($atidaryma, "Gaujos Vadas Yvykde gaujos misija.! uz kuria gaujos nariai ir pats vadas gavo kazkiek jegos.|$aaa|\n");
fclose($atidaryma);
}
}
$winai = "$wins"+"1";
$pinig = $pinigai+$lyyygis;
echo"

$ka gauja prarado jegos: $netekai 
$ka gaujos Vadui Liko gyvybiu: 0 ";

echo" 

$ka gauja Gavo litu: $lyyygis 
$ico <a accesskey=\"1\" href=\"zaisti.php?nick=$nick&pass=$pass&id=apie&ka=$nick\">Tavo meniu</a> 
$ico <a accesskey=\"2\" href=\"zaisti.php?nick=$nick&pass=$pass&id=inventory\">Saugykla</a> 

$lin 
<a href=\"klanai.php?id=klanai&nick=$nick&pass=$pass\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a>";

$fop = fopen("zaideju_inf/$fdp[0].txt", "w");
fwrite($fop, "$cyks2[0]|$cyks2[1]|$cyks2[2]|$cyks2[3]|$cyks2[4]|$cyks2[5]|$cyks2[6]|$cyks2[7]|$cyks2[8]|$cyks2[9]|$cyks2[10]|$cyks2[11]|$cyks2[12]|$cyks2[13]|+|$cyks2[15]|$cyks2[16]|$cyks2[17]|$cyks2[18]|$cyks2[19]|$cyks2[20]|$cyks2[21]|$cyks2[22]|$cyks2[23]|$cyks2[24]|$cyks2[25]|");
fclose($fop);

$far[2] = $far[2]-$netekai;
$far[1] = $far[1]+$lyyygis;

$openn = fopen("klaniukos/$ka-2.txt", "w+");
fwrite($openn, "$far[0]|$far[1]|$far[2]|$far[3]|$far[4]|$far[5]|$far[6]|$far[7]|$far[8]|$far[9]|\n");
fclose($openn);

if ($ka12 == "1_jegos_sarga") {
$tjj = time()+1000*1000*1000*1000*1000*1000;
$nxa = fopen("$dyyra","w");
fwrite($nxa,"+|-|+|+|+|$tjj|");
fclose($nxa);
}
if ($ka12 == "2_jegos_sarga") {
$tjj = time()+1000*1000*1000*1000*1000*1000;
$nxa = fopen("$dyyra","w");
fwrite($nxa,"+|+|-|+|+|$tjj|");
fclose($nxa);
}
if ($ka12 == "3_jegos_sarga") {
$tjj = time()+1000*1000*1000*1000*1000*1000;
$nxa = fopen("$dyyra","w");
fwrite($nxa,"+|+|+|-|+|$tjj|");
fclose($nxa);
}
if ($ka12 == "4_jegos_sarga") {
$tjj = time()+1000*1000*1000*1000*1000*1000;
$nxa = fopen("$dyyra","w");
fwrite($nxa,"+|+|+|+|-|$tjj|");
fclose($nxa);
}
if ($ka12 == "Jegos_Bosa") {
$tjj = time()+10*60*60;
$nxa = fopen("$dyyra","w");
fwrite($nxa,"+|+|+|+|+|$tjj|");
fclose($nxa);
}
}
}
}
}
}

if ($id == "salint" && file_exists("klaniukos/$ka.ta")){
echo"
Ar tikrai norite ismesti $katt is gaujos?? 
<a href=\"klanai.php?id=salint2&nick=$nick&pass=$pass&katt=$nar[0]&ka=$ka\">Taip</a>|
<a href=\"klanai.php?nick=$nick&pass=$pass&id=cp&ka=$ka\">Ne</a> 
";
}

if ($id == "salint2" && file_exists("klaniukos/$ka.ta"))
{

$sdjh = "";
$pons = @file("klaniukos/$ka.ta");
$kure = @explode("|",$pons[0]);
if ($kure[0] != $nick){ $df = "Tu nesi sios gaujos vadas!";
}
else
{
$df = "Tu sekmingai ismetei $katt is gaujos!";

$atidaryma = fopen("priv_zin/$katt.txt", "a");
fwrite($atidaryma, "@sistema|$nick ismete tave is $ka gaujos!|$laikas|\n");
fclose($atidaryma);

$infa = explode("|", file_get_contents("zaideju_inf/$katt.txt"));
$fp1 = fopen("zaideju_inf/$katt.txt", "w");
fwrite($fp1, "$infa[0]|$infa[1]|$infa[2]|$infa[3]|$infa[4]|$infa[5]|$infa[6]|$infa[7]|$infa[8]|$infa[9]|$infa[10]|$infa[11]|$infa[12]|$infa[13]|+|$infa[15]|$infa[16]|$infa[17]|$infa[18]|$infa[19]|$infa[20]|$infa[21]|$infa[22]|$infa[23]|$infa[24]|\n");
fclose($fp1);

$nkh2 = file("klaniukos/$ka.ta");
$kiek_nkh2 = count($nkh2);
for($py2=0; $py2 < $kiek_nkh2; $py2++) {
$kly2 = explode("|",$nkh2[$py2]);

if ($katt==$kly2[0]){
$nkh2[$py2] = "";
$fpz2 = fopen("klaniukos/$ka.ta","w");
fwrite($fpz2,implode($nkh2));
fclose($fpz2);
}
}

echo"$df 
$lin 
<a href=\"klanai.php?nick=$nick&pass=$pass&id=cp&ka=$ka\">[^] Atgal</a> 
<a href=\"zaisti.php?id=&nick=$nick&pass=$pass\">[<] Zaidimas</a> 
";
}
}

if ($id == "istriintsaj" && file_exists("klaniukos/$ka.ta")){
echo"
Ar tikrai norite panaikinti gauja?? 
<a href=\"klanai.php?id=istrintsaj&nick=$nick&pass=$pass&ka=$ka\">Taip</a>|
<a href=\"klanai.php?nick=$nick&pass=$pass&id=cp&ka=$ka\">Ne</a> 
";
}

if ($id == "istrintsaj" && file_exists("klaniukos/$ka.ta")){
$sdjh = "";
$pons = @file("klaniukos/$ka.ta");
$kure = @explode("|",$pons[0]);
if ($kure[0] != $nick){ $df = "Tu nesi sios gaujos vadas!"; } else {
$df = "Tu sekmingai panaikinai gauja";
@unlink("klaniukos/$ka.ta");
@unlink("sajungutopicai/$ka.ta");
@unlink("klaniukos/$ka-2.txt");
@unlink("klaniukos/$ka-pm.txt");
@unlink("klaniukos/$nick.txt");
}
echo"$df 
$lin 
<a href=\"klanai.php?id=klanai&nick=$nick&pass=$pass\">[^] Atgal</a> 
<a href=\"zaisti.php?id=&nick=$nick&pass=$pass\">[<] Zaidimas</a> 
";
}

if ($id == "valyti_pran" && file_exists("klaniukos/$ka.ta")){
echo"
Ar tikrai norite isvalyti $ka gaujos pranesimus?? 
<a href=\"klanai.php?id=valyti_pran2&nick=$nick&pass=$pass&ka=$ka\">Taip</a>|
<a href=\"klanai.php?nick=$nick&pass=$pass&id=cp&ka=$ka\">Ne</a> 
";
}

if ($id == "valyti_pran2" && file_exists("klaniukos/$ka.ta")){
$sdjh = "";
$pons = @file("klaniukos/$ka.ta");
$kure = @explode("|",$pons[0]);
if ($kure[0] != $nick){ $df = "Tu nesi sios gaujos vadas!"; } else {
$df = "Isvalyta!";
$atidaryma = fopen("klaniukos/$ka-pm.txt", "w");
fwrite($atidaryma, "");
fclose($atidaryma);
}
echo"$df 
$lin 
<a href=\"klanai.php?id=klan&nick=$nick&pass=$pass&ka=$ka\">[^] Atgal</a> 
<a href=\"zaisti.php?id=&nick=$nick&pass=$pass\">[<] Zaidimas</a> 
";
}

if ($id == "ikurt"){
$kur = "Gaujos Ikurime";
include("config.php");
echo'';
echo"Gaujos ikurimas 
$lin ";
echo"Ikure savo gauja, jus busite jos vadas, galesite puldineti kitas gaujas, taip keldamas savo gauja i TOPUS. 
Priklausomai nuo to, kiek nariu pritrauksite i savo gauja, jus kas 6 valandas gausite po 0.05 kreditu nuo nario,
pvz: jei jusu gaujoje bus 20 nariu, tai jus kas 6 valandas gausite po 1 kredita is zaidimo isdo ;) 
O pritraukti nariu i savo gauja galesite pasiule jiems tam tikras litu sumas, kreditu kiekius, nes gauju nariai gali pervedineti vieni kitiems litus bei kreditus. 
Gaujos ikurimas kainuoja $kaina3 
Reikia siusti sms su tekstu: HOST6 tamsa $nick gauja gaujos_pavadinimas 
Numeriu: $nr 
$lin 
<a href=\"klanai.php?id=klanai&nick=$nick&pass=$pass\">[^] Atgal</a> 
<a href=\"zaisti.php?id=&nick=$nick&pass=$pass\">[<] Zaidimas</a> ";
echo'';
}

if ($id == "stot"){
$kur = "Gaujos Istojime";
include("config.php");
echo'';
echo"Istojimas i gauja 
$lin 

";
echo"Gaujos nariai gali vieni kitiems pervedineti litus ir kreditus. 
Uz tai kad busi gaujos narys, gausi po 0.05 kreditu kas 6 valandas, gali stoveti ne vienoj gaujoj, tuomet ir gaunama kreditu suma bus didesne ;) 
Istojimas i gauja kainuoja $kaina1 
Reikia siusti sms su tekstu: $sms1 $nick stoju $ka 
Numeriu: $nr 
$lin 
<a href=\"klanai.php?id=klan&nick=$nick&pass=$pass&ka=$ka\">[^] Atgal</a> 
<a href=\"zaisti.php?id=&nick=$nick&pass=$pass\">[<] Zaidimas</a> ";
echo'';
}

if ($id == "pervesti") {
$kur = "Gaujos litu Pervedimuose";
include("config.php");
echo"
Litus gaus $kas 
$lin 
Turi litu $pinigai 
Kiek pervesi? 
<input name=\"howy\" type=\"text\" format=\"*N\" maxlength=\"20\" title=\"Kiek?\"/> 
$ico <anchor>Pervesti<go href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti2&kam=$kas&ka=$ka\" method=\"post\">
<postfield name=\"howy\" value=\"$(howy)\"/>
</go></anchor> 
$lin 
<a href=\"klanai.php?nick=$nick&pass=$pass&id=klan&ka=$ka\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a>
"; }

if ($id == "pervesti2") {
$kur = "Gaujos litu Pervedimuose";
include("config.php");
$howy = $_POST['howy'];
$us = @file_get_contents("zaideju_inf/$kam.txt");
$infa = explode("|", $us);
$gavejo_pinigai = $infa[7];

if (!file_exists("zaideju_inf/$kam.txt")){ $er="Sis zaidejas neuzregistruotas!"; }
if ($kam == $nick){ $er="Sau pervesti litu negalima!"; }
if ($pinigai < $howy){ $er="Neturi tiek litu!"; }
$skaitom = @file_get_contents("klaniukos/$ka.ta");
if (!@eregi("$kam",$skaitom)){ $er = "Sis kovotojas ne sioje gaujoje!"; }
if (!@eregi("$nick",$skaitom)){ $er = "Tu ne sios gaujos narys!"; }

if ($er == ""){
$piny = round(($pinigai-$howy),0);
$fp4 = fopen("$gameriai","w");
fwrite($fp4,"$lygis|$inf[1]|$inf[2]|$jega|$gyvybes|$gyvybess|$sugebejimas|$piny|$wins|$loses|$ginklo_att|$ginklas|$uzregintas|$pask_prisijungimas|$p|$points|$gynyba|$floo|$rase|$exp|$ex_left||$sarvu_prot|$sarvai||\n");
fclose($fp4);
$gavejo_piny = round(($gavejo_pinigai+$howy),0);
$fp1 = fopen("zaideju_inf/$kam.txt","w");
fwrite($fp1,"$infa[0]|$infa[1]|$infa[2]|$infa[3]|$infa[4]|$infa[5]|$infa[6]|$gavejo_piny|$infa[8]|$infa[9]|$infa[10]|$infa[11]|$infa[12]|$infa[13]|+|$infa[15]|$infa[16]|$infa[17]|$infa[18]|$infa[19]|$infa[20]|$infa[21]|$infa[22]|$infa[23]|$infa[24]|\n");
fclose($fp1);
$atidaryma = fopen("priv_zin/$kam.txt", "a");
fwrite($atidaryma, "@sistema|$nick pervede tau $howy litu|$aaa|\n");
fclose($atidaryma);
$er = "Tu pervedei $howy litu $kam";
}
echo"$er 
$lin 
<a href=\"klanai.php?nick=$nick&pass=$pass&id=klan&ka=$ka\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a>"; }

if ($id == "pervesti_daigtu")
{
$kur = "Daigtu pervedimuose";
include("config.php");
echo "$er 
$lin 
Kokius Daigtus perwesi? 
$lin 
$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=zetonus_atiduodu&ka=$ka&kas=$kam\">Puolimus</a> 
Chiches ir Goko misijos Daigtai: 
$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti_jeg&ka=$ka&kas=$nar[0]\">Jegos Medalijonus</a> 
$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti_sag&ka=$ka&kas=$nar[0]\">Sagao Akmenis</a> 
$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti_die&ka=$ka&kas=$nar[0]\">Dieviskojo Vandens Buteliukus</a> 
$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti_dub&ka=$ka&kas=$nar[0]\">Dublonus</a> 
Bulmos misijos daigtai: 
$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti_kel&ka=$ka&kas=$nar[0]\">Kelnias</a> 
$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti_lie&ka=$ka&kas=$nar[0]\">Liemenukus</a> 
$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti_keln&ka=$ka&kas=$nar[0]\">Kelnaites</a> 
$ico <a href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti_bli&ka=$ka&kas=$nar[0]\">Bliuskutes</a> 
$lin 
<a href=\"klanai.php?nick=$nick&pass=$pass&id=klan&ka=$ka\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a> 
";
}

if ($id == "zetonus_atiduodu")
{
$kur = "Perveda kazkam puolimus";
include("config.php");

if ($lygis < 40)
{
echo "
Pervedineti daigtus savo gaujos narems galima tik nuo 40 lygio! 
$lin <a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[^] Atgal</a>";
}
else
{
echo "
Turi puolimu: $mm[0] 
Kam pervesti Puolimus? 
<input name=\"kam\" type=\"text\" maxlength=\"200\" title=\"Kam?\" value=\"\"/> 

Kiek? 
<input name=\"howy\" type=\"text\" format=\"*N\" maxlength=\"200\" title=\"Kiek?\"/> 

$ico <anchor>Pervesti<go href=\"klanai.php?nick=$nick&pass=$pass&id=zetonus_atiduodu2&ka=$ka&kam=$kas\" method=\"post\">
<postfield name=\"kam\" value=\"$(kam)\"/>
<postfield name=\"howy\" value=\"$(howy)\"/>
</go></anchor> 
$lin 
<a href=\"klanai.php?nick=$nick&pass=$pass&id=klan&ka=$ka\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a>
";
}
}

if ($id == "zetonus_atiduodu2")
{
$kur = "Perveda kazkam puolimus";
include("config.php");
$kam = $_POST['kam'];
$howy = $_POST['howy'];
$mm = @explode("|",@file_get_contents("kitokiainf/$nick.txt"));

if (!file_exists("zaideju_inf/$kam.txt")){ $er="Sis zaidejas neuzregistruotas!"; }
if ($kam == $nick){ $er="Sau pervesti puolimus negalima!"; }
if ($mm[0] < $howy){ $er="Neturi tiek puolimu!"; }
$skaitom = @file_get_contents("klaniukos/$ka.ta");
if (!@eregi("$kam",$skaitom)){ $er = "Sis kovotojas ne sioje gaujoje!"; }
if (!@eregi("$nick",$skaitom)){ $er = "Tu ne sios gaujos narys!"; }

if ($er == "")
{
$us = @file_get_contents("zaideju_inf/$kam.txt");
$mm = @explode("|",@file_get_contents("kitokiainf/$kam.txt"));
$infa = explode("|", $us);
$gavejo_zetonai = $mm[0];
$mm = @explode("|",@file_get_contents("kitokiainf/$nick.txt"));
$zet = $mm[0] - $howy;
include("icludekitainf/mm.php");
$fop = fopen("kitokiainf/$nick.txt", "w+");
fwrite($fop, "$zet|$mm[1]|$mm[2]|$mm[3]|$mm[4]|$mm[5]|$mm[6]|$mm[7]|$mm[8]|$mm[9]|$mm[10]|$mm[11]|$mm[12]|$mm[13]|$mm[14]|$mm[15]|$mm[16]|$mm[17]|$mm[18]|$mm[19]|$mm[20]|$mm[21]|$mm[22]|$mm[23]|$mm[24]|$mm[25]|$mm[26]|$mm[27]|$mm[28]|$mm[29]|$mm[30]|$mm[31]|$mm[32]|$mm[33]|$mm[34]|$mm[35]|$mm[36]|$mm[37]|$mm[38]|$mm[39]|$mm[40]|$mm[41]|$mm[42]|$mm[43]|$mm[44]|$mm[45]|$mm[46]|$mm[47]|$mm[48]|$mm[49]|$mm[50]|$mm[51]|$mm[52]|$mm[53]|$mm[54]|$mm[55]|$mm[56]|$mm[57]|$mm[58]|$mm[59]|$mm[60]|$mm[61]|$mm[62]|$mm[63]|$mm[64]|$mm[65]|$mm[66]|$mm[67]|$mm[68]|$mm[69]|$mm[70]|$mm[71]|$mm[72]|$mm[73]|$mm[74]|$mm[75]|$mm[76]|$mm[77]|$mm[78]|$mm[79]|$mm[80]|$mm[81]|$mm[82]|$mm[83]|$mm[84]|$mm[85]|$mm[86]|$mm[87]|$mm[88]|$mm[89]|$mm[90]|$mm[91]|$mm[92]|$mm[93]|$mm[94]|$mm[95]|$mm[96]|$mm[97]|$mm[98]|$mm[99]|\n");
fclose($fop);
$mm = @explode("|",@file_get_contents("kitokiainf/$kam.txt"));
$gavejo_zet = round(($gavejo_zetonai + $howy), 2);
$fop = fopen("kitokiainf/$kam.txt", "w+");
fwrite($fop, "$gavejo_zet|$mm[1]|$mm[2]|$mm[3]|$mm[4]|$mm[5]|$mm[6]|$mm[7]|$mm[8]|$mm[9]|$mm[10]|$mm[11]|$mm[12]|$mm[13]|$mm[14]|$mm[15]|$mm[16]|$mm[17]|$mm[18]|$mm[19]|$mm[20]|$mm[21]|$mm[22]|$mm[23]|$mm[24]|$mm[25]|$mm[26]|$mm[27]|$mm[28]|$mm[29]|$mm[30]|$mm[31]|$mm[32]|$mm[33]|$mm[34]|$mm[35]|$mm[36]|$mm[37]|$mm[38]|$mm[39]|$mm[40]|$mm[41]|$mm[42]|$mm[43]|$mm[44]|$mm[45]|$mm[46]|$mm[47]|$mm[48]|$mm[49]|$mm[50]|$mm[51]|$mm[52]|$mm[53]|$mm[54]|$mm[55]|$mm[56]|$mm[57]|$mm[58]|$mm[59]|$mm[60]|$mm[61]|$mm[62]|$mm[63]|$mm[64]|$mm[65]|$mm[66]|$mm[67]|$mm[68]|$mm[69]|$mm[70]|$mm[71]|$mm[72]|$mm[73]|$mm[74]|$mm[75]|$mm[76]|$mm[77]|$mm[78]|$mm[79]|$mm[80]|$mm[81]|$mm[82]|$mm[83]|$mm[84]|$mm[85]|$mm[86]|$mm[87]|$mm[88]|$mm[89]|$mm[90]|$mm[91]|$mm[92]|$mm[93]|$mm[94]|$mm[95]|$mm[96]|$mm[97]|$mm[98]|$mm[99]|\n");
fclose($fop);
$atidaryma = fopen("priv_zin/$kam.txt", "a");
fwrite($atidaryma, "@sistema|Tavo gaujos narys $vrd pervede tau $howy puolimu|$aaa|\n");
fclose($atidaryma);
$er = "Pervedei $howy puolimu to $kam";
}
echo "
$er 
$lin 
<a href=\"klanai.php?nick=$nick&pass=$pass&id=klan&ka=$ka\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a>";
}

if ($id == "pervesti_jeg")
{
$kur = "Perveda kazkam jegos medalijonus";
include("config.php");

if ($lygis < 40)
{
echo "
Pervedineti daigtus savo gaujos narems galima tik nuo 40 lygio! 
$lin <a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[^] Atgal</a>";
}
else
{
echo "
Turi Jegos Medalijonu: $mm[29] 
Kam pervesti Medalijonus? 
<input name=\"kam\" type=\"text\" maxlength=\"200\" title=\"Kam?\" value=\"\"/> 

Kiek? 
<input name=\"howy\" type=\"text\" format=\"*N\" maxlength=\"200\" title=\"Kiek?\"/> 

$ico <anchor>Pervesti<go href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti_jeg2&ka=$ka&kam=$kas\" method=\"post\">
<postfield name=\"kam\" value=\"$(kam)\"/>
<postfield name=\"howy\" value=\"$(howy)\"/>
</go></anchor> 
$lin 
<a href=\"klanai.php?nick=$nick&pass=$pass&id=klan&ka=$ka\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a>
";
}
}

if ($id == "pervesti_jeg2")
{
$kur = "Perveda kazkam jegos medalijonus";
include("config.php");
$kam = $_POST['kam'];
$howy = $_POST['howy'];
$mm = @explode("|",@file_get_contents("kitokiainf/$nick.txt"));

if (!file_exists("zaideju_inf/$kam.txt")){ $er="Sis zaidejas neuzregistruotas!"; }
if ($kam == $nick){ $er="Sau pervesti Jegos Medalijonu negalima!"; }
if ($mm[29] < $howy){ $er="Neturi tiek Jegos Medalijonu!"; }
$skaitom = @file_get_contents("klaniukos/$ka.ta");
if (!@eregi("$kam",$skaitom)){ $er = "Sis kovotojas ne sioje gaujoje!"; }
if (!@eregi("$nick",$skaitom)){ $er = "Tu ne sios gaujos narys!"; }

if ($er == "")
{

$mm = @explode("|",@file_get_contents("kitokiainf/$kam.txt"));
$gavejo_zetonai = $mm[29];
$mm = @explode("|",@file_get_contents("kitokiainf/$nick.txt"));
$zet = $mm[29] - $howy;
include("icludekitainf/mm.php");
$fop = fopen("kitokiainf/$nick.txt", "w+");
fwrite($fop, "$mm[0]|$mm[1]|$mm[2]|$mm[3]|$mm[4]|$mm[5]|$mm[6]|$mm[7]|$mm[8]|$mm[9]|$mm[10]|$mm[11]|$mm[12]|$mm[13]|$mm[14]|$mm[15]|$mm[16]|$mm[17]|$mm[18]|$mm[19]|$mm[20]|$mm[21]|$mm[22]|$mm[23]|$mm[24]|$mm[25]|$mm[26]|$mm[27]|$mm[28]|$zet|$mm[30]|$mm[31]|$mm[32]|$mm[33]|$mm[34]|$mm[35]|$mm[36]|$mm[37]|$mm[38]|$mm[39]|$mm[40]|$mm[41]|$mm[42]|$mm[43]|$mm[44]|$mm[45]|$mm[46]|$mm[47]|$mm[48]|$mm[49]|$mm[50]|$mm[51]|$mm[52]|$mm[53]|$mm[54]|$mm[55]|$mm[56]|$mm[57]|$mm[58]|$mm[59]|$mm[60]|$mm[61]|$mm[62]|$mm[63]|$mm[64]|$mm[65]|$mm[66]|$mm[67]|$mm[68]|$mm[69]|$mm[70]|$mm[71]|$mm[72]|$mm[73]|$mm[74]|$mm[75]|$mm[76]|$mm[77]|$mm[78]|$mm[79]|$mm[80]|$mm[81]|$mm[82]|$mm[83]|$mm[84]|$mm[85]|$mm[86]|$mm[87]|$mm[88]|$mm[89]|$mm[90]|$mm[91]|$mm[92]|$mm[93]|$mm[94]|$mm[95]|$mm[96]|$mm[97]|$mm[98]|$mm[99]|\n");
fclose($fop);
$mm = @explode("|",@file_get_contents("kitokiainf/$kam.txt"));
$gavejo_zet = round(($gavejo_zetonai + $howy), 2);
$fop = fopen("kitokiainf/$kam.txt", "w+");
fwrite($fop, "$mm[0]|$mm[1]|$mm[2]|$mm[3]|$mm[4]|$mm[5]|$mm[6]|$mm[7]|$mm[8]|$mm[9]|$mm[10]|$mm[11]|$mm[12]|$mm[13]|$mm[14]|$mm[15]|$mm[16]|$mm[17]|$mm[18]|$mm[19]|$mm[20]|$mm[21]|$mm[22]|$mm[23]|$mm[24]|$mm[25]|$mm[26]|$mm[27]|$mm[28]|$gavejo_zet|$mm[30]|$mm[31]|$mm[32]|$mm[33]|$mm[34]|$mm[35]|$mm[36]|$mm[37]|$mm[38]|$mm[39]|$mm[40]|$mm[41]|$mm[42]|$mm[43]|$mm[44]|$mm[45]|$mm[46]|$mm[47]|$mm[48]|$mm[49]|$mm[50]|$mm[51]|$mm[52]|$mm[53]|$mm[54]|$mm[55]|$mm[56]|$mm[57]|$mm[58]|$mm[59]|$mm[60]|$mm[61]|$mm[62]|$mm[63]|$mm[64]|$mm[65]|$mm[66]|$mm[67]|$mm[68]|$mm[69]|$mm[70]|$mm[71]|$mm[72]|$mm[73]|$mm[74]|$mm[75]|$mm[76]|$mm[77]|$mm[78]|$mm[79]|$mm[80]|$mm[81]|$mm[82]|$mm[83]|$mm[84]|$mm[85]|$mm[86]|$mm[87]|$mm[88]|$mm[89]|$mm[90]|$mm[91]|$mm[92]|$mm[93]|$mm[94]|$mm[95]|$mm[96]|$mm[97]|$mm[98]|$mm[99]|\n");
fclose($fop);
$atidaryma = fopen("priv_zin/$kam.txt", "a");
fwrite($atidaryma, "@sistema|Tavo gaujos narys $vrd pervede tau $howy Jegos Medalijonu|$aaa|\n");
fclose($atidaryma);
$er = "Pervedei $howy Jegos Medalijonu to $kam";
}
echo "
$er 
$lin 
<a href=\"klanai.php?nick=$nick&pass=$pass&id=klan&ka=$ka\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a>";
}

if ($id == "pervesti_sag")
{
$kur = "Perveda kazkam sagao akmenis";
include("config.php");

if ($lygis < 40)
{
echo "
Pervedineti daigtus savo gaujos narems galima tik nuo 40 lygio! 
$lin <a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[^] Atgal</a>";
}
else
{
echo "
Turi Sagao Akmenu: $mm[30] 
Kam pervesti Akmenis? 
<input name=\"kam\" type=\"text\" maxlength=\"200\" title=\"Kam?\" value=\"\"/> 

Kiek? 
<input name=\"howy\" type=\"text\" format=\"*N\" maxlength=\"200\" title=\"Kiek?\"/> 

$ico <anchor>Pervesti<go href=\"klanai.php?nick=$nick&pass=$pass&id=pervesti_sag2&ka=$ka&kam=$kas\" method=\"post\">
<postfield name=\"kam\" value=\"$(kam)\"/>
<postfield name=\"howy\" value=\"$(howy)\"/>
</go></anchor> 
$lin 
<a href=\"klanai.php?nick=$nick&pass=$pass&id=klan&ka=$ka\">[^] Atgal</a> 
<a href=\"zaisti.php?nick=$nick&pass=$pass&id=\">[<] Zaidimas</a>
";
}
}

if ($id == "pervesti_sag2")
{
$kur = "Perveda kazkam sagao akmenis";
include("config.php");
$kam = $_POST['kam'];
$howy = $_POST['howy'];
$mm = @explode("|",@file_get_contents("kitokiainf/$nick.txt"));

if (!file_exists("zaideju_inf/$kam.txt")){ $er="Sis zaidejas neuzregistruotas!"; }
if ($kam == $nick){ $er="Sau pervesti Sagao Akmenis negalima!"; }
if ($mm[30] < $howy){ $er="Neturi tiek Sagao Akmenu!"; }
$skaitom = @file_get_contents("klaniukos/$ka.ta");
if (!@eregi("$kam",$skaitom)){ $er = "Sis kovotojas ne sioje gaujoje!"; }
if (!@eregi("$nick",$skaitom)){ $er = "Tu ne sios gaujos narys!"; }

if ($er == "")
{
$us = @file_get_contents("zaideju_inf/$kam.txt");
$mm = @explode("|",@file_get_contents("kitokiainf/$kam.txt"));
$infa = explode("|", $us);
$gavejo_zetonai = $mm[30];
$mm = @explode("|",@file_get_contents("kitokiainf/$nick.txt"));
$zet = $mm[30] - $howy;
include("icludekitainf/mm.php");
$fop = fopen("kitokiainf/$nick.txt", "w+");
fwrite($fop, "$mm[0]|$mm[1]|$mm[2]|$mm[3]|$mm[4]|$mm[5]|$mm[6]|$mm[7]|$mm[8]|$mm[9]|$mm[10]|$mm[11]|$mm[12]|$mm[13]|$mm[14]|$mm[15]|$mm[16]|$mm[17]|$mm[18]|$mm[19]|$mm[20]|$mm[21]|$mm[22]|$mm[23]|$mm[24]|$mm[25]|$mm[26]|$mm[27]|$mm[28]|$mm[29]|$zet|$mm[31]|$mm[32]|$mm[33]|$mm[34]|