# =============================================================================
# TheoAllen - Item Max Specifier
# Version : 1.0
# Contact : www.rpgmakerid.com
# (This script documentation is written in informal indonesian language)
# =============================================================================
$imported = {} if $imported.nil?
$imported[:Theo_ItemMax] = true
# =============================================================================
# CHANGE LOGS:
# -----------------------------------------------------------------------------
# 2013.05.05 - Started and Finished script
# =============================================================================
=begin

  PENGENALAN :
  Secara default, dalam RPG Maker VX Ace, maksimal tiap item adalah 99. Script 
  ini ngebikin tiap item bisa disetting maksimalnya ada berapa. Misalkan, 
  potion A maksimal dibawa oleh party adalah 10, item B maksimal boleh dibawa
  20, dan seterusnya.
  
  CARA PAKAI:
  Tulis dalam note di database item, armor, weapon
  <item max: x>
  dimana x adalah angka maksimal item itu
  
  TERMS OF USE :
  Credit gw, TheoAllen. Kalo semisal u bisa ngedit2 script gw trus jadi lebih
  keren, terserah. Ane bebasin. Asal ngga ngeklaim aja. Kalo semisal mau
  dipake buat komersil, jangan lupa, gw dibagi gratisannya.
  
=end
# =============================================================================
# Konfigurasi :
# =============================================================================
module THEO
  module ITEM
    
    DEFAULT_MAX = 99 
    # nilai default banyak maksimalnya tiap item
    # default : 99
    
  end
end
# =============================================================================
# Batas konfigurasi. Jangan diedit setelah ini
# =============================================================================
module THEO
  module ITEM
  module REGEXP
    MAX = /<(?:ITEM_MAX|item max:[ ]*(\d+))>/i 
  end
  end
end

module DataManager
  
  class << self
    alias load_database_maximum_item load_database
  end
  
  def self.load_database
    load_database_maximum_item
    load_maximum
  end
  
  def self.load_maximum
    groups = [$data_items, $data_armors, $data_weapons]
    for database in groups
      for obj in database
        next if obj.nil?
        obj.load_maximum
      end
    end
  end
  
end

class RPG::Item < RPG::UsableItem
  attr_accessor :item_max
  
  def load_maximum
    @item_max = THEO::ITEM::DEFAULT_MAX
    self.note.split(/[\r\n]+/).each do |line|
      case line
      when THEO::ITEM::REGEXP::MAX
        @item_max = $1.to_i
      end
    end
  end

end

class RPG::EquipItem < RPG::BaseItem
  attr_accessor :item_max
  
  def load_maximum
    @item_max = THEO::ITEM::DEFAULT_MAX
    self.note.split(/[\r\n]+/).each do |line|
      case line
      when THEO::ITEM::REGEXP::MAX
        @item_max = $1.to_i
      end
    end
  end

end

class Game_Party
  
  def max_item_number(item)
    return item.item_max
  end
  
end