GTBS 1.5 Add on : Area bonus

# ** GTBS area bonus !!!
# par dricc
# Attention , ce script risque de ne pas supporter un autre add-on du GTBS


#==============================================================================
# ** Game_Battler (GTBS)
#------------------------------------------------------------------------------
# This class deals with battlers. It's used as a superclass for the Game_Actor
# and Game_Enemy classes.
#==============================================================================
class Game_Battler
#--------------------------------------------------------------------------
# * Determine if in Area
# area : Area data (RPG::Area)
#--------------------------------------------------------------------------
def in_area?(area,x,y)
return false if area == nil
return false if $game_map.map_id != area.map_id
return false if x < area.rect.x
return false if y < area.rect.y
return false if x >= area.rect.x + area.rect.width
return false if y >= area.rect.y + area.rect.height
return true
end

def weapon_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
if area.name[0,5] == "RANGE" then
bonus_temp += area.name[6,4].to_i if area.name[5,1] == "+"
bonus_temp -= area.name[6,4].to_i if area.name[5,1] == "-"
end
end
end
return bonus_temp
end

def pct_weapon_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
if area.name[0,6] == "%RANGE" then
bonus_temp += area.name[7,4].to_i if area.name[6,1] == "+"
bonus_temp -= area.name[7,4].to_i if area.name[6,1] == "-"
end
end
end
return bonus_temp
end

def atk_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
if area.name[0,3] == "ATK" then
bonus_temp += area.name[4,4].to_i if area.name[3,1] == "+"
bonus_temp -= area.name[4,4].to_i if area.name[3,1] == "-"
end
end
end
return bonus_temp
end

def pct_atk_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
if area.name[0,4] == "%ATK" then
bonus_temp += area.name[5,4].to_i if area.name[4,1] == "+"
bonus_temp -= area.name[5,4].to_i if area.name[4,1] == "-"
end
end
end
return bonus_temp
end

def def_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
if area.name[0,3] == "DEF" then
bonus_temp += area.name[4,4].to_i if area.name[3,1] == "+"
bonus_temp -= area.name[4,4].to_i if area.name[3,1] == "-"
end
end
end
return bonus_temp
end

def pct_def_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
if area.name[0,4] == "%DEF" then
bonus_temp += area.name[5,4].to_i if area.name[4,1] == "+"
bonus_temp -= area.name[5,4].to_i if area.name[4,1] == "-"
end
end
end
return bonus_temp
end

def spi_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
if area.name[0,3] == "SPI" or area.name[0,3] == "INT" then
bonus_temp += area.name[4,4].to_i if area.name[3,1] == "+"
bonus_temp -= area.name[4,4].to_i if area.name[3,1] == "-"
end
end
end
return bonus_temp
end

def pct_spi_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
if area.name[0,4] == "%SPI" or area.name[0,4] == "%INT" then
bonus_temp += area.name[5,4].to_i if area.name[4,1] == "+"
bonus_temp -= area.name[5,4].to_i if area.name[4,1] == "-"
end
end
end
return bonus_temp
end

def agi_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
if area.name[0,3] == "AGI" then
bonus_temp += area.name[4,4].to_i if area.name[3,1] == "+"
bonus_temp -= area.name[4,4].to_i if area.name[3,1] == "-"
end
end
end
return bonus_temp
end

def pct_agi_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
if area.name[0,4] == "%AGI" then
bonus_temp += area.name[5,4].to_i if area.name[4,1] == "+"
bonus_temp -= area.name[5,4].to_i if area.name[4,1] == "-"
end
end
end
return bonus_temp
end

def pct_enemy_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
if area.name[0,5] == "ENEMY" then
bonus_temp += area.name[6,4].to_i if area.name[5,1] == "+"
bonus_temp -= area.name[6,4].to_i if area.name[5,1] == "-"
end
end
end
return bonus_temp
end

def pct_exp_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
if area.name[0,3] == "EXP" then
bonus_temp += area.name[4,4].to_i if area.name[3,1] == "+"
bonus_temp -= area.name[4,4].to_i if area.name[3,1] == "-"
end
end
end
return bonus_temp
end

def invic_bonus
curr_area = nil
bonus_temp = 0
for area in $data_areas.values
if in_area?(area,x,y)
return true if area.name == "INVICIBLE"
end
end
return false
end
#--------------------------------------------------------------------------
# * Change HP
# hp : new HP
#--------------------------------------------------------------------------
def hp=(hp)
@hp = [[hp, maxhp].min, 0].max
if @hp <= 0 and invic_bonus
@hp=1
end
if @hp == 0 and not state?(1) and not @immortal
add_state(1) # Add incapacitated (state #1)
@added_states.push(1)
elsif @hp > 0 and state?(1)
remove_state(1) # Remove incapacitated (state #1)
@removed_states.push(1)
end
end
end

