#--------------------------------------------------------------------------
# 시트르산의 나침반 스크립트       V1.00
#--------------------------------------------------------------------------
# 기능 : 맵 상에서 이벤트를 지정하면 방향을 가리키는 스크립트입니다.
# 설명/주의사항 : Graphics/system/ 폴더에  그림파일 
#                 compass_needle.png 와 compass_body.png가 있어야 합니다.
#--------------------------------------------------------------------------


#==============================================================================
# 커스텀 부분.
#==============================================================================
class Window_Base < Window
  def custom_compass
    # 거리의 단위 따옴표 안에서 조절하세요.
    @dis_word = "m"
  end
end
#==============================================================================
# ■ Game_Map
#------------------------------------------------------------------------------
# 　맵의 일부를 재정의 했으므로, 이 스크립트는 가장 아래에 넣어주길 원함.
#==============================================================================
class Scene_Map
  
  #--------------------------------------------------------------------------
  # ● 커스텀 부분
  #--------------------------------------------------------------------------
  def custom
    @compass_x = 510
    @compass_y = 30
    
    # 해당 스위치가 켜지면 나침반이 비활성화
    @switch_num = 50
  end
  
  #--------------------------------------------------------------------------
  # ● 이벤트 상 호출 용 메소드
  #--------------------------------------------------------------------------
  def new_way
    if $game_player.get_way != nil
      #초기화
      @compass_way = []
      
      #배열 받아옴
      for i in 0...$game_player.get_way.size
        #comapass_way 는 여기서 사용할 새 배열. 그 배열안에 값 일일히 대입
        @compass_way.push($game_player.get_way[i])
        if @sprite_for_event[i].bitmap != nil
          if @sprite_for_event[i].character != $game_map.events[$game_player.get_way[i].id]
            @sprite_for_event[i].dispose
            @sprite_for_event[i] = Sprite_Character.new(@viewport1, $game_map.events[$game_player.get_way[i].id] )
          end
        end
        if @sprite_for_event[i].bitmap == nil 
          @sprite_for_event[i] = Sprite_Character.new(@viewport1, $game_map.events[$game_player.get_way[i].id] )
        end      
      end
      
      for i in 0...@sprite_for_event.size
        
        if @sprite_for_event[i].bitmap != nil
          ax = $game_player.x - @compass_way[i].x 
          ay = @compass_way[i].y - $game_player.y
          root = Math.sqrt(ax*ax + ay*ay)
          if ax == 0 && root == 0
            angle_rad2 = 1
          else
            angle_rad2 = Math.acos( ax / root )
          end
          angle = angle_rad2 /  Math::PI * 180 
          #angle += 90
          if ay < 0
            angle = angle*-1
            angle_rad2 *= -1
            #angle += 180
          end
          angle_rad2 -= 90 * Math::PI / 180

          @sprite_for_event[i].x = 57 * Math.sin(angle_rad2)
          @sprite_for_event[i].y = 57 * Math.cos(angle_rad2)
          @sprite_for_event[i].ox = @compass_x - 1613
          @sprite_for_event[i].oy = @compass_y -165
          @sprite_for_event[i].zoom_x = 0.5
          @sprite_for_event[i].zoom_y = 0.5
          @sprite_for_event[i].z = 1510
          
          if i == @now_index
            @sprite_for_event[i].x = 62 * Math.sin(angle_rad2)
            @sprite_for_event[i].y = 62 * Math.cos(angle_rad2)
            @sprite_for_event[i].ox = @compass_x -1240
            @sprite_for_event[i].oy = @compass_y -110
            @sprite_for_event[i].zoom_x = 0.75
            @sprite_for_event[i].zoom_y = 0.75
          end
          #@sprite_for_event[i].angle = angle 
        end
      end

    end
  end


  #--------------------------------------------------------------------------
  # ● 프레임 갱신
  #--------------------------------------------------------------------------
  alias update_n01 update
  #--------------------------------------------------------------------------
  def update
    
    if $game_switches[@switch_num] == true
      @sprite_body.visible = false
      @sprite_needle.visible = false
      @window_name.visible = false
      for i in 0...@sprite_for_event.size
        @sprite_for_event[i].visible = false
      end
    else
      new_way
    
      if @compass_way != nil
        for i in 0...@sprite_for_event.size
          @sprite_for_event[i].visible = true
        end
        @sprite_body.visible = true
        @sprite_needle.visible = true
        @window_name.visible = true
        ax = $game_player.x - @compass_way[@now_index].x 
        ay = @compass_way[@now_index].y - $game_player.y
        root = Math.sqrt(ax*ax + ay*ay)
        if ax == 0 && ay == 0
          angle_rad = 1
        else
          angle_rad = Math.acos( ax / root )
        end
        angle = angle_rad /  Math::PI * 180 
        angle += 90
        
        if ay < 0
          angle = angle*-1
          angle += 180
        end
        
        @sprite_needle.angle = angle 
      end
      if @compass_way != nil
        if Input.trigger?(Input::L)
          @now_index -= 1
          if @now_index < 0
            @now_index += @compass_way.size
          end
        end
          
        if Input.trigger?(Input::R)
          @now_index += 1
          if @now_index >= @compass_way.size
            @now_index -= @compass_way.size
          end
        end
      end
      
      if @now_index != nil && @compass_way != nil
        if @compass_way[@now_index] != nil
          @window_name.get_name($game_map.events[@compass_way[@now_index].id].name)
          @window_name.get_distance(root)
          @window_name.refresh
        end
      end
  
      @sprite_needle.update  
    end
    
    update_n01
  end
  
  
  #--------------------------------------------------------------------------
  # ● 메인 처리 (별명 재정의)
  #--------------------------------------------------------------------------
  alias main_n01 main
  #--------------------------------------------------------------------------
  def main
    @compass_way = nil
    custom
    
    # 나침반 몸통 제작
    @sprite_body = Sprite.new
    @sprite_body.bitmap = Bitmap.new("Graphics/system/compass_body")
    @sprite_body.x = @compass_x
    @sprite_body.y = @compass_y
    @sprite_body.z = 1501
    @sprite_body.visible = false
    
    # 나침반 바늘 제작
    @sprite_needle = Sprite.new
    @sprite_needle.bitmap = Bitmap.new("Graphics/system/compass_needle")
    @sprite_needle.ox = 50
    @sprite_needle.oy = 50
    @sprite_needle.x = @compass_x + 50
    @sprite_needle.y = @compass_y + 50 
    @sprite_needle.z = 1501
    @sprite_needle.visible = false
    
    @sprite_for_event = [Sprite.new, Sprite.new, Sprite.new, Sprite.new, Sprite.new]
    for i in 0...@sprite_for_event.size
      @sprite_for_event[i].z = 1502
    end
    
    @now_index = 0
    
    @window_name = Window_Compass.new(nil)

    
    main_n01
    
    # 장면전환시 해방
    @sprite_body.dispose
    @sprite_needle.dispose
    @window_name.dispose
    if @sprite_for_event != nil
      for i in 0...@sprite_for_event.size
        @sprite_for_event[i].dispose
      end
    end
  end
  
  alias transfer_player_n01 transfer_player
  #--------------------------------------------------------------------------
  def transfer_player
    transfer_player_n01
    @compass_way = nil
    $game_player.way_dispose
    @sprite_body.visible = false
    @sprite_needle.visible = false
    @window_name.visible = false
    for i in 0...@sprite_for_event.size
      @sprite_for_event[i].visible = false
    end

  end
