=begin
================================================================================
CrimsonSeas Item Management System
by CrimsonSeas
as per request by Theodoric at RPGMakerID forums (rmid.forumotion.net)
================================================================================
Script that enables easy item managements. Mainly used for party switching item
management. This script can:
-Temporarily store your items. Storing can be done multiple times in different
 storage slots.
-Clears your items
-Restore your items from the storage slot(s). Can quickly restore from more than
 1 storage slot. Also an option to add the current items to the restored one.
 
How to Use:
This script has many methods that you can use

clone_items_hash(slot), clone_weapons_hash(slot), clone_armors_hash(slot):

These methods are used to store the current items/weapons/armors to an items/
weapons/armors atorage slot. Example:
$game_party.clone_items_hash(1) will store your current items to item storage
slot1, while $game_party.clone_weapons(hash(3) will store your current
weapons to weapons storage slot 3. Remember that items/weapons/armors storage slot
is separated so you can use the same slot number for all 3 of them.


clone_all_items(slot):

This method calls all the three methods above to store all items, weapons, and
armors to the respective storage slot. Example:
$game_party.clone_all_items(2) will store
you items to items storage slot 1, weapons to weapons storage slot 1, and armors
to armors storage slot 1.


clear_items, clear_weapons, clear_armors:

Clears the respective item type from your inventory.


clear_all_items:
Calls the 3 methods above.


restore_items_from_temp(include_old, [slot1, [slot2]......])
restore_weapons_from_temp(include_old, [slot1, [slot2]......])
restore_armors_from_temp(include_old, [slot1, [slot2]......])

Restores the items/weapons/armors from the respective storage slot.
include_old: true to include the current items to the restored items, false to
            completely replace the inventory with the items from the storage
            slot(s)
slot1, slot2...: Slot numbers. you can define as many storage slot as you want.
Example:
$game_party.restore_items_from_temp(true, 1)
will add the items stored in items storage slot 1 to the current items

$game_party.restore_weapons_from_temp(false, 1, 2, 3)
will replace the current items to be the sum of items stored in weapons storage
slot 1, 2, and 3.

restore_all_items(include_old, [slot1, [slot2].....])

Calls the three methods above.
================================================================================
=end

class Game_Party
  alias cs_item_management_initialize initialize
  def initialize(*args)
    cs_item_management_initialize(*args)
    @temp_items = []
    @temp_weapons = []
    @temp_armors = []
  end
 
  def clone_items_hash(index)
    @temp_items[index] = @items.clone
  end
 
  def clone_weapons_hash(index)
    @temp_weapons[index] = @weapons.clone
  end
 
  def clone_armors_hash(index)
    @temp_armors[index] = @armors.clone
  end
 
  def clone_all_items(index)
    clone_items_hash(index)
    clone_weapons_hash(index)
    clone_armors_hash(index)
  end
 
  def clear_items
    @items.clear
  end
 
  def clear_weapons
    @weapons.clear
  end
 
  def clear_armors
    @armors.clear
  end
 
  def clear_all_items
    clear_items
    clear_weapons
    clear_armors
  end
 
  def restore_items_from_temp(include_old, *args)
    @items = Hash.new(0) unless include_old
    @items.default = 0
    for arg in args
      @temp_items[arg].each{|k, v| @items[k] += v if v != nil}
    end   
  end
 
  def restore_weapons_from_temp(include_old, *args)
    @weapons = Hash.new(0) unless include_old
    @weapons.default = 0
    for arg in args
      @temp_weapons[arg].each{|k, v| @weapons[k] += v if v != nil}
    end   
  end
 
  def restore_armors_from_temp(include_old, *args)
    @armors = Hash.new(0) unless include_old
    @armors.default = 0
    for arg in args
      @temp_armors[arg].each{|k, v| @armors[k] += v if v != nil}
    end   
  end
 
  def restore_all_items(include_old, *args)
    restore_items_from_temp(include_old, *args)
    restore_weapons_from_temp(include_old, *args)
    restore_armors_from_temp(include_old, *args)
  end
end

#===========================================================================
# Rusted Party+ System
#===========================================================================
# untuk menjawab request Theodoric di salah satu thread RMID
#===========================================================================
# Cara Pakai...
#
# ketik script di event...
#
# 1. panggil_party(id)
#    maksudnya adalah memanggil party dengan id yang di tentukan
#    cth : panggil_party(1) <= memanggil party dengan id 1
# 2. gabung_party(id1,id2)
#    maksudnya adalah memanggil party dengan id1 dan kemudian menggabungkan
#    dengan data party dengan id2...
#    cth : gabung_party(1,2) <= memanggil party dengan id 1 dan kemudian
#          menggabungkannya dengan data party dengan id 2
#===========================================================================
# keterangan tambahan...
# party dengan id 1 adalah party awal saat memulai game...
#
# dah gitu aja, semoga membantu...
# klo kurang, atau ada bug... kasih tau ya...
#===========================================================================
class Scene_Title < Scene_Base
  alias rusted_game_objects create_game_objects
  def create_game_objects
    rusted_game_objects
    $party_now = 1
    $party_array = []
  end
end
class Scene_File < Scene_Base
  alias rusted_write_save_data write_save_data
  alias rusted_read_save_data read_save_data
  def write_save_data(file)
    rusted_write_save_data(file)
    Marshal.dump($party_now,            file)
    Marshal.dump($party_array,          file)
  end
  def read_save_data(file)
    rusted_read_save_data(file)
    $party_now        = Marshal.load(file)
    $party_array      = Marshal.load(file)
  end
end
class Game_Party
  def rusted_increase_step(n)
    @steps += n
  end
end
class Game_Interpreter
  def panggil_party(team)
    $party_array[$party_now] = $game_party
    $party_now = team
    if $party_array[team] == nil
      $game_party = Game_Party.new
    else
      $game_party = $party_array[team]
    end
    $game_player.refresh
  end
  def gabung_party(team1,team2)
    $party_array[$party_now] = $game_party
    $party_now = team1
    $game_party = $party_array[team1]
    $game_party.gain_gold($party_array[team2].gold)
    $game_party.rusted_increase_step($party_array[team2].steps)
    for item in $party_array[team2].items
      number = $party_array[team2].item_number(item)
      $game_party.gain_item(item,number)
    end
    $game_player.refresh
  end
end