#--------------------------------------------------------------------------
# Game Enemy - Updates for GTBS
#--------------------------------------------------------------------------
class Game_Enemy < Game_Battler
#--------------------------------------------------------------------------
# returns weapon range based on enemy_id
#--------------------------------------------------------------------------
def weapon_range
range_temp = GTBS.w_range(@weapon_id)
range_temp[0]+=weapon_bonus if range_temp[2]
return range_temp
end
#--------------------------------------------------------------------------
# returns move range based on enemy_id
#--------------------------------------------------------------------------
def base_move_range
return GTBS::enemy_move(@enemy_id)
end

alias dricc_level level
def level
return dricc_level + (dricc_level*pct_exp_bonus/100)
end
#--------------------------------------------------------------------------
# * Get Basic Attack
#--------------------------------------------------------------------------
alias dricc_base_atk base_atk
def base_atk
return (dricc_base_atk+atk_bonus) + ((dricc_base_atk+atk_bonus)*(pct_atk_bonus+pct_enemy_bonus)/100)
end
alias dricc_base_atk base_def
def base_def
return (dricc_base_def+def_bonus) + ((dricc_base_def+def_bonus)*(pct_def_bonus+pct_enemy_bonus)/100)
end
alias dricc_base_spi base_spi
def base_def
return (dricc_base_spi+spi_bonus) + ((dricc_base_spi+spi_bonus)*(pct_spi_bonus+pct_enemy_bonus)/100)
end
alias dricc_base_agi base_agi
def base_def
return (dricc_base_agi+agi_bonus) + ((dricc_base_agi+agi_bonus)*(pct_agi_bonus+pct_enemy_bonus)/100)
end
end

#--------------------------------------------------------------------------
# Game Actor - Updates for GTBS
#--------------------------------------------------------------------------
class Game_Actor < Game_Battler

#--------------------------------------------------------------------------
# Determine weapon range based on id
#--------------------------------------------------------------------------
def weapon_range
if GTBS::USING_ENHANCED_WEAPONS
weapon = $data_weapons[@weapon_id]
if weapon.is_a?(Enhanced_Weapon)
return GTBS.w_range(weapon.ref_id)
else
return GTBS.w_range(@weapon_id)
end
end
range_temp = GTBS.w_range(@weapon_id)
range_temp[0]+=weapon_bonus if range_temp[2]
range_temp[0]+=pct_weapon_bonus/100*range_temp[0] if range_temp[2]
return range_temp
end
#--------------------------------------------------------------------------
# On modifie les caracs de base
#--------------------------------------------------------------------------
alias dricc_base_atk base_atk
def base_atk
return (dricc_base_atk+atk_bonus) + ((dricc_base_atk+atk_bonus)*pct_atk_bonus/100)
end
alias dricc_base_def base_def
def base_def
return (dricc_base_def+def_bonus) + ((dricc_base_def+def_bonus)*pct_def_bonus/100)
end
alias dricc_base_spi base_spi
def base_def
return (dricc_base_spi+spi_bonus) + ((dricc_base_spi+spi_bonus)*pct_spi_bonus/100)
end
alias dricc_base_agi base_agi
def base_def
return (dricc_base_agi+agi_bonus) + ((dricc_base_agi+agi_bonus)*pct_agi_bonus/100)
end
#--------------------------------------------------------------------------
# * Base Move Range - Returns the move range for the actor based on the class
#--------------------------------------------------------------------------
def base_move_range
move = GTBS.move_range(@class_id)
# Get Equipment Move Modifiers
if GTBS::USING_MULTISLOT
for i in 0...self.armor_slots.size
arm = self.armor_ids[i]
move += GTBS.equip_move_info(arm) if arm != nil and arm > 0
end
for i in 0...self.weapon_slots.size
wep = self.weapon_ids[i]
move += GTBS.weapon_move_info(wep) if wep != nil and wep > 0
end
else
for i in 1..4
arm = eval("self.armor#{i}_id")
move += GTBS.equip_move_info(arm) if arm != nil and arm > 0
end
# modif dricc : on sort ça du for
move += GTBS.weapon_move_info(@weapon_id) if @weapon_id != nil and @weapon_id > 0
end
# Get State Modifiers
for state_id in @states
move += GTBS.state_move_info(state_id)
end
if move < 0
move = 0
end
return move
end
end