View file public_html/games2/bega.php

File size: 14.58Kb
<?php
############################################
### Этот скрипт написан для Wap-Motor 18 ###
###Автор скрипта Dred#######################
###ICQ: 757041##############################
###Сайт: http://nmn.webhop.net##############
###Желающие могут подкинуть деньжат#########
###Z840880492902############################
###R852036927651############################
############################################
require_once"../template/start.php";require_once"../template/regglobals.php";require_once"../template/config.php";require_once"../template/siti_conf.php";require_once"../template/functions.php";require_once"../template/antidos.php";require_once"../template/cookies.php";require_once"../template/gzip.php";require_once"../template/header.php";require_once"../template/referer.php";include_once"../themes/$config_themes/index.php";include_once"../template/isset.php";if($gorod_otk==0){echo'<font color="#FF0000"><big><b>Доступ в город закрыт АДМИНИСТРАТОРОМ!</font></big></b><hr>';echo'<br><a href="../index.php?'.SID.'">На главную</a><br>';require_once"../../themes/$config_themes/foot.php";exit;}if(file_exists("lic.php")){echo'';}else{echo'<font color="#FF0000"><big><b>Отсутствуй файл с лицензионным соглашением!</font></big></b><hr>';echo'<br><a href="../index.php?'.SID.'">На главную</a><br>';require_once"../../themes/$config_themes/foot.php";exit;}if ($provlog==$_SESSION['log'] && $provpar==md5($_SESSION['par']) && $_SESSION['log']!="" && md5($_SESSION['par'])!="") {echo '<img src="../images/partners.gif" alt=""> <b><font color="#FFFF00">Тараканьи бега '.$title.'!</font></b><br>';if (!$action){$flot = file("../local/bega.dat"); $ulot = explode("|",$flot[0]);$time=time();$newtime=date("d",$time);$newtime2=date("H",$time);$totlot=file("../local/bega.dat"); $total=count($totlot)-1;echo'<b>Время: '.date("H:i:s",$time).'</b><br>';if($total>=2){$flot=file("../local/bega.dat"); $lotcount=count($flot);for ($b=1; $b<$lotcount; $b++) {$dt=explode("|",$flot[$b]); if ($dt[2]==$ulot[4]) {$lots[]=$dt[1];}}$wincount=count($lots);if($wincount>0){ $babki=$ulot[2];if($wincount>1){$babki=round($ulot[2]/$wincount);}for($dr=0;$dr<$wincount;$dr++){$text = file("../local/profil/$lots[$dr].prof"); $udata = explode(":||:",$text[0]); $babki2=round($udata[41]+$babki);$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].':||:'.$babki2.':||:'.$udata[42].':||:'.$udata[43].':||:'.$udata[44].':||:'.$udata[45].':||:'.$udata[46].':||:'.$udata[47].':||:'.$udata[48].':||:'.$udata[49].':||:'.$udata[50].':||:'.$udata[51].':||:'.$udata[52].':||:'.$udata[53].':||:'.$udata[54].':||:'.$udata[55].':||:'.$udata[56].':||:'.$udata[57].':||:'.$udata[58].':||:'.$udata[59].':||:'.$udata[60].':||:'.$udata[61].':||:'.$udata[62].':||:'.$udata[63].':||:'.$udata[64].':||:'.$udata[65].':||:'.$udata[66].':||:'.$udata[67].':||:'.$udata[68].':||:'.$udata[69].':||:'.$udata[70].':||:'.$udata[71].':||:'.$udata[72].':||:'.$udata[73].':||:'.$udata[74].':||:'.$udata[75].':||:'.$udata[76].':||:'.$udata[77].':||:'.$udata[78].':||:'.$udata[79].':||:'.$udata[80].':||:'.$udata[81].':||:'.$udata[82].':||:'.$udata[83].':||:'.$udata[84].':||:'.$udata[85].':||:'.$udata[86].':||:'.$udata[87].':||:'.$udata[88].':||:'.$udata[89].':||:'.$udata[90].':||:'.$udata[91].':||:'.$udata[92].':||:'.$udata[93].':||:'.$udata[94].':||:'.$udata[95].':||:'.$udata[96].':||:'.$udata[97].':||:'.$udata[98].':||:'.$udata[99].':||:'.$udata[100].':||:'.$udata[101].':||:'.$udata[102].':||:'.$udata[103].':||:'.$udata[104].':||:'.$udata[105].':||:'.$udata[106].':||:'.$udata[107].':||:'.$udata[108].':||:'.$udata[109].':||:'.$udata[110].':||:'.$udata[111].':||:'.$udata[112].':||:'.$udata[113].':||:'.$udata[114].':||:'.$udata[115].':||:'.$udata[116].':||:'.$udata[117].':||:'.$udata[118].':||:'.$udata[119].':||:'.$udata[120].':||:'.$udata[121].':||:'.$udata[122].':||:'.$udata[123].':||:'.$udata[124].':||:'.$udata[125].':||:'.$udata[126].':||:'.$udata[127].':||:'.$udata[128].':||:'.$udata[129].':||:'.$udata[130].':||:'.$udata[131].':||:'.$udata[132].':||:'.$udata[133].':||:'.$udata[134].':||:'.$udata[135].':||:'.$udata[136].':||:'.$udata[137].':||:'.$udata[138].':||:'.$udata[139].':||:'.$udata[140].':||:'.$udata[141].':||:'.$udata[142].':||:'.$udata[143].':||:'.$udata[144].':||:'.$udata[145].':||:'.$udata[146].':||:'.$udata[147].':||:'.$udata[148].':||:'.$udata[149].':||:'.$udata[150].':||:'.$udata[151].':||:'.$udata[152].':||:'.$udata[153].':||:'.$udata[154].':||:'.$udata[155].':||:'.$udata[156].':||:'.$udata[157].':||:'.$udata[158].':||:'.$udata[159].':||:'.$udata[160].':||:'.$udata[161].':||:'.$udata[162].':||:'.$udata[163].':||:'.$udata[164].':||:'.$udata[165].':||:'.$udata[166].':||:'.$udata[167].':||:'.$udata[168].':||:'.$udata[169].':||:'.$udata[170].':||:'.$udata[171].':||:'.$udata[172].':||:'.$udata[173].':||:'.$udata[174].':||:'.$udata[175].':||:'.$udata[176].':||:'.$udata[177].':||:'.$udata[178].':||:'.$udata[179].':||:'.$udata[180].':||:'.$udata[181].':||:'.$udata[182].':||:'.$udata[183].':||:'.$udata[184].':||:'.$udata[185].':||:'.$udata[186].':||:'.$udata[187].':||:'.$udata[188].':||:'.$udata[189].':||:'.$udata[190].':||:'.$udata[191].':||:'.$udata[192].':||:'.$udata[193].':||:'.$udata[194].':||:'.$udata[195].':||:'.$udata[196].':||:'.$udata[197].':||:'.$udata[198].':||:'.$udata[199].':||:'.$udata[200].':||:';$fp=fopen("../local/profil/$lots[$dr].prof","a+"); flock($fp,LOCK_EX); ftruncate($fp,0); fputs($fp,"$text");fflush($fp);flock($fp,LOCK_UN);fclose($fp);}}if($wincount>1){$ddl='Выиграли: ';}else{$ddl='Выиграл: ';}if($wincount==0){$ddl='Не выиграл никто!';}for($w=0;$w<$wincount;$w++){$winlot.=$lots[$w].', '; } $answers = array("№1.Бешеный Джо", "№2.Стрелка", "№3.Белка", "№4.Крэзи Пайп", "№5.Жирный тони", "№6.Шмыга-бегун"); $rlot = mt_rand(0, 6);if($wincount>0){$dpotsumm=500;}else{$dpotsumm=$ulot[2];}if(empty($dpotsumm)){$dpotsumm=500;}$text="|$newtime|$dpotsumm|$ulot[4]|$rlot|$ddl $winlot|";$text=preg_replace ("|[\r\n]+|si","",$text);$file=file("../local/bega.dat");$fp=fopen("../local/bega.dat","a+");flock ($fp,LOCK_EX);ftruncate ($fp,0);fputs($fp,"$text\r\n");fflush ($fp);flock ($fp,LOCK_UN);fclose($fp);}echo'Ты состоятельный человек с приличными деньгами? <br>Участвуй в тараканьих бегах! <br> Выигрывай лёгкие деньги! <br> Крупные ставки по 1000!<br><br>НАШИ ТАРАКАНЫ:<br>1.Бешеный Джо<br>2.Стрелка<br>3.Белка<br>4.Крэзи Пайп<br>5.Жирный тони<br>6.Шмыга-бегун<br>';$ulot[3]=(int)$ulot[3];if(!empty($ulot[3])){echo'<font color="red">Победил таракан: №'.$ulot[3].'</font><br>';echo 'Результат :<font color="gold"> '.$ulot[5].'</font><br>';}echo'<br>Введите номер таракана от 1 до 6 включительно';if($themes!=="WML"){echo '<br><form action="bega.php?action=bilet&amp;'.SID.'" method="post"><input name="bilet"><br>';echo '<input type="submit" value="Ставить!!!"></form>';}else{echo '<br><input name="bilet"/><br><br>';echo '<anchor title="go">Ставить!!!<go href="bega.php?action=bilet&amp;'.SID.'" method="post">';echo '<postfield name="bilet" value="$(bilet)"/>';echo '</go></anchor><br>'; }echo'<hr>В этом туре участвуют: '.$total.' игрока<br>';echo'Ставка равна 1000 монет<br>';echo'У вас в наличии монет: '.$udata[41].'<br>';}if($action=="bilet"){if(ctype_digit($bilet) && $bilet>=1 && $bilet<=6){ if($udata[41]>=1000){ $nook="yes";$lines=file("../local/bega.dat"); $count=count($lines);for ($b=0; $b<$count; $b++) {$dt=explode("|",$lines[$b]); if ($dt[1]==$log) {$ok=$b; $nook="no";}}$log=check($log);$bilet=check($bilet);$text="|$log|$bilet|";if($nook=="yes"){$fp=fopen("../local/bega.dat","a+");flock ($fp,LOCK_EX);fputs($fp,"$text\r\n");fflush ($fp);flock ($fp,LOCK_UN);fclose($fp);$ok=0;$flot = @file("../local/bega.dat"); $ulot = explode("|",$flot[0]);$ulots=$ulot[2]+50;$text="|$ulot[1]|$ulots|$ulot[3]|$ulot[4]|$ulot[5]|";$text=preg_replace ("|[\r\n]+|si","",$text);$file=file("../local/bega.dat");$fp=fopen("../local/bega.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);$babki=$udata[41]-1000;$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].':||:'.$babki.':||:'.$udata[42].':||:'.$udata[43].':||:'.$udata[44].':||:'.$udata[45].':||:'.$udata[46].':||:'.$udata[47].':||:'.$udata[48].':||:'.$udata[49].':||:'.$udata[50].':||:'.$udata[51].':||:'.$udata[52].':||:'.$udata[53].':||:'.$udata[54].':||:'.$udata[55].':||:'.$udata[56].':||:'.$udata[57].':||:'.$udata[58].':||:'.$udata[59].':||:'.$udata[60].':||:'.$udata[61].':||:'.$udata[62].':||:'.$udata[63].':||:'.$udata[64].':||:'.$udata[65].':||:'.$udata[66].':||:'.$udata[67].':||:'.$udata[68].':||:'.$udata[69].':||:'.$udata[70].':||:'.$udata[71].':||:'.$udata[72].':||:'.$udata[73].':||:'.$udata[74].':||:'.$udata[75].':||:'.$udata[76].':||:'.$udata[77].':||:'.$udata[78].':||:'.$udata[79].':||:'.$udata[80].':||:'.$udata[81].':||:'.$udata[82].':||:'.$udata[83].':||:'.$udata[84].':||:'.$udata[85].':||:'.$udata[86].':||:'.$udata[87].':||:'.$udata[88].':||:'.$udata[89].':||:'.$udata[90].':||:'.$udata[91].':||:'.$udata[92].':||:'.$udata[93].':||:'.$udata[94].':||:'.$udata[95].':||:'.$udata[96].':||:'.$udata[97].':||:'.$udata[98].':||:'.$udata[99].':||:'.$udata[100].':||:'.$udata[101].':||:'.$udata[102].':||:'.$udata[103].':||:'.$udata[104].':||:'.$udata[105].':||:'.$udata[106].':||:'.$udata[107].':||:'.$udata[108].':||:'.$udata[109].':||:'.$udata[110].':||:'.$udata[111].':||:'.$udata[112].':||:'.$udata[113].':||:'.$udata[114].':||:'.$udata[115].':||:'.$udata[116].':||:'.$udata[117].':||:'.$udata[118].':||:'.$udata[119].':||:'.$udata[120].':||:'.$udata[121].':||:'.$udata[122].':||:'.$udata[123].':||:'.$udata[124].':||:'.$udata[125].':||:'.$udata[126].':||:'.$udata[127].':||:'.$udata[128].':||:'.$udata[129].':||:'.$udata[130].':||:'.$udata[131].':||:'.$udata[132].':||:'.$udata[133].':||:'.$udata[134].':||:'.$udata[135].':||:'.$udata[136].':||:'.$udata[137].':||:'.$udata[138].':||:'.$udata[139].':||:'.$udata[140].':||:'.$udata[141].':||:'.$udata[142].':||:'.$udata[143].':||:'.$udata[144].':||:'.$udata[145].':||:'.$udata[146].':||:'.$udata[147].':||:'.$udata[148].':||:'.$udata[149].':||:'.$udata[150].':||:'.$udata[151].':||:'.$udata[152].':||:'.$udata[153].':||:'.$udata[154].':||:'.$udata[155].':||:'.$udata[156].':||:'.$udata[157].':||:'.$udata[158].':||:'.$udata[159].':||:'.$udata[160].':||:'.$udata[161].':||:'.$udata[162].':||:'.$udata[163].':||:'.$udata[164].':||:'.$udata[165].':||:'.$udata[166].':||:'.$udata[167].':||:'.$udata[168].':||:'.$udata[169].':||:'.$udata[170].':||:'.$udata[171].':||:'.$udata[172].':||:'.$udata[173].':||:'.$udata[174].':||:'.$udata[175].':||:'.$udata[176].':||:'.$udata[177].':||:'.$udata[178].':||:'.$udata[179].':||:'.$udata[180].':||:'.$udata[181].':||:'.$udata[182].':||:'.$udata[183].':||:'.$udata[184].':||:'.$udata[185].':||:'.$udata[186].':||:'.$udata[187].':||:'.$udata[188].':||:'.$udata[189].':||:'.$udata[190].':||:'.$udata[191].':||:'.$udata[192].':||:'.$udata[193].':||:'.$udata[194].':||:'.$udata[195].':||:'.$udata[196].':||:'.$udata[197].':||:'.$udata[198].':||:'.$udata[199].':||:'.$udata[200].':||:';$fp=fopen("../local/profil/$log.prof","a+"); flock($fp,LOCK_EX); ftruncate($fp,0); fputs($fp,"$text");fflush($fp);flock($fp,LOCK_UN);fclose($fp); echo'<b>Ставки сделаны! Бега состоятся при наличии двух или более участников!</b><br>';echo'Результат розыгрыша станет известным после того, как ставки сделают 2 или более участников!<br>';echo'<br>У вас в наличии монет: '.$babki.'<br>';}else{echo'Вы уже сделали ставку! Нельзя ставить дважды, это противоречит правилам тараканьих бегов!<br>';}}else{echo'Вы не можете играть на тараканьих бегах т.к. на вашем счете недостаточно денег!<br>';}}else{echo'Неверный ввод данных! Введите число от 1 до 6 включительно, обозначающее номер таракана-бегуна!<br>';}echo '<br><a href="bega.php?'.SID.'">Вернуться к бегам</a>';}}else{echo'<br>Для того чтобы играть на тараканьих бегах-вы должны быть авторизованы или зарегистрированы!<br> Для устранения этой проблемы необходимо <a href="../pages/vhod.php"> ВЫПОЛНИТЬ ВХОД</a><br> или сперва <a href="../pages/registration.php"> ЗАРЕГИСТРИРОВАТЬСЯ </a><br>';}echo'<hr>&#187; <a href="index.php?'.SID.'">В город</a><br>';echo'&#187; <a href="../index.php?'.SID.'">На главную</a>';eval(base64_decode('ZWNobyc8aHI+PGEgaHJlZj0iaHR0cDovL25tbi53ZWJob3AubmV0Ij5OTU4u
V0VCSE9QLk5FVDwvYT48YnI+JzsKaW5jbHVkZV9vbmNlKEJBU0VESVIuInRo
ZW1lcy8kY29uZmlnX3RoZW1lcy9mb290LnBocCIpOw=='));?>