$D13x Skill Levels 1.1

#===============================================================================
#
# ☆ $D13x - Skill Levels
# -- Author   : Dekita
# -- Version  : 1.1
# -- Level    : Easy / Normal
# -- Requires : $D13x - Statistic Control
# -- Engine   : RPG Maker VX Ace.
#
#===============================================================================
# ☆ Import
#-------------------------------------------------------------------------------
$D13x={}if$D13x==nil
$D13x[:Skill_Lv]=true
#===============================================================================
# ☆ Updates
#-------------------------------------------------------------------------------
# D /M /Y
# 21/o3/2o13 - Fixed bug, (enemy damage)
#            - Fixed bug, (Mp/Tp cost)
# 2o/o3/2o13 - Finished,
# 1o/o3/2o13 - Started
#
#===============================================================================
# ☆ Introduction
#-------------------------------------------------------------------------------
# This script gives skills - levels.
# You can have different growth types, exp requirements, max level,
# level name and damage multiplier for each skill.
# Simple notetag usage.
# Plug-N-Play.
#
#===============================================================================
# ★☆★☆★☆★☆★☆★☆★☆★ TERMS AND CONDITIONS: ☆★☆★☆★☆★☆★☆★☆★☆★☆
#===============================================================================
# 1. You MUST give credit to "Dekita" !!
# 2. You are NOT allowed to repost this script.(or modified versions)
# 3. You are NOT allowed to convert this script.
# 4. You are NOT allowed to use this script for Commercial games.
# 5. ENJOY!
#
# "FINE PRINT"
# By using this script you hereby agree to the above terms and conditions,
#  if any violation of the above terms occurs "legal action" may be taken.
# Not understanding the above terms and conditions does NOT mean that
#  they do not apply to you.
# If you wish to discuss the terms and conditions in further detail you can
# contact me at http://dekitarpg.wordpress.com/
#
#===============================================================================
# ☆ Instructions
#-------------------------------------------------------------------------------
# Place Below " ▼ Materials " and Above " ▼ Main " in your script editor.
# Place Under My $D13x - Statistic Control Script.
#
#===============================================================================
# ☆ Notetags ( default )
# For use with Class Skill Learn noteboxes only !
#-------------------------------------------------------------------------------
# <exp set: id>
# replace id with the id of the Exp_Set (defined below) that you wish to use.
#
# <growth type: id>
# replace id with the id of the Growth_Type (defined below) that you wish to use.
#
# <max level: value>
# replace value with the maximum level for that skill
# (cannot be higher than the Exp_Set hash size)
#
#===============================================================================
# ☆ HELP
#-------------------------------------------------------------------------------
# The default max level is the size of its Exp_Set[id] hash.
#
#===============================================================================
module Skill_Levels
#===============================================================================
Exp_Set=[];Growth_Type=[]# << Keep
  #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  # ☆ General Settings
  #--------------------------------------------------------------------------
  # reset exp after level ?
  Exp_Reset_On_Lv_Up = false # true

  # if these are true, skill costs will be multiplied by the DMG Multi
  Dmg_Multi_Skill_Cost = {  :mp  => true  ,  :tp => false  }

  # Default Exp Set given to skills (unless notetagged)
  Default_Exp_Set_ID = 0

  # Default Growth Type given to skills (unless notetagged)
  Default_GrowthT_ID = 0

  # Default Notetags
  Notes={
    :exp_set => /<exp set:(.*)>/i ,
    :max_lev => /<max level:(.*)>/i ,
    :gro_typ => /<growth type:(.*)>/i ,
  }# << end Notes={}

  #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  # ☆ Exp Setup - Settings
  #--------------------------------------------------------------------------
  # here is where you define the required exp for each level
  # as well as the level name and damage multiplier.
  # DMG Multi will also increase any statistics gained by
  # using the Statistic Control scripts notetags
  # you can add to this array as you please.
  Exp_Set[0]={#<< Exp Settings : 0 Begin
  # Level => [Exp Req, "Name", DMG Multi] ,
        1 => [      0, "Lv 1",    1.0   ] , # << Default level
        2 => [     25, "Lv 2",    1.1   ] ,
        3 => [     50, "Lv 3",    1.2   ] ,
        4 => [    100, "Lv 4",    1.4   ] ,
        5 => [    200, "Lv 5",    1.6   ] ,
        6 => [    400, "Lv 6",    1.8   ] ,
        7 => [    800, "Lv 7",    2.0   ] ,
        8 => [   1600, "Lv 8",    2.4   ] ,
        9 => [   3200, "Lv 9",    3.0   ] ,
  }# << Keep

  Exp_Set[1]={#<< Exp Settings : 1 Begin
  # Level => [Exp Req, "Name", DMG Multi] ,
        1 => [      0, "Lv 1",    1.0   ] , # << Default level
        2 => [     50, "Lv 2",    1.1   ] ,
        3 => [    100, "Lv 3",    1.2   ] ,
        4 => [    200, "Lv 4",    1.4   ] ,
        5 => [    400, "Lv 5",    1.6   ] ,
        6 => [    800, "Lv 6",    1.8   ] ,
        7 => [   1600, "Lv 7",    2.0   ] ,
        8 => [   3200, "Lv 8",    2.4   ] ,
        9 => [   6400, "Lv 9",    3.0   ] ,
  }# << Keep

  Exp_Set[2]={#<< Exp Settings : 2 Begin
  # Level => [Exp Req, "Name", DMG Multi] ,
        1 => [      0, "Lv 1",    1.0   ] , # << Default level
        2 => [     15, "Lv 2",    1.1   ] ,
        3 => [     45, "Lv 3",    1.2   ] ,
        4 => [    135, "Lv 4",    1.4   ] ,
        5 => [    405, "Lv 5",    1.6   ] ,
        6 => [   1215, "Lv 6",    1.8   ] ,
        7 => [   3645, "Lv 7",    2.0   ] ,
        8 => [  10935, "Lv 8",    2.4   ] ,
        9 => [  32805, "Lv 9",    3.0   ] ,
  }# << Keep

  #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
  # ☆ Growth Type - Settings
  #--------------------------------------------------------------------------
  # Here is where you can define the exp gained for various conditions
  # you can add to this array as you please.
  #  :per_use  = exp gained per use of the skill
  #  :per_dmg  = per (100 * skill level) damage dealt
  #  :per_bat  = exp gained per battle (while you know the skill)
  #  :per_die  = exp gained when actor dies ( for the skill )
  #  :per_esc  = exp gained when actor escapes battle (for the skill)
  Growth_Type[0]={
    :per_use => 19,
    :per_dmg => 0,
    :per_bat => 25,
    :per_die => 0,
    :per_esc => 0,
  } # << Keep

  Growth_Type[1]={
    :per_use => 0,
    :per_dmg => 1,
    :per_bat => 0,
    :per_die => 0,
    :per_esc => 0,
  } # << Keep

  Growth_Type[2]={
    :per_use => 1,
    :per_dmg => 0,
    :per_bat => 0,
    :per_die => 0,
    :per_esc => 0,
  } # << Keep

                            #####################
                            # CUSTOMISATION END #
