Просмотр файла clikus/birzha/index.php

<?
if(!@include("birzha/head.php")) exit;
$kr=(int)$kr;
$wmr=(int)$wmr;
$id=(int)$id;
switch ($act)
{
case 'new_st':
$title='делаем ставку';
$f=new form(''.$_zapros.'&amp;mode=birzha&amp;act=add_st','post');
$f->input('text','выставить кредитов','kr','500');
$f->input('text','по цене за 1 кредит','pr','0.035');
$f->input('submit','','','выставить');
$text.=$f->get();
$text.='Минимум 500 кредитов<br />
Минимальная цена за 1кредит 0.035р!
Прежде чем выставить кредиты на продажу прочитайте </a><a href="http://clikus.ru/rulesb.php"><b><b>правила</b></a> биржи!</b>';
break;
case 'add_st':
$title='добавление ставки';
if ($kr<=$bank and $kr>=500 and $pr>=0.035)
{
mysql_query("UPDATE `".prefix."users` SET `bank`=`bank`-$kr WHERE login='".$_USER['login']."'") or die('err');
mysql_query("insert into stavki values(0,'$kr','$pr','$_USER[login]','".time()."')");
$text.='выставленно ....';
}
else
$text.='вы допустили ошибку';
break;
case 'in_money':
$title='заявка на ввод средств';
$f=new form(''.$_zapros.'&amp;mode=birzha&amp;act=in_ok_money','post');
$f->input('text','ввести рублей','kr','10');
$f->input('submit','','','ввод');
$text.=$f->get();
$text.='---<br/>
Прежде чем сделать запрос на ввод средств, прочитайте </a><a href="http://clikus.ru/rulesb.php"><b><b>правила</b></a> биржи!</b>';
break;
case 'in_ok_money':
$title='ввод средств';
if (!empty($kr))
{
mysql_query("update users set in_money='$kr' where nick='$_USER[login]';");
$text.="чтобы средства были зачислены, сделайте перевод <br /><b>$kr руб. </b><br />на<br /><b>R".file_get_contents("birzha/adm_wmr.dat")."</b><br />
в примечании укажите:<br />
<b>login=$_USER[login]</b>
<br />перевод должен быть без протекции<br/>
<a href='http://clikus.ru/info.php'><b>Информация о владельце</b></a><br/>";

########### СМС
/*	$message = "$_USER[login] hochet vvesti {$kr}r. ---
	clikus.ru";
	mail('[email protected]', '', $message);
///					 @mailsms.mobicomk.ru
*/
###########

}
else
$text.='вы не заполнили сумму';
break;
case 'out_money':
$title='заявка на вывод средств';
$f=new form(''.$_zapros.'&amp;mode=birzha&amp;act=out_ok_money','post');
$f->input('text','вывести рублей','kr','10');
$f->input('text','на кошелек','wmr','R'.$_USER['wmr']);
$f->input('submit','','','вывод');
$text.=$f->get();
$text.='---<br/>
Прежде чем сделать запрос на вывод средств, прочитайте </a><a href="http://clikus.ru/rulesb.php"><b><b>правила</b></a> биржи!</b>';
break;
case 'out_ok_money':
$title='вывод средств';
if (!empty($kr) and !empty($wmr) and $kr<=$_USER['money'])
{
mysql_query("update users set out_money='$kr',money='".($_USER['money']-$kr)."',wmr='".str_replace('R','',$wmr)."' where nick='$_USER[login]';");
$text.="в ближайшее время <br /><b>$kr руб.</b> <br />будут зачисленны на <br /><b>$wmr</b>";

########### СМС
/*	$message = "$_USER[login] hochet Vyvesti {$kr}r. na $wmr ---
	clikus.ru";
	mail('[email protected]', '', $message);
*/
###########
}
else
$text.='некорректно заполнены поля';
break;
case 'pay_kr':
$title='список ставок';
$text.='<p align="left">';
if (empty($page))
$page=0;
$q=mysql_query("select `id`,`kr`,`pr`,`nick` from stavki order by `pr`,(-stavki.`kr`) asc limit $page,15;");
while($d=mysql_fetch_array($q)){
$text.="+$d[nick] - $d[kr]kp (".($d['kr']*$d['pr'])."p / ".($d['pr']*1000).") - <a href='".$_zapros."&amp;mode=birzha&amp;act=set_id_st&amp;id=$d[id]'>купить</a>";

	if($_USER['admin'] or $_USER['moder']) 
		$text.="[<a href='".$_zapros."&amp;mode=birzha&amp;act=del_id_st&amp;id=$d[id]'>del</a>]";
$text.="<br />-----<br />";
}
$page+=15;

$text.="<a href='".$_zapros."&amp;mode=birzha&amp;act=pay_kr&amp;page=$page'>далее</a>";
$text.='</p>';
break;
case 'del_id_st':
	$title='удаление ставки';
	
	if(!$_USER['admin'] and !$_USER['moder']) 
	{
		$text .= "Только админам и модерам";
		break;
	}
		
	if (!empty($id))
	{
		$q=mysql_query("select nick,kr from stavki where `id`='$id'");
		$d=mysql_fetch_array($q);
		mysql_query("UPDATE `".prefix."users` SET `bank`=`bank`+$d[kr] WHERE login='".$d[nick]."'") or die('err');
		mysql_query("delete from stavki where `id`='$id'");
		$text.='удалена ....';
	}
	else
		$text.='не выбрана ставка';

	
	
break;
case 'set_id_st':
$title='покупаем';
$text.='<p align="left">';
$q=mysql_query("select `id`,`kr`,`pr`,`nick` from stavki where `id`='$id';");
$d=mysql_fetch_array($q);
$text.="$d[nick] - $d[kr]kp (".($d['kr']*$d['pr'])."p)<br />";
$f=new form(''.$_zapros.'&amp;mode=birzha&amp;act=pay_from_id&amp;id='.$id,'post');
$f->input('text','сколько','kr',$d[kr]);
$f->input('submit','','','купить');
$text.=$f->get();
$text.='</p>';
break;
case 'pay_from_id':
$title='покупка';
if (!empty($id))
{
$q=mysql_query("select `id`,`kr`,`pr`,`nick` from stavki where `id`='$id';");
$d=mysql_fetch_array($q);
$m=$kr*$d['pr'];
if ($kr<=$d['kr'] and $kr>0 and $m<=$_USER['money'])
{
$rkr=$d['kr']-$kr;
if ($rkr>0)
mysql_query("update stavki set kr='$rkr' where `id`='$id';");
else
mysql_query("delete from stavki where `id`='$id';");
mysql_query("update users set money=`money`-$m where `nick`='$_USER[login]';");
mysql_query("update users set money=`money`+$m where `nick`='$d[nick]';");
mysql_query("UPDATE `".prefix."users` SET `bank`=`bank`+$kr WHERE login='".$_USER[login]."'") or die('err');
//mysql_query("UPDATE `".prefix."users` SET `bank`=`bank`-$kr WHERE login='".$d[nick]."'") or die('err');
$text.="куплено $kr кредитов на сумму {$m}p";
}
else
$text.='вы допустили ошибку';
}
else
$text.='не выбрана ставка ....';
break;
case 'st':
$title='ваши ставки';
$q=mysql_query("select `id`, kr, pr, `time` from stavki where nick='$_USER[login]';");
if(mysql_num_rows($q) == 0) $text .= "Нет ставок!<br/>";
else
while($d=mysql_fetch_array($q))
$text.="$d[kr]кр- ".($d['kr']*$d['pr'])."p- <a href='".$_zapros."&amp;mode=birzha&amp;act=del_st&amp;id=$d[id]'>отозвать</a><br />";
break;
case 'del_st':
$title='удаление ставки';
if (!empty($id))
{
$q=mysql_query("select nick,kr from stavki where `id`='$id' and nick='$_USER[login]';");
$d=mysql_fetch_array($q);
mysql_query("UPDATE `".prefix."users` SET `bank`=`bank`+$d[kr] WHERE login='".$d[nick]."'") or die('err');
mysql_query("delete from stavki where `id`='$id' and nick='$_USER[login]';");
$text.='удалена ....';
}
else
$text.='не выбрана ставка';
break;
default:
$title='Биржа кредитов';
$text.='<p align="left">';
$text.="
---<br />
+<a/><a href='/rulesb.php'>Правила</a><br />
---<br />
+В банке: $bank кредитов
<br />
+Баланс: ".substr($_USER['money'],0,strlen($_USER['money'])-2)." pyб.
<br />
+Ваших ставок: ".mysql_num_rows(mysql_query("select id from stavki where nick='$_USER[login]';"))."
<br />
+Всего ставок: ".mysql_num_rows(mysql_query("select id from stavki;"))."
<br />---<br />
+<a/><a href='".$_zapros."&amp;mode=birzha&amp;act=in_money'>Ввод средств</a><br />
+<a/><a href='".$_zapros."&amp;mode=birzha&amp;act=out_money'>Вывод средств</a><br />
---<br />
+<a/><a href='".$_zapros."&amp;mode=birzha&amp;act=new_st'>Продать кредиты</a><br />
+<a/><a href='".$_zapros."&amp;mode=birzha&amp;act=pay_kr'>Купить кредиты</a><br />
---<br />
+<a/><a href='".$_zapros."&amp;mode=birzha&amp;act=st'>Ваши ставки</a><br />
---<br />";
$text.='</p>';
}
include_once('birzha/down.php');
?>