end

#==============================================================================
# ■ Game_Player
#------------------------------------------------------------------------------
# 　이벤트와의 호환을 위해 추가한 메소드
#==============================================================================

class Game_Player
  def new_way(i)
    if @compass_way == nil
      @compass_way = []
    end
    if @compass_way.size == 5
      @compass_way.shift 
      
    end
    #여러 배열을 만들 수 있다.
    @compass_way.push($game_map.events[i])
  end
  def get_way
    return @compass_way
  end
  def way_dispose
    @compass_way = nil
  end
end
#==============================================================================
# ■ Window_Compass
#------------------------------------------------------------------------------
# 　나침반 이름 표시 윈도우
#==============================================================================

class Window_Compass < Window_Base
  #--------------------------------------------------------------------------
  # ● 오브젝트 초기화
  #--------------------------------------------------------------------------
  def initialize(name)
    super(20, 0, 640, 480)
    self.back_opacity = 0
    self.opacity = 0
    self.contents = Bitmap.new(width - 32, height - 32)
    if name != nil
      @name = name
    end
    refresh
  end
  
  # 이름 받아오는 메소드
  def get_name(name)
    @name = name
  end
  # 이름 받아오는 메소드
  def get_distance(distance)
    @distance = distance
  end
  
  #리프레시
  def refresh
    self.contents.clear
    if @name == nil
      return
    end
    draw_event_name(460, 130, @name)
    if @distance == nil
      return
    end
    draw_event_distance (460, 152, @distance)
  end
end

  

#==============================================================================
# ■ Window_Base
#------------------------------------------------------------------------------
# 　게임중의 모든 윈도우의 슈퍼 클래스입니다.
#==============================================================================
class Window_Base < Window
  def draw_event_name (x, y, name)
    self.contents.font.size = 15
    self.contents.font.color = Color.new(0, 0, 0, 255)
    self.contents.draw_text(x+2, y+2, 140, 20, "대상 : " + name)
    self.contents.font.color = text_color(3)
    self.contents.draw_text(x, y, 140, 20, "대상 : " + name)
  end
  def draw_event_distance (x, y, distance)
    custom_compass
    self.contents.font.size = 15
    self.contents.font.color = Color.new(0, 0, 0, 255)
    self.contents.draw_text(x+2, y+2, 120, 20, "거리 : " + distance.to_i.to_s + @dis_word.to_s)
    self.contents.font.color = text_color(3)
    self.contents.draw_text(x, y, 120, 20, "거리 : " + distance.to_i.to_s + @dis_word.to_s)
  end

end

#==============================================================================
# ■ Game_Event
#------------------------------------------------------------------------------
# 　이벤트를 취급하는 클래스입니다.조건 판정에 의한 이벤트 페이지 변환이나, 병렬처리
# 이벤트 실행등의 기능을 가지고 있어 Game_Map 클래스의 내부에서 사용됩니다.
#==============================================================================

class Game_Event < Game_Character
  #--------------------------------------------------------------------------
  # ● 공개 인스턴스 변수
  #--------------------------------------------------------------------------
  attr_reader   :trigger                  # 트리거
  attr_reader   :list                     # 실행 내용
  attr_reader   :starting                 # 기동중 플래그
  attr_reader   :name                     # 네임 추가
  #--------------------------------------------------------------------------
  # ● 오브젝트 초기화
  #     map_id : 맵 ID
  #     event  : 이벤트 (RPG::Event)
  #--------------------------------------------------------------------------
  def initialize(map_id, event)
    super()
    @map_id = map_id
    @event = event
    @name = @event.name
    @id = @event.id
    @erased = false
    @starting = false
    @through = true
    # 초기 위치에 이동
    moveto(@event.x, @event.y)
    refresh
  end
end