end                         #####################
#☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★#
#                                                                               #
#                       http://dekitarpg.wordpress.com/                         #
#                                                                               #
#★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆#
#===============================================================================#
# ARE YOU MODIFYING BEYOND THIS POINT? \.\.                                     #
# YES?\.\.                                                                      #
# OMG, REALLY? \|                                                               #
# WELL SLAP MY FACE AND CALL ME A DRAGONITE.\..\..                              #
# I REALLY DIDN'T THINK YOU HAD IT IN YOU.\..\..                                #
#===============================================================================#
module BattleManager
#===============================================================================
  #--------------------------------------------------------------------------
  # Alias List
  #--------------------------------------------------------------------------
  class << self
    alias :gain_skill_exp :gain_exp
  end
  #--------------------------------------------------------------------------
  # EXP Acquisition and Level Up Display
  #--------------------------------------------------------------------------
  def self.gain_exp
    gain_skill_exp
    skills_gain_exp
  end
  #--------------------------------------------------------------------------
  # EXP Acquisition and Level Up Display (Skills)
  #--------------------------------------------------------------------------
  def self.skills_gain_exp
    $game_party.battle_members.each do |actor|
      actor.skills.each do |skill|
        next if skill == nil
        value = Skill_Levels::Growth_Type[skill.growth_type][:per_bat]
        actor.increase_skill_exp(skill, value)
      end
    end
    wait_for_message
  end

end

