File size: 7.51Kb
<?
list($msec,$sec)=explode(chr(32),microtime());$HeadTime=$sec+$msec;
header('Cache-Control: no-store, no-cache, must-revalidate'); // HTTP/1.1
header ("Content-type:text/vnd.wap.wml; charset=utf-8");
$ref=rand(10000,1000000);
require("inc.php");
function getmicrotime() //Микровремя
{
list($usec, $sec) = explode(" ", microtime());
return ((float)$usec + (float)$sec);
}
$link = @mysql_pconnect ($MySQL_Hostname, $MySQL_Username, $MySQL_Password)
or die ("<wml><card id=\"error\" title=\"error\">
<do type=\"prev\" label=\"Back\"><prev/></do><p align=\"center\"><small>Can not connect to MySQL</small></p>
</card></wml>");
@mysql_select_db($MySQLDatabasename) or die ("<wml><card id=\"error\" title=\"error\">
<do type=\"prev\" label=\"Back\"><prev/></do><p align=\"center\"><small>error select the database...</small></p>
</card></wml>");
$result = @mysql_query ("Select pass,user,posts,level,user_ip,user_soft,gposts from users where id='".$id."' LIMIT 1;");
if (mysql_affected_rows() == 0) {
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>";
echo "<card id=\"error\" title=\"Ошибка\" ontimer=\"index.php?ref=$ref\"><timer value=\"15\"/>";
echo "<p align=\"center\"><small>";
echo "Юзер не найден!";
echo "</small></p></card></wml>";
mysql_close($link);
exit;
}
$row = mysql_fetch_array ($result);
if ($ps !== $row["pass"]){
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>";
echo "<card id=\"error\" title=\"Ошибка\" ontimer=\"index.php?ref=$ref\"><timer value=\"15\"/>";
echo "<p align=\"center\"><small>";
echo "Не верное сочетание ника и пароля!";
echo "</small></p></card></wml>";
mysql_close($link);
exit;
}
//Бан по ip-soft
mysql_query ("Select `klu4` from bannlist WHERE (ip = '".$addr."')and(soft = '".$agent."') LIMIT 1;");
if ((mysql_affected_rows()!=0)&&($rm!=9))
{
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>";
echo "<head><meta http-equiv=\"Cache-Control\" content=\"no-cache\" forua=\"true\"/></head>";
echo "<card id=\"ban\" title=\"Стоп!\" ontimer=\"index.php?ref=$ref\"><timer value=\"300\"/>";
echo "<p align=\"center\"><small>";
echo "Вы забанены по связке ip+soft!!!<br/>";
echo "Р? доступ вам разрешен только РІ <a href=\"chat.php?id=$id&ps=$ps&rm=9&rul=9&ref=$ref\">Сортир</a>";
echo "</small></p></card></wml>";
mysql_close($link);
exit;
}
//End ip-soft
$uposts=$row['posts'];
$ugposts=$row['gposts'];
$posts=$row['posts'];
$time=date ("H:i");
print "<?xml version=\"1.0\" encoding=\"UTF-8\"?>";
echo "<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">\n";
echo "<wml>\n";
echo "<card id=\"room\" title=\"Кости\" >\n";
echo "<do type=\"options\" name=\"pri\" label=\"Прихожая\"><go href=\"enter.php?id=$id&ps=$ps&ref=$ref\"/></do>\n";
echo "<p mode=\"wrap\">\n";
switch($mod) {
default:
echo "<b>Сыграем?</b><br/><br/>Правила таковы: кости кидаете Вы, потом Мастер костей. Если Вы выигрываете, получаете посты. Проигрываете, посты снимаются. Все предельно просто. Если у Вас меньше выбранного количества постов, играть нельзя.<br/><br/>\n";
echo "<b>У вас постов:</b>$uposts<br/>\n";
echo "<b>Ваш баланс:</b>$ugposts<br/>\n";
echo "<br/>Ваша ставка:<br/>
<select name=\"stav\" title=\"Stavka\" value=\"20\">
<option value=\"20\">20</option>
<option value=\"40\">40</option>
<option value=\"60\">60</option>
<option value=\"100\">100</option>
<option value=\"200\">200</option>
</select><br/>\n";
echo "<a href=\"kosti.php?id=$id&ps=$ps&mod=start&stavka=$(stav)&ref=$ref\">Играть</a><br/>\n";
echo "<a href=\"enter.php?id=$id&ps=$ps&ref=$ref\">Прихожая</a>\n";
break;
case 'start':
if ($stavka!=20 && $stavka!=40 && $stavka!=60 && $stavka!=100 && $stavka!=200)
{
echo "Меняем ставку вручную? Не выйдет!)<br/>";
} else {
if ($stavka>$posts) {
echo "У вас недостаточно постов для игры!<br/>";
} else {
$pl1=rand(1,6);
$pl2=rand(1,6);
$m1=rand(1,6);
$m2=rand(1,6);
$spl=$pl1+$pl2;
$sm=$m1+$m2;
echo "<b>У вас постов:</b>$uposts<br/>\n";
echo "<b>Ваш баланс:</b>$ugposts<br/><br/>\n";
echo "Вы выбросили: $pl1 и $pl2 <br/>";
echo "Мастер костей выбросил: $m1 и $m2 <br/><br/>";
if ($spl > $sm)
{
echo "Вы победили!<br/>";
mysql_query ("Update users set posts=posts+'".$stavka."', gposts=gposts+'".$stavka."' where id ='".$id."'");
$nuposts=$uposts+$stavka;
echo "Постов стало: $nuposts <br/>";
}
if ($spl < $sm)
{
echo "Вы проиграли!<br/>";
mysql_query ("Update users set posts=posts-'".$stavka."', gposts=gposts-'".$stavka."' where id ='".$id."'");
$nuposts=$uposts-$stavka;
echo "Постов стало: $nuposts <br/>";
}
if ($spl == $sm)
{
echo "Ничья!<br/>";
}
echo "<br/><a href=\"kosti.php?id=$id&ps=$ps&mod=start&stavka=$(stav)&ref=$ref\">Играть ещё!</a><br/>\n";
echo "<a href=\"kosti.php?id=$id&ps=$ps&ref=$ref\">Сменить ставку!</a><br/>\n";
}
}
echo "<a href=\"enter.php?id=$id&ps=$ps&ref=$ref\">Прихожая</a><br/>\n";
break;
}
list($msec,$sec)=explode(chr(32),microtime());
echo "<br/><small>[".round(($sec+$msec)-$HeadTime,4)."]</small>";
echo "</p>\n";
echo "</card>\n";
echo "</wml>\n";
mysql_close($link);
?>