<?php
require_once"../template/start.php";
require_once"../template/regglobals.php";
require_once"../template/config.php";
require_once"../template/functions.php";
require_once"../template/maincore.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";
$text = @file("../local/profil/$log.prof");
if ($text!=""){
$udata = explode(":||:",$text[0]);
$provlog=trim($udata[0]);
$provpar=trim($udata[1]);
$privat=trim($udata[10]);}
echo'<img src="../images/img/many.gif" alt=""> Биржа<br><br>';
if (!$_SESSION['log']=="" && !md5($_SESSION['par'])=="" && md5($_SESSION['par'])==$provpar && $_SESSION['log']==$provlog ) {
if($udata[10]>0){
echo'<img src="../images/img/mail.gif" alt=""> <b><a href="../pages/privat.php?'.SID.'"><font color="red">Приватное сообщение! ('.$privat.')</font></a></b><br>';}
if(!isset($action)){
echo'Привет '.check($log).'<br>';
echo'У вас в наличии золотых монет: '.(int)$udata[41].'<br>';
$text = file("../local/birga/$log.dat");
if ($text!=""){
$acts=count($text);
for ($p=0; $p<$acts; $p++) {
$dat_arr1 = explode("|", $text[$p]);
if($dat_arr1[0]==$uz){
echo 'У вас есть акции '.$dat_arr1[0].' '.$dat_arr1[1].'шт. Цена закупки '.$dat_arr1[2].' монет.<br>';}}}else{echo'У вас пока нет акций<br>';}
$text = file("../local/birga.dat");
$acts=count($text);
for ($p=0; $p<$acts; $p++) {
$dat_arr1 = explode("|", $text[$p]);
if($dat_arr1[0]==$uz){
echo 'На бирже есть акции '.$dat_arr1[0].' '.$dat_arr1[3].'шт. Цена: '.$dat_arr1[1].'монет<br>';}}
echo '<br><b>Количество:</b>';
if($config_themes!=="wml"){
echo '<br><form action="opbir.php?action=operacia&uz='.$uz.'&'.SID.'" method="post"><input name="gold" /><br>';
echo '<select name="oper">';
echo '<option value="1">Купить</option><option value="2">Продать</option>';
echo '</select><br><br>';
echo '<input type="submit" value="Продолжить" /></form><hr>';}else{
echo '<br><input name="gold"/><br>';
echo '<select name="oper">';
echo '<option value="1">Купить</option><option value="2">Продать</option>';
echo '</select><br><br>';
echo '<anchor title="go">Продолжить<go href="opbir.php?action=operacia&'.SID.'" method="post">';
echo '<postfield name="gold" value="$(gold)"/>';
echo '<postfield name="uz" value="$(uz)"/>';
echo '<postfield name="oper" value="$(oper)"/>';
echo '</go></anchor><br>'; }}
////////////////////////////////////////////////////////////////////////////////////
if($action=="operacia"){
if(ctype_digit($gold) && $gold>=1 && $oper!=""){
///////////////////////////////////////////////////////////////////
if($oper=="1"){echo'Покупка<br>';
$lines=file("../local/birga.dat");
$acts=count($lines);
for ($p=0; $p<$acts; $p++) {
$dt = explode("|", $lines[$p]);
if($dt[0]==$uz){ $poz=$p;$naz=$dt[0];$zena=$dt[1];$zenav=$dt[2];$kolvo=$dt[3];}}
if($zena!=="" && $zena>"0"){
$newzena=$zena*$gold;
$ostat=$kolvo-$gold;
$ostden=$udata[41]-$newzena;
if($ostat<0){header ("Location: birga.php?isset=actns&".SID); exit;}
if($ostden<0){header ("Location: birga.php?isset=money&".SID); exit;}
//------------------------------ Запись в профиль ----------------------------//
$ufile = file(BASEDIR."local/profil/$log.prof");
$udata = explode(":||:",$ufile[0]);
$udata[41]=round($udata[41]-$newzena);
for ($u=0; $u<$config_userprofkey; $u++){
$utext.=$udata[$u].':||:';}
if($udata[0]!="" && $udata[1]!="" && $udata[4]!="" && $utext!=""){
$fp=fopen("../local/profil/$log.prof","a+");
flock($fp,LOCK_EX);
ftruncate($fp,0);
fputs($fp,$utext);
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
unset($utext);
}
$text=$naz.'|'.$zena.'|'.$zenav.'|'.$ostat.'|';
$text=stripslashes($text);
$file=file("../local/birga.dat");
$fp=fopen("../local/birga.dat","a+");
flock ($fp,LOCK_EX);
ftruncate ($fp,0);
for ($i=0;$i< sizeof($file);$i++) {if ($poz!=$i) {fputs($fp,$file[$i]);} else {fputs($fp,"$text\r\n");}}
fflush ($fp);
flock ($fp,LOCK_UN);
fclose($fp);
$nook="yes";
$lines=file("../local/birga/$log.dat");
$count=count($lines);
for ($b=0; $b<$count; $b++) {
$dt=explode("|",$lines[$b]); if ($dt[0]==$naz) {$ok=$b; $mann=$dt[1]; $nook="no";}}
$newgold2=round($mann+$gold);
$text=$naz.'|'.$newgold2.'|'.$zena.'|';
$text=stripslashes($text);
if($nook=="no"){
$file=file("../local/birga/$log.dat");
$fp=fopen("../local/birga/$log.dat","a+");
flock ($fp,LOCK_EX);
ftruncate ($fp,0);
for ($i=0;$i< sizeof($file);$i++){
$kot=explode("|",$file[$i]);
if($kot[1]!=""){
if ($ok!=$i) {fputs($fp,$file[$i]);} else {fputs($fp,"$text\r\n");}}}
fflush ($fp);
flock ($fp,LOCK_UN);
fclose($fp);}
if($nook=="yes"){
$fp=fopen("../local/birga/$log.dat","a+");
flock ($fp,LOCK_EX);
fputs($fp,"$text\r\n");
fflush ($fp);
flock ($fp,LOCK_UN);
fclose($fp);}
echo'Акции успешно закуплены!<br>';
}}
//////////////////////////////
if($oper=="2"){echo'Продажа<br>';
$text=file("../local/birga.dat");
$acts=count($text);
for ($p=0; $p<$acts; $p++) {
$dt = explode("|", $text[$p]);
if($dt[0]==$uz){ $poz=$p;$naz=$dt[0];$zena=$dt[1];$zenav=$dt[2];$kolvo=$dt[3];}}
$lines=file("../local/birga/$log.dat");
$cc=count($lines);
for ($b=0; $b<$cc; $b++) {
$dt=explode("|",$lines[$b]); if ($naz==$dt[0]) {$ok=$b;$colact=$dt[1];$zen=$dt[2];}}
$newzena=$zena*$gold;
$nn=$colact-$gold;
///if($nn<0){header ("Location: birga.php?isset=actns&".SID); exit;}
if($nn>-1){
//------------------------------ Запись в профиль ----------------------------//
$ufile = file(BASEDIR."local/profil/$log.prof");
$udata = explode(":||:",$ufile[0]);
$udata[41]=round($udata[41]+$newzena);
for ($u=0; $u<$config_userprofkey; $u++){
$utext.=$udata[$u].':||:';}
if($udata[0]!="" && $udata[1]!="" && $udata[4]!="" && $utext!=""){
$fp=fopen("../local/profil/$log.prof","a+");
flock($fp,LOCK_EX);
ftruncate($fp,0);
fputs($fp,$utext);
fflush($fp);
flock($fp,LOCK_UN);
fclose($fp);
unset($utext);
}
if($nn=="0"){$text="";}else{
$text=$naz.'|'.$nn.'|'.$zen.'|';}
$text=stripslashes($text);
$file=file("../local/birga/$log.dat");
$fp=fopen("../local/birga/$log.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);
$newgold2=round($kolvo+$gold);
$text=$naz.'|'.$zena.'|'.$zenav.'|'.$newgold2.'|';
$text=stripslashes($text);
$file=file("../local/birga.dat");
$fp=fopen("../local/birga.dat","a+");
flock ($fp,LOCK_EX);
ftruncate ($fp,0);
for ($i=0;$i< sizeof($file);$i++) {if ($poz!=$i) {fputs($fp,$file[$i]);} else {fputs($fp,"$text\r\n");}}
fflush ($fp);
flock ($fp,LOCK_UN);
fclose($fp);
echo'Акции успешно проданы!<br>';}else{echo'У вас пока нет акций!';}}
}}
echo'<br><a href="birga.php?'.SID.'">На биржу</a>';
}else{echo'<br>Для того чтобы совершать операции вы должны быть авторизованы<br>';}
echo'<br><a href="../index.php?'.SID.'">На главную</a>';
include_once"../themes/$config_themes/foot.php";
?>