#==============================================================================
class RPG::Skill < RPG::UsableItem
#==============================================================================
  #---------------------------------------------------------------------------
  # Alias List
  #---------------------------------------------------------------------------
  alias :deki_skill_levz :load_stat_control
  #---------------------------------------------------------------------------
  # Pi Variables
  #---------------------------------------------------------------------------
  attr_accessor :exp_set
  attr_accessor :growth_type
  attr_accessor :max_lv
  #---------------------------------------------------------------------------
  # Load Stat Control
  #---------------------------------------------------------------------------
  def load_stat_control
    deki_skill_levz
    @exp_set = Skill_Levels::Default_Exp_Set_ID
    @growth_type = Skill_Levels::Default_GrowthT_ID
    @max_lv = Skill_Levels::Exp_Set[@exp_set].size
    self.note.split(/[\r\n]+/).each do |line|
      case line
      when Skill_Levels::Notes[:max_lev] then @max_lv      = $1.to_i
      when Skill_Levels::Notes[:exp_set] then @exp_set     = $1.to_i
      when Skill_Levels::Notes[:gro_typ] then @growth_type = $1.to_i
      end
    end
  end

end

#==============================================================================
class Game_Battler < Game_BattlerBase
#==============================================================================
  #--------------------------------------------------------------------------
  # Alias List
  #--------------------------------------------------------------------------
  alias :_MDV__skillev :make_damage_value
  alias :_APV__skillev :apply_variance
  #--------------------------------------------------------------------------
  # M.D.V
  #--------------------------------------------------------------------------
  def make_damage_value(user, item)
    @skillev_user = user
    @skillev_item = item
    _MDV__skillev(user, item)
  end
  #--------------------------------------------------------------------------
  # Apply Variance Mod ( HEAVY ALIAS )
  #--------------------------------------------------------------------------
  def apply_variance(damage, variance)
    user = @skillev_user
    item = @skillev_item
    orii = _APV__skillev(damage, variance)
    orig = apply_skill_variance(user,item,orii)
    orig
  end
  #--------------------------------------------------------------------------
  # Apply Skill Variance
  #--------------------------------------------------------------------------
  def apply_skill_variance(user,item,orig)
    return orig if user.is_a?(Game_Enemy)
    return orig if item.id == (attack_skill_id || guard_skill_id)
    lvdmgmul = Skill_Levels::Exp_Set[item.exp_set][user.skills_lv(item.id)][2]
    valu = orig * lvdmgmul
    ex = ((valu/100)*user.skills_lv(item.id)*
           Skill_Levels::Growth_Type[item.growth_type][:per_dmg]).to_i
    user.increase_skill_exp(item, ex)
    valu
  end

end

