<?php
require_once ( 'config.ssp' ); // настройки игры
require_once ( 'datafunc.php' ); // функции игры
require_once ( 'game_function.php' ); // игровые функции
$tmp = $QUERY_STRING;
if ( $tmp == '' )
$tmp = $_SERVER["QUERY_STRING"];
$g_tmp = $tmp;
$tmp = urldecode( $tmp );
parse_str( $tmp );
if ( $sid && substr( $sid, 0, 2 ) != "u." )
$sid = "u." . $sid;
if ( ( !$sid && !$site ) || !$tmp )
$site = 'main';
if ( $sid )
{
$ts = explode( ".", $sid );
$tl = "u." . strtolower( $ts[1] );
if ( file_exists( "online/" . $tl ) )
{
usleep( 300000 ); // задержка выполнения скрипта на 0.3 секунды
}
}
if ( file_exists( "game.dat" ) )
{
$file_save = fopen( "game.dat", "r+" );
if ( !$file_save )
msg( "Ошибка загрузки game.dat" );
if ( flock( $file_save, 2 ) )
{
rewind( $file_save );
$game = fread( $file_save, 65535 );
$game = unserialize( $game );
if ( gettype( $game ) != "array" )
$game = array();
}
else
{
$file_save = "";
msg( "Ошибка блокировки game.dat" );
}
}
else
{
$file_save = fopen( "game.dat", "w+" );
if ( $file_save && flock( $file_save, 2 ) )
{
$f_all = 1;
include_once "f_online.dat";
include_once "f_blank.dat";
}
else
{
$file_save = "";
msg( "Ошибка создания game.dat" );
}
}
if ( $game["msg"] && $gm != $gm_id )
msg( $game["msg"] );
if ( $site )
include_once "f_site_" . preg_replace( '/\W/', "", $site ) . ".dat";
if ( time() > $game["lastai"] + 240 )
include_once "f_online.dat";
$sid = explode( ".", $sid );
$login = "u." . strtolower( $sid[1] );
if ( !$p )
$p = $sid[2];
$sid = substr( $login, 2 ) . "." . $p . "." . chr( rand( 97, 122 ) );
if ( $gm == $gm_id )
$sid .= "&gm=" . $gm_id;
if ( !file_exists( "online/" . $login ) )
{
$f_c = 1;
include_once "f_site_connect2.dat";
}
$tmp = file( "online/" . $login );
$loc = trim( $tmp[0] );
loadloc( $loc );
if ( !isset( $loc_i[$loc][$login] ) )
{
@unlink( "online/" . $login );
msg( "Нет данных" );
}
if ( $p != substr( $loc_i[$loc][$login]["user"], 0, strpos( $loc_i[$loc][$login]["user"],
"|" ) ) )
include_once ( "f_npass.dat" );
if ( $loc_i[$loc][$login]["o"] )
list( $g_list, $g_size, $g_j2loc, $g_j2go, $g_menu, $g_sounds, $g_joff, $g_smenu, $g_map,
$g_smf, $g_ch ) = explode( "|", $loc_i[$loc][$login]["o"] );
if ( $cnick )
include_once "f_cnick.dat";
if ( $go )
{
if ( $loc == "x927x253" && $go == "x902x254" )
msg( "Стражник: Стой!" );
if ( $go == "x1746x545" && strpos( $loc_i[$loc][$login]["items"], "i.q.keykrep" ) === false )
msg( "Без ключа не пройти" );
if ( $loc == "x216x1099" && $go == "x138x1380" )
msg( "между вами и входом в шахту встает грозный гном, с гиганским двухсторонним топором, на плече. Явно запрещая вам пройти в нутрь" );
if ( $loc == "x233x2330" && $go == "_begi" && strpos( $loc_i[$loc][$login]["items"],
"i.q.keykrep1" ) === false )
msg( "А вы симпотично смотритесь ;)" );
if ( $loc == "x154x1540" && $go == "x155x1540" )
msg( "Ангел сверхестественной силой не дает вам двигаться дальше" );
if ( $go == "x393x1167" && ( $game["fid"] == $login ) )
msg( "С флагом на борт запрещено!" );
if ( $go == "x33x1252" && ( $game["fid"] == $login ) )
msg( "С флагом на борт запрещено!" );
if ( $go == "x435x1167" && ( $game["fid"] == $login ) )
msg( "С флагом на борт запрещено!" );
if ( $go == "x287x1252" && ( $game["fid"] == $login ) )
msg( "С флагом на борт запрещено!" );
$loc_c = explode( "|", $loc_tt[$loc]["d"] );
$b = array_search( $go, $loc_c );
if ( $b )
{
$tgo = $loc_c[$b - 1];
loadloc( $go );
$b = 0;
$char = explode( "|", $loc_i[$loc][$login]["char"] );
$skills = explode( "|", $loc_i[$loc][$login]["skills"] );
if ( rand( 1, 100 ) <= $skills[17] * 8 )
$hide = 1;
else
$hide = 0;
if ( $gal && $char[12] )
{
$loc_c = explode( "|", $loc_tt[$go]["d"] );
$b = array_search( $tgo, $loc_c );
}
if ( !$b )
$tgo = "";
addnpc( $login, $loc, $go, $tgo, $hide );
if ( $b )
addnpc( $login, $loc, $loc_c[$b + 1], 1, $hide );
}
}
if ( $game["fid"] == $login )
$game["floc"] = $loc;
if ( !$game["floc"] || isset( $loc_tt[$game["floc"]] ) && !isset( $loc_i[$game["floc"]]["i.flag"] ) &&
!isset( $loc_i[$game["floc"]][$game["fid"]] ) )
{
$loc_i[$loc]["i.flag"] = "флаг лидерства|1|0";
$game["floc"] = $loc;
$game["fid"] = "";
}
if ( $ctele )
include_once "f_castle.dat";
if ( $stele )
include_once "f_stele.dat";
$loc_c = explode( "|", $loc_tt[$loc]["d"] );
for ( $i = 2; $i < count( $loc_c ); $i += 2 )
loadloc( $loc_c[$i + 1] );
doai( $loc );
for ( $i = 2; $i < count( $loc_c ); $i += 2 )
doai( $loc_c[$i + 1] );
if ( !isset( $loc_i[$loc][$login] ) || !$login )
{
@unlink( "online/" . $login );
msg( "Нет данных" );
}
$char = explode( "|", $loc_i[$loc][$login]["char"] );
if ( $ce )
include_once "f_logout.dat";
$ip2 = $loc_i[$loc][$login]["ip"];
if ( $ip2 && $ip2 != $ip1 && $ip2 != $ip && $gm != $gm_id )
include_once ( "f_nip.dat" );
// подгружаемые модули
if ( $cm )
if ( $cm > 0 && $cm < 9 )
{
$cm--;
$m = @explode( "/", $loc_i[$loc][$login]["macro"] );
$m = @explode( "|", $m[$cm] );
$ml = @explode( "|", $loc_i[$loc][$login]["macrol"] );
if ( $m[0] == "last" && $ml[0] )
eval( '$' . $ml[0] . "=\"" . $ml[1] . "\";" );
else
if ( $m[0] )
eval( '$' . $m[0] . "=\"" . $m[1] . "\";" );
if ( $m[2] == "last" && $m[0] == "ca" )
$ca = $ml[1];
else
if ( $m[2] == "last" && $ml[2] )
eval( '$' . $ml[2] . "=\"" . $ml[3] . "\";" );
else
if ( $m[2] )
eval( '$' . $m[2] . "=\"" . $m[3] . "\";" );
}
else
include_once "f_macro.dat";
if ( $adm && file_exists( "f_admin.dat" ) )
include_once "f_admin.dat";
if ( $speak || $speak = $cs )
if ( substr( $speak, 0, 2 ) == "i." )
$take = $speak;
else
include_once "f_speak.dat";
if ( $take )
include_once "f_take.dat";
if ( $say )
include_once "f_say.dat";
if ( $ca )
{
$loc_i[$loc][$login]["macrol"] = "ca|$ca||";
$char[7] = $ca;
$loc_i[$loc][$login]["char"] = implode( "|", $char );
attack( $loc, $login, $ca );
$char = explode( "|", $loc_i[$loc][$login]["char"] );
}
if ( $drop )
include_once "f_drop.dat";
if ( $use )
{
$loc_i[$loc][$login]["macrol"] = "use|$use|to|$to";
if ( $char[6] - time() > 120 )
$char[6] = time() - 1;
if ( time() > $char[6] )
{
if ( $char[8] && $login != "u.qv" )
msg( "<p>Вы призрак, найдите лекаря или камень воскрешения" );
if ( substr( $use, 0, 6 ) == 'i.note' || substr( $use, 0, 6 ) == 'i.book' )
$look = $use;
else
{
$scroll = 0; // со свитка
if ( substr( $use, 0, 2 ) == "i." )
include_once "f_useitem.dat";
else
if ( substr( $use, 0, 2 ) == "m." )
include_once "f_usemagic.dat";
else
if ( substr( $use, 0, 2 ) == "p." )
include_once "f_usepriem.dat";
else
if ( substr( $use, 0, 6 ) == "skill." )
include_once "f_useskill.dat";
$char = explode( "|", $loc_i[$loc][$login]["char"] );
}
}
else
addjournal( $loc, $login, "Вы должны отдохнуть " . round( $char[6] - time() + 1 ) . " сек" );
} // раньше $list
if ( $look || $look = $ci )
include_once "f_look.dat"; // после $take и $use
if ( $msg )
include_once "f_msg.dat";
if ( $trade )
include_once "f_trade.dat";
if ( $cl == "i" )
$cl = "inv";
if ( $cl == "m" )
$cl = "magic";
if ( $cl == "p" )
$cl = "priem";
if ( $list || $list = $cl )
include_once "f_list" . $list . ".dat";
if ( $map )
include_once "f_map.dat";
// MAIN PAGE
$stmp = "";
if ( $loc_i[$loc][$login]["msgt"] )
$stmp .= "<a href=\"$PHP_SELF?sid=$sid&msg=1\">[msg]</a><br/>";
$stmp .= $char[1] . "/" . $char[2] . " (" . $char[3] . "/" . $char[4] . ")";
$st = "";
if ( $char[12] )
$st .= " всадник";
if ( $char[8] )
$st .= " призрак";
if ( $char[9] )
$st .= " " . $char[9] . " (" . ( round( ( $char[10] - time() ) / 60 ) + 1 ) . " мин)";
if ( $game["fid"] == $login )
$st .= " c флагом!";
if ( $st )
$stmp .= ", вы " . $st;
if ( $loc_i[$loc][$login]["def"] )
{
$tdef = explode( "|", $loc_i[$loc][$login]["def"] );
if ( time() > $tdef[2] )
$loc_i[$loc][$login]["def"] = "";
else
$stmp .= "<br/>" . $tdef[1] . " (" . ( $tdef[2] - time() ) . " сек)";
}
if ( substr( $loc, 3 ) == ".in" || substr( $loc, 3 ) == ".gate" )
include_once "f_castle.dat";
// SOUNDS
if ( !$g_sounds )
{
$st = "";
for ( $i = 2; $i < count( $loc_c ); $i += 2 )
if ( $loc_c[$i + 1] != $loc )
{
if ( count( $loc_i[$loc_c[$i + 1]] ) > 0 )
{
foreach ( $loc_i[$loc_c[$i + 1]] as $j => $val )
if ( ( substr( $j, 0, 2 ) == 'u.' ) || substr( $j, 0, 2 ) == 'n.' )
{
if ( $st == '' )
$st = "<br/>Звуки: " . $loc_c[$i];
else
$st .= ", " . $loc_c[$i];
break;
}
}
}
$stmp .= $st;
}
// OBJECTS
$ti = explode( "x", $loc );
if ( !$start )
$start = 0;
$keys = array_keys( $loc_i[$loc] );
for ( $i = $start; $i < $start + $g_list && $i < count( $keys ); $i++ )
if ( $keys[$i] != $login )
{
if ( substr( $keys[$i], 0, 2 ) == "i." )
{
$tmp = explode( "|", $loc_i[$loc][$keys[$i]] );
$k = $tmp[0];
if ( strpos( $keys[$i], ".." ) !== false )
$k .= " *";
if ( substr( $keys[$i], 0, 4 ) != "i.s." && $tmp[1] > 1 )
$k .= " (" . $tmp[1] . ")";
}
if ( substr( $keys[$i], 0, 2 ) == "n." || substr( $keys[$i], 0, 2 ) == "u." )
{
$tmp = explode( "|", $loc_i[$loc][$keys[$i]]["char"] );
$k = $tmp[0];
if ( substr( $keys[$i], 0, 2 ) == "u." && $tmp[12] )
$k .= " (всадник)";
$st = '';
if ( $tmp[1] != $tmp[2] )
if ( round( $tmp[1] * 100 / $tmp[2] ) < 100 )
$st .= round( $tmp[1] * 100 / $tmp[2] ) . "%";
if ( $game["floc"] == $loc && $game["fid"] == $keys[$i] )
$st .= " с флагом!";
if ( substr( $keys[$i], 0, 2 ) == "u." )
{
if ( $tmp[8] )
$st .= " призрак";
if ( $ti[2] >= 1099 && $ti[2] <= 1370 && $tmp[14] == "t" )
$st .= " тамплиер";
if ( $ti[2] >= 1099 && $ti[2] <= 1370 && $tmp[14] == "p" )
$st .= " пират";
}
if ( $tmp[9] )
$st .= " " . $tmp[9];
if ( $tmp[7] && isset( $loc_i[$loc][$tmp[7]] ) && ( substr( $keys[$i], 0, 2 ) == "n." ||
substr( $keys[$i], 0, 2 ) == "u." && $loc_c[1] != 1 ) )
{
$tmp1 = explode( "|", $loc_i[$loc][$tmp[7]]["char"] );
if ( substr( $tmp[7], 0, 2 ) == "n." || ( substr( $tmp[7], 0, 2 ) == "u." && !$tmp1[8] ) )
{
$st .= " атакует ";
if ( $tmp[7] == $login )
$st .= "вас!";
else
$st .= preg_replace( "/ \*.*?\*/", "", $tmp1[0] );
}
}
if ( $st )
$k .= " [" . trim( $st ) . "]";
}
$stmp .= "<br/><anchor>" . $k . "<go href=\"#m\"><setvar name=\"to\" value=\"" . $keys[$i] .
"\"/>";
$stmp .= "</go></anchor>";
}
if ( count( $keys ) > 1 && $start )
{
$stmp .= "<br/><a href=\"$PHP_SELF?sid=$sid\">^ </a>";
}
if ( $start + $g_list < count( $keys ) )
{
if ( !$start )
$stmp .= "<br/>";
$stmp .= "<a href=\"$PHP_SELF?sid=$sid&start=" . ( $start + $g_list ) . "\">+ (" . ( count
( $keys ) - $start - $g_list ) . ")</a>";
}
// EXITS
$stmp .= "<br/>---";
for ( $i = 2; $i < count( $loc_c ); $i += 2 )
{
$stmp .= "<br/><a href=\"$PHP_SELF?sid=$sid&go=" . $loc_c[$i + 1] . "\">" . $loc_c[$i] .
"</a>";
if ( $char[12] && strpos( $loc_tt[$loc_c[$i + 1]]["d"], $loc_c[$i] . "|" ) !== false )
$stmp .= "<a href=\"$PHP_SELF?sid=$sid&gal=1&go=" . $loc_c[$i + 1] . "\">*</a>";
if ( $g_sounds && count( $loc_i[$loc_c[$i + 1]] ) > 0 )
foreach ( $loc_i[$loc_c[$i + 1]] as $j => $val )
if ( ( substr( $j, 0, 2 ) == 'u.' ) || substr( $j, 0, 2 ) == 'n.' )
{
$stmp .= " !";
break;
}
}
$stmp .= "<br/><a href=\"$PHP_SELF?sid=$sid\">обновить</a>";
if ( file_exists( "loc_f/" . $loc ) )
$stmp .= "<br/><a href=\"$PHP_SELF?sid=$sid&ci=1\">Инфo</a>";
if ( $game["fid"] == $login && $game["floc"] == $loc )
$stmp .= "<br/><a href=\"$PHP_SELF?sid=$sid&drop=f\">Бросить флаг</a>";
if ( $login == $g_admin || ( $gm_id && $gm == $gm_id ) )
$stmp .= "<br/><a href=\"$PHP_SELF?sid=$sid&adm=rsn\">res</a><br/><a href=\"$PHP_SELF?sid=$sid&adm=smp&fmust=1\">admin</a>";
// MENU
$stmp .= "</p></card><card id=\"m\" title=\"Меню\"><p><a href=\"$PHP_SELF?sid=$sid&cs=$(to)\">Говорить/Взять</a><br/><a href=\"$PHP_SELF?sid=$sid&ca=$(to)\">Атаковать</a>";
$b = "<br/>";
$ts = array( "", "", "m", "магия", "i", "предмет", "p", "прием" );
for ( $i = 0; $i < strlen( $g_smenu ); $i += 2 )
if ( $ts[$g_smenu{$i} * 2] )
{
$stmp .= $b . "<a href=\"$PHP_SELF?sid=$sid&to=$(to)&cl=" . $ts[$g_smenu{$i} * 2] . "\">" .
$ts[$g_smenu{$i} * 2 + 1] . "</a>";
$b = ", ";
for ( $j = 1; $j <= $g_smenu{$i + 1}; $j++ )
$stmp .= "<a href=\"$PHP_SELF?sid=$sid&to=$(to)&use=" . $ts[$g_smenu{$i} * 2] . "." . $j .
"\">" . $j . "</a>";
}
$stmp .= "<br/><a href=\"$PHP_SELF?sid=$sid&ci=$(to)\">Инфo</a>";
if ( strpos( $loc_c[0], "*" ) !== false )
$loc_c[0] = substr( $loc_c[0], 0, strpos( $loc_c[0], "*" ) );
msg( $stmp, $loc_c[0], 1, 'main' );
exit;
?>