#==============================================================================
# ** VXAce: NR's Using Items
#------------------------------------------------------------------------------
# History:
#  Date Created: 21 May 2012
#  Created for: Noob_king
#   @> http://www.rpgrevolution.com/forums/index.php?showtopic=56447
#
# Description:
#  This script lets you click on an item from the pause menu, and use it on a
#  pre-configured event.
#
# How to Intsall:
#  Copy this entire script. In your game's editor, along the Menu Bar, click
#  Tools >> Script Editor.
#  Along the left, scroll down to Materials, right click underneath it, and
#  select 'Insert'
#  Paste the code on the right.
#
# How to Use:
#  Have a event with a comment command that reads like so:
#              <UseItem:1,SS:A>
#  where 1 is the ID of the item (ID is found next to the name of the item in
#  the Database) you need to use to activate the event, and A is the
#  self-switch to activate when the item is used.
#==============================================================================



#==============================================================================
# ** Customisation
#==============================================================================

module NR_UsingItems
  Format = /\<UseItem\:(\d+),SS\:([a-zA-Z])\>/
end



#==============================================================================
# ** Scene_Item
#------------------------------------------------------------------------------
#  This class performs the item screen processing.
#==============================================================================

class Scene_Item
  #--------------------------------------------------------------------------
  # * Alias Methods
  #--------------------------------------------------------------------------
  alias nr_useItem_start       start       unless $@
  alias nr_useItem_on_item_ok  on_item_ok  unless $@
  #--------------------------------------------------------------------------
  # * Start Processing
  #--------------------------------------------------------------------------
  def start(*args)
    # Create an array of items usable on the map
    @items_usable_on_map = []
    # Get the spot in front of the player
    player = $game_player
    x2 = $game_map.round_x_with_direction(player.x, player.direction)
    y2 = $game_map.round_y_with_direction(player.y, player.direction)
    # Loop through looking for an event, either under the player or in front
    positions = [ [player.x, player.y], [x2, y2] ]
    events = []
    for xy in positions
      $game_map.events_xy(xy[0], xy[1]).each do |event|
        events << event
      end
    end
    # If an event exists
    if not events.nil?
      # Loop through them
      for event in events
        # Loop through the event's commands
        for command in event.list.to_a
          # If there's a comment
          if command.code == 108
            # If the comment is the correct format
            item = command.parameters[0].scan(NR_UsingItems::Format)[0]
            if not item.nil?
              # List this item as the usable on an event
              item << event
              add_to_items_usable_on_map(item)
            end
          end
        end
      end
    end
    # Run the original start
    return nr_useItem_start(*args)
  end
  #--------------------------------------------------------------------------
  # * Add to items usable on the map
  #--------------------------------------------------------------------------
  def add_to_items_usable_on_map(item)
    @items_usable_on_map << {:item_id => item[0].to_i,
                             :self_switch => item[1],
                             :event_id => item[2].id
                            }
  end
  #--------------------------------------------------------------------------
  # * Item [OK]
  #--------------------------------------------------------------------------
  def on_item_ok(*args)
    # Loop through each item usable
    for map_item in @items_usable_on_map
      # If the usable on map item is selected
      if item.id == map_item[:item_id]
        event_id = map_item[:event_id]
        key = [$game_map.map_id, event_id, map_item[:self_switch]]
        $game_self_switches[key] = true
        $game_map.need_refresh = true
        SceneManager.goto(Scene_Map)
        return
      end
    end
    # If the item is used normally, process normally
    return nr_useItem_on_item_ok(*args)
  end
end



#==============================================================================
# ** End of Script.
#==============================================================================