#==============================================================================
# ■ Game_Character (분할 정의 3)
#------------------------------------------------------------------------------
# 　캐릭터를 취급하는 클래스입니다. 이 클래스는 Game_Player 클래스와 Game_Event
# 클래스의 슈퍼 클래스로서 사용됩니다.
#==============================================================================

class Game_Character
  #--------------------------------------------------------------------------
  # ● 아래에 이동
  #     turn_enabled : 그 자리에서의 향해 변경을 허가하는 플래그
  #--------------------------------------------------------------------------
  def move_down(turn_enabled = true)
    # 아래를 향한다
    if turn_enabled
      turn_down
    end
    # 통행 가능한 경우
    if passable? (@x, @y, 2)
      # 아래를 향한다
      turn_down
      # 좌표를 갱신
      @y += 0.5
      # 보수 증가
      increase_steps
    # 통행 불가능한 경우
    else
      # 접촉 이벤트의 기동 판정
      check_event_trigger_touch(@x, @y+1)
    end
  end
  #--------------------------------------------------------------------------
  # ● 왼쪽으로 이동
  #     turn_enabled : 그 자리에서의 향해 변경을 허가하는 플래그
  #--------------------------------------------------------------------------
  def move_left(turn_enabled = true)
    # 왼쪽을 향한다
    if turn_enabled
      turn_left
    end
    # 통행 가능한 경우
    if passable? (@x, @y, 4)
      # 왼쪽을 향한다
      turn_left
      # 좌표를 갱신
      @x -= 0.5
      # 보수 증가
      increase_steps
    # 통행 불가능한 경우
    else
      # 접촉 이벤트의 기동 판정
      check_event_trigger_touch(@x-1, @y)
    end
  end
  #--------------------------------------------------------------------------
  # ● 오른쪽으로 이동
  #     turn_enabled : 그 자리에서의 향해 변경을 허가하는 플래그
  #--------------------------------------------------------------------------
  def move_right(turn_enabled = true)
    # 오른쪽을 향한다
    if turn_enabled
      turn_right
    end
    # 통행 가능한 경우
    if passable? (@x, @y, 6)
      # 오른쪽을 향한다
      turn_right
      # 좌표를 갱신
      @x += 0.5
      # 보수 증가
      increase_steps
    # 통행 불가능한 경우
    else
      # 접촉 이벤트의 기동 판정
      check_event_trigger_touch(@x+1, @y)
    end
  end
  #--------------------------------------------------------------------------
  # ● 위에 이동
  #     turn_enabled : 그 자리에서의 향해 변경을 허가하는 플래그
  #--------------------------------------------------------------------------
  def move_up(turn_enabled = true)
    # 위를 향한다
    if turn_enabled
      turn_up
    end
    # 통행 가능한 경우
    if passable? (@x, @y, 8)
      # 위를 향한다
      turn_up
      # 좌표를 갱신
      @y -= 0.5
      # 보수 증가
      increase_steps
    # 통행 불가능한 경우
    else
      # 접촉 이벤트의 기동 판정
      check_event_trigger_touch(@x, @y-1)
    end
  end
  #--------------------------------------------------------------------------
  # ● 좌하에 이동
  #--------------------------------------------------------------------------
  def move_lower_left
    # 방향 고정이 아닌 경우
    unless @direction_fix
      # 오른쪽 방향이었던 경우는 왼쪽을, 오름새였던 경우는 아래를 향한다
      @direction = (@direction == 6 ?  4 : @direction == 8 ?  2 : @direction)
    end
    # 하→왼쪽, 왼쪽→하의 어느 쪽인가의 코스가 통행 가능한 경우
    if (passable? (@x, @y, 2) and passable? (@x, @y + 1, 4)) or
       (passable? (@x, @y, 4) and passable? (@x - 1, @y, 2))
      # 좌표를 갱신
      @x -= 0.5
      @y += 0.5
      # 보수 증가
      increase_steps
    end
  end
  #--------------------------------------------------------------------------
  # ● 우하에 이동
  #--------------------------------------------------------------------------
  def move_lower_right
    # 방향 고정이 아닌 경우
    unless @direction_fix
      # 좌향이었던 경우는 오른쪽을, 오름새였던 경우는 아래를 향한다
      @direction = (@direction == 4 ?  6 : @direction == 8 ?  2 : @direction)
    end
    # 하→오른쪽, 오른쪽→하의 어느 쪽인가의 코스가 통행 가능한 경우
    if (passable? (@x, @y, 2) and passable? (@x, @y + 1, 6)) or
       (passable? (@x, @y, 6) and passable? (@x + 1, @y, 2))
      # 좌표를 갱신
      @x += 0.5
      @y += 0.5
      # 보수 증가
      increase_steps
    end
  end
  #--------------------------------------------------------------------------
  # ● 좌상에 이동
  #--------------------------------------------------------------------------
  def move_upper_left
    # 방향 고정이 아닌 경우
    unless @direction_fix
      # 오른쪽 방향이었던 경우는 왼쪽을, 하향이었던 경우는 위를 향한다
      @direction = (@direction == 6 ?  4 : @direction == 2 ?  8 : @direction)
    end
    # 상→왼쪽, 왼쪽→상의 어느 쪽인가의 코스가 통행 가능한 경우
    if (passable? (@x, @y, 8) and passable? (@x, @y - 1, 4)) or
       (passable? (@x, @y, 4) and passable? (@x - 1, @y, 8))
      # 좌표를 갱신
      @x -= 0.5
      @y -= 0.5
      # 보수 증가
      increase_steps
    end
  end
  #--------------------------------------------------------------------------
  # ● 우상에 이동
  #--------------------------------------------------------------------------
  def move_upper_right
    # 방향 고정이 아닌 경우
    unless @direction_fix
      # 좌향이었던 경우는 오른쪽을, 하향이었던 경우는 위를 향한다
      @direction = (@direction == 4 ?  6 : @direction == 2 ?  8 : @direction)
    end
    # 상→오른쪽, 오른쪽→상의 어느 쪽인가의 코스가 통행 가능한 경우
    if (passable? (@x, @y, 8) and passable? (@x, @y - 1, 6)) or
       (passable? (@x, @y, 6) and passable? (@x + 1, @y, 8))
      # 좌표를 갱신
      @x += 0.5
      @y -= 0.5
      # 보수 증가
      increase_steps
    end
  end
  #--------------------------------------------------------------------------
  # ● 랜덤에 이동
  #--------------------------------------------------------------------------
  def move_random
    case rand(4)
    when 0  # 하에 이동
      move_down(false)
    when 1  # 왼쪽으로 이동
      move_left(false)
    when 2  # 오른쪽으로 이동
      move_right(false)
    when 3  # 상에 이동
      move_up(false)
    end
  end
  #--------------------------------------------------------------------------
  # ● 플레이어에 가까워진다
  #--------------------------------------------------------------------------
  def move_toward_player
    # 플레이어의 좌표와의 차이를 요구한다
    sx = @x - $game_player.x
    sy = @y - $game_player.y
    # 좌표가 동일한 경우
    if sx == 0 and sy == 0
      return
    end
    # 차이의 절대치를 요구한다
    abs_sx = sx.abs
    abs_sy = sy.abs
    # 옆의 거리와 세로의 거리가 동일한 경우
    if abs_sx == abs_sy
      # 랜덤으로 어느 쪽인지를 1 늘린다
      rand(2) == 0 ?  abs_sx += 1 : abs_sy += 1
    end
    # 옆의 거리 쪽이 긴 경우
    if abs_sx > abs_sy
      # 좌우 방향을 우선해, 플레이어가 있는 편에 이동
      sx > 0 ?  move_left : move_right
      if not moving?  and sy != 0
        sy > 0 ?  move_up : move_down
      end
    # 세로의 거리 쪽이 긴 경우
    else
      # 상하 방향을 우선해, 플레이어가 있는 편에 이동
      sy > 0 ?  move_up : move_down
      if not moving?  and sx != 0
        sx > 0 ?  move_left : move_right
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 플레이어로부터 멀어진다
  #--------------------------------------------------------------------------
  def move_away_from_player
    # 플레이어의 좌표와의 차이를 요구한다
    sx = @x - $game_player.x
    sy = @y - $game_player.y
    # 좌표가 동일한 경우
    if sx == 0 and sy == 0
      return
    end
    # 차이의 절대치를 요구한다
    abs_sx = sx.abs
    abs_sy = sy.abs
    # 옆의 거리와 세로의 거리가 동일한 경우
    if abs_sx == abs_sy
      # 랜덤으로 어느 쪽인지를 1 늘린다
      rand(2) == 0 ?  abs_sx += 1 : abs_sy += 1
    end
    # 옆의 거리 쪽이 긴 경우
    if abs_sx > abs_sy
      # 좌우 방향을 우선해, 플레이어의 없는 편에 이동
      sx > 0 ?  move_right : move_left
      if not moving?  and sy != 0
        sy > 0 ?  move_down : move_up
      end
    # 세로의 거리 쪽이 긴 경우
    else
      # 상하 방향을 우선해, 플레이어의 없는 편에 이동
      sy > 0 ?  move_down : move_up
      if not moving?  and sx != 0
        sx > 0 ?  move_right : move_left
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 한 걸음 전진
  #--------------------------------------------------------------------------
  def move_forward
    case @direction
    when 2
      move_down(false)
    when 4
      move_left(false)
    when 6
      move_right(false)
    when 8
      move_up(false)
    end
  end
  #--------------------------------------------------------------------------
  # ● 한 걸음 후퇴
  #--------------------------------------------------------------------------
  def move_backward
    # 방향 고정 상태를 기억
    last_direction_fix = @direction_fix
    # 강제적으로 향해 고정
    @direction_fix = true
    # 방향으로 분기
    case @direction
    when 2  # 하
      move_up(false)
    when 4  # 왼쪽
      move_right(false)
    when 6  # 오른쪽
      move_left(false)
    when 8  # 상
      move_down(false)
    end
    # 방향 고정 상태를 바탕으로 되돌린다
    @direction_fix = last_direction_fix
  end
  #--------------------------------------------------------------------------
  # ● 점프
  #     x_plus : X 좌표 가산치
  #     y_plus : Y 좌표 가산치
  #--------------------------------------------------------------------------
  def jump(x_plus, y_plus)
    # 가산치가 (0,0)가 아닌 경우
    if x_plus != 0 or y_plus != 0
      # 옆의 거리 쪽이 긴 경우
      if x_plus.abs > y_plus.abs
        # 좌우 어딘가에 향해 변경
        x_plus < 0 ?  turn_left : turn_right
      # 세로의 거리 쪽이 긴가 동일한 경우
      else
        # 상하 어딘가에 향해 변경
        y_plus < 0 ?  turn_up : turn_down
      end
    end
    # 새로운 좌표를 계산
    new_x = @x + x_plus
    new_y = @y + y_plus
    # 가산치가 (0,0)의 경우인가, 점프처가 통행 가능한 경우
    if (x_plus == 0 and y_plus == 0) or passable? (new_x, new_y, 0)
      # 자세를 교정
      straighten
      # 좌표를 갱신
      @x = new_x
      @y = new_y
      # 거리를 계산
      distance = Math.sqrt(x_plus * x_plus + y_plus * y_plus). round
      # 점프 카운트를 설정
      @jump_peak = 10 + distance - @move_speed
      @jump_count = @jump_peak * 2
      # 정지 카운트를 클리어
      @stop_count = 0
    end
  end
  #--------------------------------------------------------------------------
  # ● 아래를 향한다
  #--------------------------------------------------------------------------
  def turn_down
    unless @direction_fix
      @direction = 2
    end
  end
  #--------------------------------------------------------------------------
  # ● 왼쪽을 향한다
  #--------------------------------------------------------------------------
  def turn_left
    unless @direction_fix
      @direction = 4
    end
  end
  #--------------------------------------------------------------------------
  # ● 오른쪽을 향한다
  #--------------------------------------------------------------------------
  def turn_right
    unless @direction_fix
      @direction = 6
    end
  end
  #--------------------------------------------------------------------------
  # ● 위를 향한다
  #--------------------------------------------------------------------------
  def turn_up
    unless @direction_fix
      @direction = 8
    end
  end
  #--------------------------------------------------------------------------
  # ● 오른쪽으로 90 번 회전
  #--------------------------------------------------------------------------
  def turn_right_90
    case @direction
    when 2
      turn_left
    when 4
      turn_up
    when 6
      turn_down
    when 8
      turn_right
    end
  end
  #--------------------------------------------------------------------------
  # ● 왼쪽으로 90 번 회전
  #--------------------------------------------------------------------------
  def turn_left_90
    case @direction
    when 2
      turn_right
    when 4
      turn_down
    when 6
      turn_up
    when 8
      turn_left
    end
  end
  #--------------------------------------------------------------------------
  # ● 180 번 회전
  #--------------------------------------------------------------------------
  def turn_180
    case @direction
    when 2
      turn_up
    when 4
      turn_right
    when 6
      turn_left
    when 8
      turn_down
    end
  end
  #--------------------------------------------------------------------------
  # ● 오른쪽이나 왼쪽으로 90 번 회전
  #--------------------------------------------------------------------------
  def turn_right_or_left_90
    if rand(2) == 0
      turn_right_90
    else
      turn_left_90
    end
  end
  #--------------------------------------------------------------------------
  # ● 랜덤에 방향 전환
  #--------------------------------------------------------------------------
  def turn_random
    case rand(4)
    when 0
      turn_up
    when 1
      turn_right
    when 2
      turn_left
    when 3
      turn_down
    end
  end
  #--------------------------------------------------------------------------
  # ● 플레이어의 분을 향한다
  #--------------------------------------------------------------------------
  def turn_toward_player
    # 플레이어의 좌표와의 차이를 요구한다
    sx = @x - $game_player.x
    sy = @y - $game_player.y
    # 좌표가 동일한 경우
    if sx == 0 and sy == 0
      return
    end
    # 옆의 거리 쪽이 긴 경우
    if sx.abs > sy.abs
      # 좌우 방향으로 플레이어가 있는 편을 향한다
      sx > 0 ?  turn_left : turn_right
    # 세로의 거리 쪽이 긴 경우
    else
      # 상하 방향으로 플레이어가 있는 편을 향한다
      sy > 0 ?  turn_up : turn_down
    end
  end
  #--------------------------------------------------------------------------
  # ● 플레이어의 역을 향한다
  #--------------------------------------------------------------------------
  def turn_away_from_player
    # 플레이어의 좌표와의 차이를 요구한다
    sx = @x - $game_player.x
    sy = @y - $game_player.y
    # 좌표가 동일한 경우
    if sx == 0 and sy == 0
      return
    end
    # 옆의 거리 쪽이 긴 경우
    if sx.abs > sy.abs
      # 좌우 방향으로 플레이어의 없는 편을 향한다
      sx > 0 ?  turn_right : turn_left
    # 세로의 거리 쪽이 긴 경우
    else
      # 상하 방향으로 플레이어의 없는 편을 향한다
      sy > 0 ?  turn_down : turn_up
    end
  end
end