#==============================================================================
class Game_Actor < Game_Battler
#==============================================================================
  #--------------------------------------------------------------------------
  # Alias List
  #--------------------------------------------------------------------------
  alias :ls_alias_SD13x   :learn_skill
  alias :fs_alias_SD13x   :forget_skill
  alias :from_suparr_pscc :pay_skill_cost
  alias :init_de_skeel    :init_skills
  alias :die_exp_skill    :die
  alias :escape_exp_skill :escape
  alias :skill_lv_mp_st   :skill_mp_cost
  alias :skill_lv_tp_st   :skill_tp_cost
  #--------------------------------------------------------------------------
  # Learn Skill
  #--------------------------------------------------------------------------
  def learn_skill(skill_id)
    old_skills = skills.clone
    ls_alias_SD13x(skill_id)
    if skills != old_skills
      @skills_lv[skill_id] = 1
      @skills_exp[skill_id] = 0
      @skills_list.push(skill_id)
      @skills_list.sort!
    end
  end
  #--------------------------------------------------------------------------
  # Initialize Skills
  #--------------------------------------------------------------------------
  def init_skills
    ds = $data_skills.size
    @skills_lv  = [1] * ds
    @skills_exp = [0] * ds
    init_de_skeel
  end
  #--------------------------------------------------------------------------
  # Get Skill Level
  #--------------------------------------------------------------------------
  def skills_lv(id)
    @skills_lv[id]
  end
  #--------------------------------------------------------------------------
  # Get Skill Exp
  #--------------------------------------------------------------------------
  def skills_exp(id)
    @skills_exp[id] == nil ? 0 : @skills_exp[id]
  end
  #--------------------------------------------------------------------------
  # Increase Skill Exp
  #--------------------------------------------------------------------------
  def increase_skill_exp(skill, value = nil)
    return if skill.id == ( attack_skill_id || guard_skill_id )
    if value == nil
      value = Skill_Levels::Growth_Type[skill.growth_type][:per_use]
    end
    return if value == nil || value <= 0
    return if @skills_lv[skill.id] >= skill.max_lv
    set_id = skill.exp_set
    value.times do
      break if @skills_lv[skill.id] >= skill.max_lv
      @skills_exp[skill.id] += 1
      need = Skill_Levels::Exp_Set[set_id][(@skills_lv[skill.id]+1)][0]
      if @skills_exp[skill.id] >= (need)
        increase_skill_proficiency(skill.id)
      end
    end
  end
  #--------------------------------------------------------------------------
  # Increase Skill Level
  #--------------------------------------------------------------------------
  def increase_skill_proficiency(skill_id)
    @skills_lv[skill_id] += 1
    if Skill_Levels::Exp_Reset_On_Lv_Up
      @skills_exp[skill_id] = 0
    end
    ltex = Skill_Levels::Exp_Set[$data_skills[skill_id].exp_set][@skills_lv[skill_id]][1]
    text = "#{self.name}'s #{$data_skills[skill_id].name} is now #{ltex}"
    $game_message.add(text)
  end
  #--------------------------------------------------------------------------
  # Forget Skill
  #--------------------------------------------------------------------------
  def forget_skill(skill_id)
    fs_alias_SD13x
    @skills_list.delete(skill_id)
  end
  #--------------------------------------------------------------------------
  # Die
  #--------------------------------------------------------------------------
  def die
    die_exp_skill
    do_obscure_skill_exp(:per_die)
  end
  #--------------------------------------------------------------------------
  # Escape
  #--------------------------------------------------------------------------
  def escape
    escape_exp_skill
    do_obscure_skill_exp(:per_esc)
  end
  #--------------------------------------------------------------------------
  # Do Obscure Skill Exp Gain
  #--------------------------------------------------------------------------
  def do_obscure_skill_exp(type = :nil)
    return if type == :nil
    skills.each do |skill|
      next if skill == nil
      value = Skill_Levels::Growth_Type[skill.growth_type][type]
      next if value <= 0
      actor.increase_skill_exp(skill, value)
    end
  end
  #--------------------------------------------------------------------------
  # Pay Cost of Using Skill
  #--------------------------------------------------------------------------
  def pay_skill_cost(skill)
    from_suparr_pscc(skill)
    increase_skill_exp(skill)
  end
  #--------------------------------------------------------------------------
  # Calculate Skill's MP Cost
  #--------------------------------------------------------------------------
  def skill_mp_cost(skill)
    old = skill_lv_mp_st(skill)
    if Skill_Levels::Dmg_Multi_Skill_Cost[:mp]
      old *= Skill_Levels::Exp_Set[skill.exp_set][@skills_lv[skill.id]][2]
    end
    old.to_i
  end
  #--------------------------------------------------------------------------
  # Calculate Skill's TP Cost
  #--------------------------------------------------------------------------
  def skill_tp_cost(skill)
    old = skill_lv_tp_st(skill)
    if Skill_Levels::Dmg_Multi_Skill_Cost[:tp]
      old *= Skill_Levels::Exp_Set[skill.exp_set][@skills_lv[skill.id]][2]
    end
    old.to_i
  end

end # << Game_Actor

#==============================================================================
class Window_SkillList < Window_Selectable
#==============================================================================
  #--------------------------------------------------------------------------
  # Draw Item Name
  #--------------------------------------------------------------------------
  def draw_item_name(item, x, y, enabled = true, width = (Graphics.width/2))
    return unless item && @actor
    w = (width - (standard_padding*2) - 4)
    draw_icon(item.icon_index, x, y, enabled)
    change_color(normal_color, enabled)
    skill_lv = @actor.skills_lv(item.id)
    if $D13x[:Skill_Scene] && !SceneManager.scene_is?(Scene_Battle)
      refresh_font
      text = Skill_Levels::Exp_Set[item.exp_set][skill_lv][1]
      draw_text(x + 24, y, w-24, line_height, item.name)
      draw_text(x, y, w, line_height, text, 2)
    else
      text = "#{item.name} #{Skill_Levels::Exp_Set[item.exp_set][skill_lv][1]}"
      draw_text(x + 24, y, w-24, line_height, text)
    end
  end

end

#==============================================================================#
#                      http://dekitarpg.wordpress.com/                         #
#==============================================================================#