adr_enable_check();
adr_ban_check($user_id);
adr_character_created_check($user_id);
$adr_user = adr_get_user_infos($user_id);
if (!$adr_general['battle_pvp_enable']) {
adr_previous(Adr_pvp_disabled, adr_character, '');
}
// Deny access if user is imprisioned
if ($userdata['user_cell_time']) {
adr_previous(Adr_shops_no_thief, adr_cell, '');
}
if (!(isset($HTTP_POST_VARS[POST_USERS_URL]) || isset($HTTP_GET_VARS[POST_USERS_URL])) || empty($HTTP_POST_VARS[POST_USERS_URL]) && empty($HTTP_GET_VARS[POST_USERS_URL])) {
$view_userdata = $userdata;
} else {
$view_userdata = get_userdata(intval($HTTP_GET_VARS[POST_USERS_URL]));
}
$searchid = $view_userdata['user_id'];
if (isset($HTTP_POST_VARS['mode']) || isset($HTTP_GET_VARS['mode'])) {
$mode = isset($HTTP_POST_VARS['mode']) ? $HTTP_POST_VARS['mode'] : $HTTP_GET_VARS['mode'];
$mode = htmlspecialchars($mode);
} else {
$mode = "";
}
$defy_action = isset($HTTP_POST_VARS['defy']);
$accept_action = isset($HTTP_POST_VARS['accept_action']);
// Now we define some strange cases
$mode = $defy_action ? 'defy_action' : $mode;
$mode = $accept_action ? 'accept_action' : $mode;
$mode = $mode == 'current' ? '' : $mode;
### START restriction checks ###
$item_sql = adr_make_restrict_sql($adr_user);
adr_previous(Adr_pvp_exploit_error, adr_character, '');
}
// have the mail sender infos , it will be of use later
$script_name = preg_replace('/^\\/?(.*?)\\/?$/', "\\1", trim($board_config['script_path']));
$script_name = $script_name != '' ? $script_name . '/adr_battle_pvp.' . $phpEx : 'adr_battle_pvp.' . $phpEx;
$server_name = trim($board_config['server_name']);
$server_protocol = $board_config['cookie_secure'] ? 'https://' : 'http://';
$server_port = $board_config['server_port'] != 80 ? ':' . trim($board_config['server_port']) . '/' : '/';
// Includes the tpl and the header
adr_template_file('adr_battle_pvp_body.tpl');
include $phpbb_root_path . 'includes/page_header.' . $phpEx;
// Grab both user infos
$current_infos = $user_id === $battle_pvp['battle_challenger_id'] ? adr_get_user_infos($battle_pvp['battle_challenger_id']) : adr_get_user_infos($battle_pvp['battle_opponent_id']);
$opponent_infos = $user_id === $battle_pvp['battle_challenger_id'] ? adr_get_user_infos($battle_pvp['battle_opponent_id']) : adr_get_user_infos($battle_pvp['battle_challenger_id']);
### START restriction checks ###
$item_sql = adr_make_restrict_sql($current_infos);
### END restriction checks ###
// Get the current user and the opponent infos
if ($user_id == $battle_pvp['battle_challenger_id']) {
$current_hp = $battle_pvp['battle_challenger_hp'];
$current_mp = $battle_pvp['battle_challenger_mp'];
$current_hp_max = $battle_pvp['battle_challenger_hp_max'];
$current_mp_max = $battle_pvp['battle_challenger_mp_max'];
$current_hp_regen = $battle_pvp['battle_challenger_hp_regen'];
$current_mp_regen = $battle_pvp['battle_challenger_mp_regen'];
$current_att = $battle_pvp['battle_challenger_att'];
$current_def = $battle_pvp['battle_challenger_def'];
$current_element = $battle_pvp['battle_challenger_element'];
$current_alignment = $current_infos['character_alignment'];
$current_class = $current_infos['character_class'];
$current_str = $current_infos['character_might'];
function adr_battle_equip_initialise($user_id, $armor, $buckler, $helm, $gloves, $amulet, $ring)
{
global $db, $lang, $adr_general, $template, $board_config;
$user_id = intval($user_id);
$armor = intval($armor);
$buckler = intval($buckler);
$helm = intval($helm);
$gloves = intval($gloves);
$amulet = intval($amulet);
$ring = intval($ring);
// Get the user infos
$char = adr_get_user_infos($user_id);
### START restriction checks ###
$item_sql = adr_make_restrict_sql($char);
### END restriction checks ###
// Be sure he has a character
if (!is_numeric($char['character_id'])) {
adr_previous(Adr_your_character_lack, adr_character, '');
}
// Calculate the base stats
$hp = 0;
$mp = 0;
$level = $char['character_level'];
$char_element = $char['character_element'];
$char_mp = $char['character_mp'];
// Create base attack & defence stats
$att = adr_battle_make_att($char['character_might'], $char['character_constitution']);
$ma = adr_battle_make_magic_att($char['character_intelligence']);
$def = adr_battle_make_def($char['character_ac'], $char['character_dexterity']);
$md = adr_battle_make_magic_def($char['character_wisdom']);
if ($armor) {
$sql = "SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\n\t\t\tWHERE item_in_shop = '0'\n\t\t\tAND item_owner_id = '{$user_id}'\n\t\t\tAND item_in_warehouse = '0'\n\t\t\t{$item_sql}\n\t\t\tAND item_id = '{$armor}'";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$armor_id = $item['item_id'];
$def = $def + ($item['item_power'] + $item['item_add_power']);
adr_use_item($armor, $user_id);
}
if ($buckler) {
$sql = "SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\n\t\t\tWHERE item_in_shop = '0'\n\t\t\tAND item_owner_id = '{$user_id}'\n\t\t\tAND item_in_warehouse = '0'\n\t\t\t{$item_sql}\n\t\t\tAND item_id = '{$buckler}'";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$buckler_id = $item['item_id'];
$def = $def + ($item['item_power'] + $item['item_add_power']);
adr_use_item($buckler, $user_id);
}
if ($gloves) {
$sql = "SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\n\t\t\tWHERE item_in_shop = '0'\n\t\t\tAND item_owner_id = '{$user_id}'\n\t\t\tAND item_in_warehouse = '0'\n\t\t\t{$item_sql}\n\t\t\tAND item_id = '{$gloves}'";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$gloves_id = $item['item_id'];
$def = $def + ($item['item_power'] + $item['item_add_power']);
adr_use_item($gloves, $user_id);
}
if ($helm) {
$sql = "SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\n\t\t\tWHERE item_in_shop = '0'\n\t\t\tAND item_owner_id = '{$user_id}'\n\t\t\tAND item_in_warehouse = '0'\n\t\t\t{$item_sql}\n\t\t\tAND item_id = '{$helm}'";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$helm_id = $item['item_id'];
$def = $def + ($item['item_power'] + $item['item_add_power']);
adr_use_item($helm, $user_id);
}
// Now we modify mp and hp regeneration with amulets and rings
if ($amulet) {
$sql = " SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\n\t\t\tWHERE item_in_shop = '0'\n\t\t\tAND item_owner_id = '{$user_id}'\n\t\t\tAND item_in_warehouse = '0'\n\t\t\t{$item_sql}\n\t\t\tAND item_id = '{$amulet}'";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$amulet_id = $item['item_id'];
$hp = $hp + $item['item_power'];
adr_use_item($amulet, $user_id);
}
if ($ring) {
$sql = "SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\n\t\t\tWHERE item_in_shop = '0'\n\t\t\tAND item_owner_id = '{$user_id}'\n\t\t\tAND item_in_warehouse = '0'\n\t\t\t{$item_sql}\n\t\t\tAND item_id = '{$ring}'";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$ring_id = $item['item_id'];
$mp = $mp + $item['item_power'];
adr_use_item($ring, $user_id);
}
##=== START: new monster rand selection code as posted by Sederien ===##
// Let's care about the opponent now
$sql = " SELECT * FROM " . ADR_BATTLE_MONSTERS_TABLE . "\n\t\tWHERE monster_level <= '{$level}'\n\t\tORDER BY RAND() LIMIT 1";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query monsters list', '', __LINE__, __FILE__, $sql);
}
$monsters = $db->sql_fetchrow($result);
// Be sure monsters of the user level exists
if (!$monsters) {
adr_previous(Adr_no_monsters, adr_character, '');
}
// Get this monster base stats
$monster_id = $monsters['monster_id'];
$monster_level = $monsters['monster_level'];
$monster_base_hp = $monsters['monster_base_hp'];
$monster_base_att = $monsters['monster_base_att'];
$monster_base_def = $monsters['monster_base_def'];
$monster_base_element = $monsters['monster_base_element'];
$monster_base_mp = $monsters['monster_base_mp'];
$monster_base_mp_power = $monsters['monster_base_mp_power'];
$monster_base_ma = $monsters['monster_base_magic_attack'];
$monster_base_md = $monsters['monster_base_magic_resistance'];
$monster_base_sp = $monsters['monster_base_sp'];
##=== END: new monster selection code by Sederien ===##
// If the user is higher level than the monster , update the monster stats
if ($monster_level < $level) {
if ($adr_general['battle_calc_type']) {
// Xanathis's alternative battle modifier calculation for monster battles
$modifier = ($adr_general['battle_monster_stats_modifier'] - 100) / 100 * ($level - $monster_level) + 1;
} else {
$modifier = $adr_general['battle_monster_stats_modifier'] / 100 * ($level - $monster_level);
}
$monster_base_hp = ceil($monster_base_hp * $modifier);
$monster_base_att = ceil($monster_base_att * $modifier);
$monster_base_def = ceil($monster_base_def * $modifier);
$monster_base_mp = ceil($monster_base_mp * $modifier);
$monster_base_ma = ceil($monster_base_ma * $modifier);
$monster_base_md = ceil($monster_base_md * $modifier);
$monster_base_sp = ceil($monster_base_sp * $modifier);
}
##=== START array for equipment id's ##
$equip_array = intval($helm_id) . '-' . intval($armor_id) . '-' . intval($gloves_id) . '-' . intval($buckler_id) . '-' . intval($amulet_id) . '-' . intval($ring_id) . '-' . intval($hp) . '-' . intval($mp);
##=== END array for equipment id's ##
##=== START: Initiative Checks
// 1d20 roll. Highest starts.
$monster_dex = 10 + rand(1, $monster_level) * 2;
//temp
$challenger_init_check = rand(1, 20) + adr_modifier_calc($char['character_dexterity']);
$monster_init_check = rand(1, 20) + adr_modifier_calc($monster_dex);
// Check who will start ELSE do a rand to determine.
if ($challenger_init_check >= $monster_init_check) {
$turn = 1;
} else {
$turn = 2;
}
##=== END: Initiative Checks
// Finally insert all theses values into the database
$sql = "INSERT INTO " . ADR_BATTLE_LIST_TABLE . "\n\t\t(battle_type, battle_start, battle_turn, battle_result, battle_text, battle_challenger_id, battle_challenger_hp, battle_challenger_mp, battle_challenger_att, battle_challenger_def, battle_challenger_element, battle_challenger_magic_attack, battle_challenger_magic_resistance, battle_challenger_equipment_info, battle_opponent_id, battle_opponent_hp, battle_opponent_hp_max, battle_opponent_mp, battle_opponent_mp_max, battle_opponent_mp_power, battle_opponent_att, battle_opponent_def, battle_opponent_element, battle_opponent_magic_attack, battle_opponent_magic_resistance, battle_opponent_sp)\n\t\tVALUES(1, " . time() . ", {$turn}, 0, '', {$user_id}, {$hp}, {$mp}, {$att}, {$def}, {$char_element}, {$ma}, {$md}, '{$equip_array}', {$monster_id}, {$monster_base_hp}, {$monster_base_hp}, {$monster_base_mp}, {$monster_base_mp}, {$monster_base_mp_power}, {$monster_base_att}, {$monster_base_def}, {$monster_base_element}, {$monster_base_ma}, {$monster_base_md}, {$monster_base_sp})";
$result = $db->sql_query($sql);
if (!$result) {
message_die(GENERAL_ERROR, "Couldn't insert new battle", "", __LINE__, __FILE__, $sql);
}
return;
}
$armor = intval($_POST['item_armor']);
$buckler = intval($_POST['item_buckler']);
$helm = intval($_POST['item_helm']);
$gloves = intval($_POST['item_gloves']);
$amulet = intval($_POST['item_amulet']);
$ring = intval($_POST['item_ring']);
$sql = " UPDATE " . ADR_CHARACTERS_TABLE . "\n\t\tSET equip_armor = {$armor},\n\t\t\tequip_buckler = {$buckler},\n\t\t\tequip_helm = {$helm},\n\t\t\tequip_gloves = {$gloves},\n\t\t\tequip_amulet = {$amulet},\n\t\t\tequip_ring = {$ring}\n\t\tWHERE character_id = {$user_id} ";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not update equipment', '', __LINE__, __FILE__, $sql);
}
adr_previous(Adr_equip_done, adr_character_equipment, '');
}
if ($user_id == $searchid) {
$template->assign_block_vars('owner', array());
### START restriction checks ###
$item_sql = adr_make_restrict_sql($char);
### END restriction checks ###
// First select the available items
$sql = " SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\n\t\tWHERE item_in_shop = 0 \n\t\tAND item_duration > 0\n\t\tAND item_in_warehouse = 0\n\t\t{$item_sql}\n\t\tAND item_owner_id = {$user_id} ";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$items = $db->sql_fetchrowset($result);
// Prepare the items list
$armor_list = '<select name="item_armor">';
$armor_list .= '<option value = "0" >' . $lang['Adr_battle_no_armor'] . '</option>';
$buckler_list = '<select name="item_buckler">';
$buckler_list .= '<option value = "0" >' . $lang['Adr_battle_no_buckler'] . '</option>';
$helm_list = '<select name="item_helm">';
$helm_list .= '<option value = "0" >' . $lang['Adr_battle_no_helm'] . '</option>';
$gloves_list = '<select name="item_gloves">';
function adr_battle_equip_initialise($user_id, $armor, $buckler, $helm, $gloves, $amulet, $ring, $greave, $boot)
{
global $db, $lang, $adr_general, $template, $board_config, $phpEx;
$user_id = intval($user_id);
$armor = intval($armor);
$buckler = intval($buckler);
$helm = intval($helm);
$gloves = intval($gloves);
$amulet = intval($amulet);
$ring = intval($ring);
// Get the user infos
$char = adr_get_user_infos($user_id);
### START restriction checks ###
$item_sql = adr_make_restrict_sql($char);
### END restriction checks ###
// Be sure he has a character
if (!is_numeric($char['character_id'])) {
adr_previous(Adr_your_character_lack, adr_character, '');
}
// Calculate the base stats
$hp = 0;
$mp = 0;
$level = $char['character_level'];
$char_element = $char['character_element'];
$char_mp = $char['character_mp'];
// Create base attack & defence stats
$att = adr_battle_make_att($char['character_might'], $char['character_constitution']);
$ma = adr_battle_make_magic_att($char['character_intelligence']);
$def = adr_battle_make_def($char['character_ac'], $char['character_dexterity']);
$md = adr_battle_make_magic_def($char['character_wisdom']);
// Modify stats depending to zone element
$zone_user = adr_get_user_infos($user_id);
$actual_zone = $zone_user['character_area'];
$sql = "SELECT * FROM " . ADR_ZONES_TABLE . "\r\n\t\tWHERE zone_id = {$actual_zone}";
$result = $db->sql_query($sql);
if (!$result) {
message_die(GENERAL_ERROR, 'Could not obtain zones information', "", __LINE__, __FILE__, $sql);
}
$zone_check = $db->sql_fetchrow($result);
if ($board_config['zone_bonus_enable'] == '1' && $zone_check['zone_element'] == '$char_element') {
$bonus_att = $board_config['zone_bonus_att'];
$bonus_def = $board_config['zone_bonus_def'];
$att = ($char['character_might'] + $char['character_constitution']) * 2 + $bonus_att;
$def = $char['character_dexterity'] + $char['character_wisdom'] + $char['character_ac'] + $bonus_def;
}
// Start party
$party = $char['character_party'];
if ($party > 0) {
$sql = " SELECT character_party FROM " . ADR_CHARACTERS_TABLE . "\r\n\t\t\t WHERE character_party = {$party} ";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query count for info page', '', __LINE__, __FILE__, $sql);
}
$count_members = $db->sql_numrows($result);
} elseif ($party = 0) {
$sql = " SELECT character_party FROM " . ADR_CHARACTERS_TABLE . "\r\n\t\t\t WHERE character_party = 0 ";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query count for info page', '', __LINE__, __FILE__, $sql);
}
$count_members = $db->sql_numrows($result);
}
// Boost ATT
$att = $att + $count_members + $count_members + $count_members;
$att = round($att);
// Boost DEF
$def = $def + $count_members + $count_members + $count_members + $count_members + $count_members;
$def = round($def);
// Boost MA
$ma = $ma + $count_members + $count_members + $count_members;
$ma = round($ma);
// Boost MD
$md = $md + $count_members + $count_members + $count_members + $count_members + $count_members;
$md = round($md);
// End Party
if ($armor) {
$sql = "SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\r\n\t\t\tWHERE item_in_shop = '0'\r\n\t\t\tAND item_owner_id = '{$user_id}'\r\n\t\t\tAND item_in_warehouse = '0'\r\n\t\t\t{$item_sql}\r\n\t\t\tAND item_id = '{$armor}'";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$armor_id = $item['item_id'];
$def = $def + ($item['item_power'] + $item['item_add_power']);
adr_use_item($armor, $user_id);
$armour_name = adr_get_lang($item['item_name']);
}
$def = $def + $adr_general['shield_bonus'] * $char['character_skill_shield_level'];
if ($buckler) {
$sql = "SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\r\n\t\t\tWHERE item_in_shop = '0'\r\n\t\t\tAND item_owner_id = '{$user_id}'\r\n\t\t\tAND item_in_warehouse = '0'\r\n\t\t\t{$item_sql}\r\n\t\t\tAND item_id = '{$buckler}'";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$buckler_id = $item['item_id'];
$def = $def + ($item['item_power'] + $item['item_add_power']);
adr_use_item($buckler, $user_id);
$buckler_name = adr_get_lang($item['item_name']);
}
if ($gloves) {
$sql = "SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\r\n\t\t\tWHERE item_in_shop = '0'\r\n\t\t\tAND item_owner_id = '{$user_id}'\r\n\t\t\tAND item_in_warehouse = '0'\r\n\t\t\t{$item_sql}\r\n\t\t\tAND item_id = '{$gloves}'";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$gloves_id = $item['item_id'];
$def = $def + ($item['item_power'] + $item['item_add_power']);
adr_use_item($gloves, $user_id);
$gloves_name = adr_get_lang($item['item_name']);
}
if ($helm) {
$sql = "SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\r\n\t\t\tWHERE item_in_shop = '0'\r\n\t\t\tAND item_owner_id = '{$user_id}'\r\n\t\t\tAND item_in_warehouse = '0'\r\n\t\t\t{$item_sql}\r\n\t\t\tAND item_id = '{$helm}'";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$helm_id = $item['item_id'];
$def = $def + ($item['item_power'] + $item['item_add_power']);
adr_use_item($helm, $user_id);
$helm_name = adr_get_lang($item['item_name']);
}
// Now we modify mp and hp regeneration with amulets and rings
if ($amulet) {
$sql = " SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\r\n\t\t\tWHERE item_in_shop = '0'\r\n\t\t\tAND item_owner_id = '{$user_id}'\r\n\t\t\tAND item_in_warehouse = '0'\r\n\t\t\t{$item_sql}\r\n\t\t\tAND item_id = '{$amulet}'";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$amulet_id = $item['item_id'];
$hp = $hp + $item['item_power'];
adr_use_item($amulet, $user_id);
$amulet_name = adr_get_lang($item['item_name']);
}
if ($ring) {
$sql = "SELECT * FROM " . ADR_SHOPS_ITEMS_TABLE . "\r\n\t\t\tWHERE item_in_shop = '0'\r\n\t\t\tAND item_owner_id = '{$user_id}'\r\n\t\t\tAND item_in_warehouse = '0'\r\n\t\t\t{$item_sql}\r\n\t\t\tAND item_id = '{$ring}'";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$ring_id = $item['item_id'];
$mp = $mp + $item['item_power'];
adr_use_item($ring, $user_id);
$ring_name = adr_get_lang($item['item_name']);
}
if ($greave) {
$sql = " SELECT item_name , item_power , item_add_power FROM " . ADR_SHOPS_ITEMS_TABLE . "\r\n\t\t\tWHERE item_in_shop = 0 \r\n\t\t\tAND item_owner_id = {$user_id} \r\n\t\t\tAND item_in_warehouse = 0\r\n\t\t\tAND item_id = {$greave} ";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$def = $def + $item['item_power'] + $item['item_add_power'];
$greave_name = $item['item_name'];
adr_use_item($greave, $user_id);
$greave_name = adr_get_lang($item['item_name']);
}
if ($boot) {
$sql = " SELECT item_name , item_power , item_add_power FROM " . ADR_SHOPS_ITEMS_TABLE . "\r\n\t\t\tWHERE item_in_shop = 0 \r\n\t\t\tAND item_owner_id = {$user_id} \r\n\t\t\tAND item_in_warehouse = 0\r\n\t\t\tAND item_id = {$boot} ";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query battle list', '', __LINE__, __FILE__, $sql);
}
$item = $db->sql_fetchrow($result);
$def = $def + $item['item_power'] + $item['item_add_power'];
$boot_name = $item['item_name'];
adr_use_item($boot, $user_id);
$boot_name = adr_get_lang($item['item_name']);
}
if ($zone_check['zone_monsters_list'] == '') {
adr_previous(Adr_zone_no_monsters, adr_zones, '');
}
$monster_area = $zone_check['zone_monsters_list'] == '0' ? "" : "AND monster_id IN (" . $zone_check['zone_monsters_list'] . ")";
##=== START: new monster rand selection code as posted by Sederien ===##
# V: JK. That's zone mod's code :).
// Let's care about the opponent now
$actual_weather = $zone_user['character_weather'];
$actual_season = $board_config['adr_seasons'];
$actual_time = $board_config['adr_time'];
$sql = " SELECT * FROM " . ADR_BATTLE_MONSTERS_TABLE . "\r\n\t\t\tWHERE monster_level <= {$level} \r\n\t\t\t{$monster_area}\r\n\t\t\tAND ( monster_weather = {$actual_weather} || monster_weather = 0 )\r\n\t\t\tAND (monster_time = {$actual_time} OR monster_time = 0)\r\n\t\t\tAND ( monster_season = {$actual_season} || monster_season = 0 )";
if (!($result = $db->sql_query($sql))) {
message_die(GENERAL_ERROR, 'Could not query monsters list', '', __LINE__, __FILE__, $sql);
}
$monsters = $db->sql_fetchrow($result);
// Be sure monsters of the user level exists
if (!$monsters) {
adr_previous(Adr_no_monsters, adr_character, '');
}
// Get this monster base stats
$monster_id = $monsters['monster_id'];
$monster_level = $monsters['monster_level'];
$monster_base_hp = $monsters['monster_base_hp'];
$monster_base_att = $monsters['monster_base_att'];
$monster_base_def = $monsters['monster_base_def'];
$monster_base_element = $monsters['monster_base_element'];
$monster_base_mp = $monsters['monster_base_mp'];
$monster_base_mp_power = $monsters['monster_base_mp_power'];
$monster_base_ma = $monsters['monster_base_magic_attack'];
$monster_base_md = $monsters['monster_base_magic_resistance'];
$monster_base_sp = $monsters['monster_base_sp'];
##=== END: new monster selection code by Sederien ===##
// If the user is higher level than the monster , update the monster stats
if ($monster_level < $level) {
if ($adr_general['battle_calc_type']) {
// Xanathis's alternative battle modifier calculation for monster battles
$modifier = ($adr_general['battle_monster_stats_modifier'] - 100) / 100 * ($level - $monster_level) + 1;
} else {
$modifier = $adr_general['battle_monster_stats_modifier'] / 100 * ($level - $monster_level);
}
$monster_base_hp = ceil($monster_base_hp * $modifier);
$monster_base_att = ceil($monster_base_att * $modifier);
$monster_base_def = ceil($monster_base_def * $modifier);
$monster_base_mp = ceil($monster_base_mp * $modifier);
$monster_base_ma = ceil($monster_base_ma * $modifier);
$monster_base_md = ceil($monster_base_md * $modifier);
$monster_base_sp = ceil($monster_base_sp * $modifier);
}
##=== START array for equipment id's ##
$equip_array = intval($helm_id) . '-' . intval($armor_id) . '-' . intval($gloves_id) . '-' . intval($buckler_id) . '-' . intval($amulet_id) . '-' . intval($ring_id) . '-' . intval($hp) . '-' . intval($mp) . '-' . intval($greave) . '-' . intval($boot);
##=== END array for equipment id's ##
##=== START: Initiative Checks
// 1d20 roll. Highest starts.
$monster_dex = 10 + rand(1, $monster_level) * 2;
//temp
$challenger_init_check = rand(1, 20) + adr_modifier_calc($char['character_dexterity']);
$monster_init_check = rand(1, 20) + adr_modifier_calc($monster_dex);
// Check who will start ELSE do a rand to determine.
if ($challenger_init_check >= $monster_init_check) {
$turn = 1;
} else {
$turn = 2;
}
##=== END: Initiative Checks
$spell_effects = explode(':', $char['character_spell_pre_effects']);
for ($i = 0; $i < count($spell_effects); $i++) {
if ($spell_effects[$i] == 'ATT') {
$value = $spell_effects[$i + 1];
$att = $att + $value;
}
if ($spell_effects[$i] == 'DEF') {
$value = $spell_effects[$i + 1];
$def = $def + $value;
}
}
//remove spell pre-effects
$sql = "UPDATE " . ADR_CHARACTERS_TABLE . "\r\n\t\tSET character_spell_pre_effects = ''\r\n\t\tWHERE character_id = {$user_id} ";
if (!$db->sql_query($sql)) {
message_die(GENERAL_ERROR, 'Couldn\'t remove characters spell pre effects for battle', '', __LINE__, __FILE__, $sql);
}
// Finally insert all theses values into the database
$sql = "INSERT INTO " . ADR_BATTLE_LIST_TABLE . "\r\n\t\t(battle_type, battle_start, battle_turn, battle_result, battle_text, battle_challenger_id, battle_challenger_hp, battle_challenger_mp, battle_challenger_att, battle_challenger_def, battle_challenger_element, battle_challenger_magic_attack, battle_challenger_magic_resistance, battle_challenger_equipment_info, battle_opponent_id, battle_opponent_hp, battle_opponent_hp_max, battle_opponent_mp, battle_opponent_mp_max, battle_opponent_mp_power, battle_opponent_att, battle_opponent_def, battle_opponent_element, battle_opponent_magic_attack, battle_opponent_magic_resistance, battle_opponent_sp)\r\n\t\tVALUES(1, " . time() . ", {$turn}, 0, '', {$user_id}, {$hp}, {$mp}, {$att}, {$def}, {$char_element}, {$ma}, {$md}, '{$equip_array}', {$monster_id}, {$monster_base_hp}, {$monster_base_hp}, {$monster_base_mp}, {$monster_base_mp}, {$monster_base_mp_power}, {$monster_base_att}, {$monster_base_def}, {$monster_base_element}, {$monster_base_ma}, {$monster_base_md}, {$monster_base_sp})";
$result = $db->sql_query($sql);
if (!$result) {
message_die(GENERAL_ERROR, "Couldn't insert new battle", "", __LINE__, __FILE__, $sql);
}
// Do armour set check
// Do armour set check
include_once $phpbb_root_path . 'adr/includes/adr_functions_armour_sets.' . $phpEx;
adr_armour_set_check($user_id, $armour_name, $buckler_name, $gloves_name, $helm_name, $amulet_name, $ring_name, $greave_name, $boot_name);
}
$monster_md = $bat['battle_opponent_magic_resistance'];
$challenger_element = $challenger['character_element'];
$opponent_element = $monster['monster_base_element'];
$battle_round = $bat['battle_round'];
### START armour info arrays ###
// array info: 0=helm, 1=armour, 2=gloves, 3=buckler, 4=amulet, 5=ring, 6=hp_regen, 7=mp_regen
$armour_info = explode('-', $bat['battle_challenger_equipment_info']);
$helm_equip = $armour_info[0] != '' ? $armour_info[0] : intval(0);
$armour_equip = $armour_info[1] != '' ? $armour_info[1] : intval(0);
$gloves_equip = $armour_info[2] != '' ? $armour_info[2] : intval(0);
$buckler_equip = $armour_info[3] != '' ? $armour_info[3] : intval(0);
$amulet_equip = $armour_info[4] != '' ? $armour_info[4] : intval(0);
$ring_equip = $armour_info[5] != '' ? $armour_info[5] : intval(0);
### END armour info arrays ###
### START restriction checks ###
$item_sql = adr_make_restrict_sql($challenger);
### END restriction checks ###
if (is_numeric($bat['battle_id']) && $bat['battle_type'] == 1 && ($attack || $spell || $potion || $defend || $flee || $equip)) {
// Prefix challenger battle message
$battle_message .= '<font color="blue">[' . $challenger['character_name'] . $lang['Adr_battle_msg_check'] . ']: </font>';
if ($bat['battle_round'] == '0' && $bat['battle_turn'] == '2') {
$battle_message .= $monster['monster_name'] . ' ' . $lang['Adr_battle_msg_monster_start'] . '<br>';
}
if ($flee && $bat['battle_turn'] == '1') {
$dice = rand(1, 20);
$monster_dice = rand(1, 20);
// To flee you must roll higher than opponent or roll straight 20. 1= auto fail
if ($dice > $monster_dice && $dice != '1' || $dice == '20') {
// Update the database
$sql = "UPDATE " . ADR_BATTLE_LIST_TABLE . "\n\t\t\t\tSET battle_result = 3,\n\t\t\t\t\tbattle_finish = " . time() . "\n\t\t\t\tWHERE battle_challenger_id = '{$user_id}'\n\t\t\t\tAND battle_result = '0'\n\t\t\t\tAND battle_type = '1'";
if (!($result = $db->sql_query($sql))) {
