<?php
if ($p['admin'] > 1) {
if (isset($_GET['count'])) {
$count = preg_replace('/[^-0-9]/', '', $_GET['count']);
$login = preg_replace('/[^a-z_0-9]/', '', $_GET['login']);
if (!$login) {
$login = $LOGIN;
}
if (!$count) {
$count = 1;
}
include_once 'modules/f_gain_silver.php';
gain_silver($count, $login);
} else {
$f = '<form action="game.php" method="get">';
$f .= '<input type="hidden" name="sid" value="' . $sid . '"/>';
$f .= '<input type="hidden" name="action" value="a_gain_silver"/>';
$f .= 'login(or nothing):<br/><input type="text" name="login"/>';
$f .= '<br/>count:<br/><input type="text" name="count"/>';
$f .= '<input type="submit" value="get it!"/>';
$f .= '</form>';
exit_msg('get silver', $f);
}
}
include_once 'modules/f_gain_peace_exp.php';
gain_peace_exp(50, $LOGIN);
include_once 'modules/f_delete_count.php';
delete_count('i.q.hun.rabbit_fur', 1, $LOGIN);
}
$spf['fur'] = 'А я думал уже и не придешь. Ладно, оставь шкуру при себе, изрезанная она какая-то, даже шапку делать из нее стыдно... Теперь ты можешь быть только воином, путь ты себе выбрал, яб даже сказал, на свою голову. Или еще похлеще как-нибудь). Вообщем слушай далее. Во время битвы почти всегда ты получишь ранения. А потеряв много крови человек умирает, по биологии наверно тебя учили этому? Так вот, нам этого соовсем ненадо. Кровотечение можно остановить разными способами. Но для тебя самый доступный - это приложить подорожник, так-сказать, секретное биологическое оружие ) Если ты не знаком с целительством, все травы будут выглядеть для тебя одинакого. Но подорожник всегда растет у тропинок, дорог. Так что принеси мне один, чтоб доказать, что умеешь его отличить.';
} elseif ($p['smq'][0] == 2 && $c_pod) {
$bec1 = '|pod~а я, кстати, подорожник принес';
$bec2 = $bec1;
if ($part == 'pod') {
$p['smq'][0] = 3;
do_mysql("UPDATE players SET smq = '" . $p['smq'] . "' WHERE login = '******';");
include_once 'modules/f_gain_peace_exp.php';
gain_peace_exp(50, $LOGIN);
include_once 'modules/f_gain_silver.php';
gain_silver(500, $LOGIN);
include_once 'modules/f_delete_count.php';
delete_count('i.f.tra.podorozhnik', 1, $LOGIN);
}
$spf['pod'] = 'Вижу прогресс! Но все-таки, в следующий раз подорожник рви не по середине листа... Чтож, дам я тебе последнее испытание. Воин должен быть смелым! В лесу Красной птици нечисть завелась. Есть там такая избушка, в ней ведьма и кот черный. У того кота табакерка есть старинная, на трупе найдешь. Ведьму как хочешь, но наврятли она стоять и ждать пока ты кота распотрашишь будет. Принесешь табакерку - докажешь, что с табой хоть на урков идти можно. Вообщем, иди добывай )';
} elseif ($p['smq'][0] > 2 && $c_tab) {
$bec1 = '|tab~ну вот, и последнее задание я выполнил';
$bec2 = $bec1;
if ($part == 'tab') {
$p['smq'][0] = 7;
$p['classof'] = 1;
do_mysql("UPDATE players SET smq = '" . $p['smq'] . "', classof = '1' WHERE login = '******';");
include_once 'modules/f_gain_peace_exp.php';
gain_peace_exp(100, $LOGIN);
include_once 'modules/f_delete_count.php';
delete_count('i.q.que.tabakerka', 1, $LOGIN);
delete_count('i.q.hun.feather', 1, $LOGIN);
include_once 'modules/f_gain_item.php';
gain_item('i.m.arr.arr', 1, $LOGIN);
}
}
if ($p['smq'][1] == 4) {
$bec .= '|end~Прослушал я туториал. Все?';
$spf['end'] = 'Все. Держи серебра, это тебе на объучение. Иди теперь во дворец, к Лорду. Должны тебя уже впустить, и грамоту выдать. Служи верно!';
if ($part == 'end') {
$p['smq'][1] = 5;
$p['classof'] = 1;
do_mysql("UPDATE players SET smq = '" . $p['smq'] . "', classof = '2' WHERE login = '******';");
include_once 'modules/f_gain_peace_exp.php';
gain_peace_exp(50, $LOGIN);
include_once 'modules/f_gain_silver.php';
gain_silver(700, $LOGIN);
}
}
} else {
$bec = '';
}
$spf['start'] = 'Здравствуй) Как поживаешь?|gut~Привет, хорошо|who~Жить можно. Кто ты?';
$spf['gut'] = 'Рада за тебя. Чем я могу тебе помочь?|learn~я хотел бы узнать что-то новое.' . $bec;
$spf['who'] = 'Я Робина - воительница лучница. Чем могу помочь?|learn~немогла бы ты меня обучить чему либо?';
$spf['learn'] = 'Я и сама не прочь что нибудь новое, да ты наверняка не об этом. Так, новичков разных за деньги объучаю, тем и живу... Не взяли меня За Мост... Так что тебе? Только учти что оружием лучника я тебя пользоватся объучть небуду, если ты не лучник по классу.|learn_ukl1~покажи мне, как уклонятся от вражеских ударов|learn_bow1~Научи меня пользоватся луком|learn_arb1~а арбалетом ты владеешь?' . $bec;
$spf['learn_ukl1'] = 'Уклонятся - это просто. Надо только гибкое тело иметь. Дай 500монет и я тебе пару примеров, ну а дальше, думаю, ты сам разберешся.|learn_ukl~держи|learn~а что-нибудь другое?';
$spf['learn_bow1'] = 'Небуду хвастатся, но луком я владею мастерски! И в салаты добавляю, и в супа... А, ты не про этот лук? Ну чтож, с боевым потяжелее будет. Но за серебра эдак 700, я постораюсь чтоб тебе все стало понятно, что с луком связанно. И даже больше, я покажу, как я стреляю.|learn_bow~учи, сенсейка)|learn~Да я какраз пищевой и имел ввиду. Но раз такому не учишь, давай какойнибудь другой навык?';
$spf['learn_arb1'] = 'Я? Конечно владею. Но нелюблю, громоздкий он. 600 серебряных будет тебе стоить объучение у меня. У гномов может быть и дешевле, да плестись до туда, сам понимаешь...|learn_arb~я на все согласен. Учи!|learn~Да, он точно громоздкий и неудобный. Я передумал, что-нибудь другое умеешь?';
if ($part == 'learn_ukl') {
include_once 'modules/f_learn_skill.php';
learn_skill(17, 500);
$you = rand(2, 12);
if ($you > $trevor) {
$plus = 10;
} elseif ($trevor > $you) {
$plus = -10;
} else {
$plus = 0;
}
include_once 'modules/f_gain_silver.php';
gain_silver($plus, $LOGIN);
$spf['ten'] = 'Тревор кинул ' . $trevor . '<br/>Вы кинули ' . $you . '<br/>Выйгрыш ' . $plus . ' серебра!|ten~еще раз!';
}
}
if ($part == 'hundred') {
if ($p['money'] < 100) {
$spf['hundred'] = 'У тебя нет 100 серебрянных';
} else {
$trevor = rand(2, 12);
$you = rand(2, 12);
if ($you > $trevor) {
$plus = 100;
} elseif ($trevor > $you) {
$plus = -100;
} else {
$plus = 0;
}
include_once 'modules/f_gain_silver.php';
gain_silver($plus, $LOGIN);
$spf['hundred'] = 'Тревор кинул ' . $trevor . '<br/>Вы кинули ' . $you . '<br/>Выйгрыш ' . $plus . ' серебра!|hundred~еще раз!';
}
}
<?php
// prinesti 10 listov jadovityh
$spf['quest'] = 'Да! Неподалеку от города растут странные растения - ядовитые кусты. Из ихних листов лекарь умеет делать прекрасную отраву для мышей. У меня дома какраз завелись мыши, думал заказать, но, оказывается, лекарь ингридиентов неимеет. Принеси мне 10 ядовитых листов, и я шедро расплачусь с тобой!|q_ok~уже иду :)|q_has~держи!';
$spf['q_ok'] = 'ну и гут! жду';
if ($part == 'q_has') {
// tipa prines, proverim
include_once 'modules/f_has_count.php';
$c_q = has_count('i.q.hun.poison_leave', 10, $LOGIN);
if ($c_q < 0) {
$spf['q_has'] = 'ты принес слишком листов, надо 10';
} elseif ($c_q == 0) {
$spf['q_has'] = 'принеси мне 10 ядовитых листов...';
} else {
// prineseny vse shkury:
include_once 'modules/f_delete_count.php';
delete_count('i.q.hun.poison_leave', 10, $LOGIN);
include_once 'modules/f_gain_peace_exp.php';
gain_peace_exp(500, $LOGIN);
include_once 'modules/f_gain_silver.php';
gain_silver(300, $LOGIN);
include_once 'modules/f_gain_item.php';
gain_item('i.q.que.unknown_alchemy', 1, $LOGIN);
include_once 'modules/f_increase_karma.php';
increase_karma($LOGIN, 1);
$spf['q_has'] = 'Спасибо, выручил! Я на днях вот эту бумажку нашел, может понадобится?';
include_once 'modules/f_end_quest.php';
end_quest('poisonleave');
}
}
function gain_battle_exp($who, $from, $dmg)
{
//$who = preg_replace ('/[^a-z0-9\._]/i', '', $who);
//$from = preg_replace ('/[^a-z0-9\._]/i', '', $from);
$tid = is_player($from);
if ($tid) {
$q = do_mysql("SELECT stats FROM players WHERE id_player = '" . $tid . "';");
$stats2 = mysql_result($q, 0);
$q = do_mysql("SELECT life FROM players WHERE id_player = '" . $tid . "';");
$life = mysql_result($q, 0);
$life = explode('|', $life);
if (!$stats2) {
return 0;
}
$stats2 = explode('|', $stats2);
$exp = $stats2[0] * 20;
$nlvl = $stats2[0];
$player = 1;
} else {
$tid = is_npc($from);
$q = do_mysql("SELECT exp FROM npc WHERE id_npc = '" . $tid . "';");
$q2 = do_mysql("SELECT life FROM npc WHERE id_npc = '" . $tid . "';");
$life = mysql_result($q2, 0);
$life = explode('|', $life);
$exp = mysql_result($q, 0);
$q = do_mysql("SELECT lvl FROM npc WHERE id_npc = '" . $tid . "';");
$nlvl = mysql_result($q, 0);
if (!$exp) {
return 0;
}
$player = 0;
}
$id = is_player($who);
if (!$id) {
$id = is_npc($who);
// dadim opyt npc:
$q = do_mysql("SELECT lvl, location, name FROM npc WHERE id_npc = '" . $id . "';");
$npc = mysql_fetch_assoc($q);
$exp = round($exp * ($nlvl / $npc['lvl']) * ($dmg / $life[1]));
//add_journal ($npc['name'].' +'.$exp.'exp!', 'l.'.$npc['location']);
do_mysql("UPDATE npc SET expto = expto + '" . $exp . "', exphas = exphas + '" . $exp . "' WHERE id_npc = '" . $id . "';");
include_once 'modules/f_check_npc_exp.php';
check_npc_exp($who);
return 1;
} else {
if ($player) {
return 1;
}
$q = do_mysql("SELECT stats FROM players WHERE id_player = '" . $id . "';");
$stats = mysql_result($q, 0);
if (!$stats) {
return 0;
}
$stats = explode('|', $stats);
$lvl = $stats[0];
$exp = round($exp * ($nlvl / $lvl) * ($dmg / $life[1]));
//$exp *= 2; // dvojnoj opyt
$slv = round($exp / 2);
$q = do_mysql("SELECT account FROM players WHERE id_player = '" . $id . "';");
$acc = mysql_result($q, 0);
if ($acc == 2 || $acc == 4) {
$exp = round($exp * 1.35);
}
if ($acc == 1 || $acc == 4) {
$slv *= 2;
}
// dobavlenie i proverka:
$stats[1] += $exp;
$stats[4] += $exp;
$nstats = $stats[0] . '|' . $stats[1] . '|' . $stats[2] . '|' . $stats[3] . '|' . $stats[4] . '|' . $stats[5] . '|' . $stats[6] . '|' . $stats[7];
include_once 'modules/f_check_pl_exp.php';
//if (isset ($bel)) { do_mysql ("UPDATE players SET stats = '".$nstats."' WHERE login = '******';"); add_journal ('exp +'.$exp, $bel); check_pl_exp ($bel); return 1; }
do_mysql("UPDATE players SET stats = '" . $nstats . "' WHERE id_player = '" . $id . "';");
add_journal('exp +' . $exp, $who);
// kak priz serebro:
include_once 'modules/f_gain_silver.php';
gain_silver($slv, $who);
check_pl_exp($who);
return 1;
}
}
$iw = '|test1r~я перо принес';
if ($part == 'test1r') {
$p['smq'][2] = 1;
do_mysql("UPDATE players SET smq = '" . $p['smq'] . "' WHERE login = '******';");
include_once 'modules/f_gain_peace_exp.php';
gain_peace_exp(50, $LOGIN);
}
$spf['test1r'] = 'Все, юноша, попался ты, хех) Теперь до конца жизни магом будешь, либо вообше никем, гы ) я ведь говорил "не все так просто" ;) Чтож, новоприговоренный, ступай к Левонию, пусть теперь тобой занимается...';
}
}
if ($p['smq'][8] == 3) {
$iw .= '|ritual~да блин тут такой косяк... Вы какой-то ритуал делаете, а меня не приглосили, ы...';
$spf['ritual'] = 'Какой ритуал..?|sun~солнца.';
$spf['sun'] = 'Откуда?..|allknows~да все уже знают...';
$spf['allknows'] = 'Блиин... Слушай, беги к Велдиру и сообщи это. На вознагрождение...';
if ($part == 'allknows') {
set_smq(8, 4);
include_once 'modules/f_gain_silver.php';
gain_silver(100, $LOGIN);
}
}
$spf['start'] = 'О! Превед! Те вабще че нада, а?|wind~ну вообще-то я хотел стать магом ветра, но сейчас еще раз подумаю...' . $iw;
$spf['wind'] = 'Думать меньше нада, ыыы! Че там, вихрь сюды, вихрь туды, вся наука, хех) за 49 деревянных я тебя научу! Коль маг, ессесно.|sere~шишь я тебе деревянными дам, в серебре сколько?';
$spf['sere'] = 'Да я те че, этот, конвентер чели? гы, в банке спроси)|serious~да я, блин, серьезно!|s3~ну я тут в уме посчитал, около 3 серебренных';
$spf['serious'] = 'Да ты че, самый серьезный чель? Ща я те всю сурьезность сниму! 300 серебра!|learn_wind~держи, прюколист хренов|go_away~по-любому, сначало научись разговаривать.';
$spf['go_away'] = 'Можешь не беспокоится за мою речь. Это стиль говора такой. А что от навыка за 300 монет отказался - то согласись, тупо, ведь так дешего ты тут ничего неполучишь.';
$spf['s3'] = 'Нее, за три серебрянных я тут себе разве что мышьяка опохмелится куплю. Ну давай так - я тебе навык - ты мну 300 серебрянных. Гут?|learn_wind~гут!|go_away~То-то у вас речь такая, муравьинным спиртом балуетесь?';
if ($part == 'learn_wind') {
include_once 'modules/f_learn_skill.php';
learn_skill(25, 300);
}
gain_item($pi[$p['location']], 1, $LOGIN);
include 'modules/s_main.php';
}
if (!isset($kl[$p['location']]) && !$shoron) {
exit_msg('клад', 'тут клада нет...');
} else {
if (!isset($kl[$p['location']])) {
include 'modules/s_main.php';
}
}
// teperq esli lokacija takova, i klad ne vykopan, podkljuchaem fajl
if (!$p['treasures'][$kl[$p['location']]]) {
include 'modules/treasures/klad_' . $kl[$p['location']] . '.php';
} else {
exit_msg('клад', 'тут клада нет...');
}
if (isset($kl_slv)) {
include_once 'modules/f_gain_silver.php';
gain_silver($kl_slv, $LOGIN);
}
if (isset($kl_exp)) {
include_once 'modules/f_gain_peace_exp.php';
gain_peace_exp($kl_exp, $LOGIN);
}
if (isset($kl_it)) {
foreach ($kl_it as $key => $val) {
gain_item($key, $val, $LOGIN);
}
}
$p['treasures'][$kl[$p['location']]] = 1;
do_mysql("UPDATE players SET treasures = '" . $p['treasures'] . "' WHERE id_player = '" . $p['id_player'] . "';");
