#==============================================================================
# Look At Me Now
# Par Fabien & Molok
#==============================================================================

# API
#==============================================================================
# ** Fixnum
#------------------------------------------------------------------------------
# The class for fixed-length integers that fit into the machine's pointer, which is usually
# 31 bits long. If the result of an operation is out of Fixnum range, it is automatically
# extended into a Bignum.
#==============================================================================

class Fixnum
  #--------------------------------------------------------------------------
  # * self see other event
  #--------------------------------------------------------------------------
  def see?(other_event)
    ((self == 0) ? $game_player : $game_map.events[self]).see?(other_event)
  end
  #--------------------------------------------------------------------------
  # * self is in other scope
  #--------------------------------------------------------------------------
  def seen_by?(other_event)
    ((self == 0) ? $game_player : $game_map.events[self]).seen_by?(other_event)
  end
  #--------------------------------------------------------------------------
  # * Events collection look at one event
  #--------------------------------------------------------------------------
  def look_at(x_id,y=nil)
    [self].look_at(x_id, y)
  end
end

#==============================================================================
# ** View_Scope
#------------------------------------------------------------------------------
#  Define a simple ViewScope
#==============================================================================

class View_Scope
  #--------------------------------------------------------------------------
  # * Instances variables
  #--------------------------------------------------------------------------
  attr_accessor :x, :y, :dir, :ray
  #--------------------------------------------------------------------------
  # * Object Initialization
  #--------------------------------------------------------------------------
  def initialize(ray = 2)
    @x = @y = 0
    @ray = 3
    @dir = 2
  end
  #--------------------------------------------------------------------------
  # * x, y scoped ?
  #--------------------------------------------------------------------------
  def in?(x, y)
    if @dir == 2
      return false if y < @y
    elsif @dir == 4
      return false if x > @x
    elsif @dir == 6
      return false if x < @x
    elsif @dir == 8
      return false if y > @y
    end
    collide = ((x - @x)**2) + ((y - @y)**2)
    return !(collide > (@ray**2))
  end
end
#==============================================================================
# ** Game_Character
#------------------------------------------------------------------------------
#  This class deals with characters. It's used as a superclass of the
# Game_Player and Game_Event classes.
#==============================================================================

class Game_Character
  #--------------------------------------------------------------------------
  # * Alias
  #--------------------------------------------------------------------------
  alias scope_update update
  alias scope_initialize initialize
  #--------------------------------------------------------------------------
  # * Instances variables
  #--------------------------------------------------------------------------
  attr_accessor :scope
  #--------------------------------------------------------------------------
  # * Object Initialization
  #--------------------------------------------------------------------------
  def initialize
    scope_initialize
    @scope = View_Scope.new
  end
  #--------------------------------------------------------------------------
  # * self is in other scope
  #--------------------------------------------------------------------------
  def seen_by?(other_event)
    return (other_event == 0 ? $game_player : $game_map.events[other_event]).scope.in?(@x, @y)
  end
  #--------------------------------------------------------------------------
  # * self see other event
  #--------------------------------------------------------------------------
  def see?(other_event)
    ev = (other_event == 0) ? $game_player : $game_map.events[other_event]
    return @scope.in?(ev.x, ev.y)
  end
  #--------------------------------------------------------------------------
  # * Frame Update
  #--------------------------------------------------------------------------
  def update
    @scope.dir = @direction
    @scope.x = @x
    @scope.y = @y
    scope_update
  end
  #--------------------------------------------------------------------------
  # * Turn toward Event
  #--------------------------------------------------------------------------
  def turn_toward(x, y)
    sx = @x - x
    sy = @y - y
    return if sx == 0 and sy == 0
    if sx.abs > sy.abs
      sx > 0 ? turn_left : turn_right   
    else
      sy > 0 ? turn_up : turn_down
    end
  end
end

#==============================================================================
# ** Array
#------------------------------------------------------------------------------
#  The array class. The elements of an array are arbitrary Ruby objects.
#==============================================================================

class Array
  #--------------------------------------------------------------------------
  # * Events collection look at one event
  #--------------------------------------------------------------------------
  def look_at(x_id,y=nil)
    if y == nil
      ev=(x_id==0 ? $game_player : $game_map.events[x_id])
      x,y=ev.x,ev.y
    else
    x,y=x_id,y
    end
    self.each do |event|
      (event==0 ? $game_player : $game_map.events[event]).turn_toward(x,y)
    end
  end
end

#==============================================================================
# ** Range
#------------------------------------------------------------------------------
#  The range object class
#==============================================================================

class Range
  #--------------------------------------------------------------------------
  # * Events collection look at one event
  #--------------------------------------------------------------------------
  def look_at(x_id,y=nil)
    ((self).to_a).look_at(x_id, y)
  end
end