Ruby Quellcode

=begin
* Beschreibung:       Dieses Skript bewirkt beim Antippen einer Richtungstaste 
                      einen Wechsel der Blickrichtung für das XAS 3.91.
* Autor:              Kenai <http://cursalengine.rpg-studio.de/>
* Version:            1.0.0
* Datum:              2012-01-29
=end
 
#*****************************************************************************#
#                         Definition und Deklaration                          #
#*****************************************************************************#
 
class Game_Player < Game_Character
 
#* *** *** *** *** *** *** *** ** Konstanten  ** *** *** *** *** *** *** *** *#
 
  # Wartezeit in Frames bis sich der Spieler beim Drücken der Richtungstaste 
  # bewegt. Umso kleiner dieser Wert, desto zeitiger bewegt sich der Spieler 
  # in die gewünschte Richtung.
  DIRECTION_WAIT = 4
 
#* *** *** *** *** *** *** ***  Klassenaliasing  *** *** *** *** *** *** *** *#
 
  alias :kenai_dir_game_player_initialize :initialize # :nodoc:
 
#* *** *** *** *** *** ** Öffentliche Klassenmethoden ** *** *** *** *** *** *#
 
  # Konstruktor für +Game_Player+.
  def initialize(*args)
    @last_direction   = @direction
    @direction_wait   = 0
    @direction_moving = false
    kenai_dir_game_player_initialize(*args)
  end
 
#* *** *** *** *** *** ** Öffentliche Instanzmethoden ** *** *** *** *** *** *#
 
  # Diese Methode überschreibt das Original von +Game_Player+ aus dem XAS.
  def quarter_confuse_move
    pre_quarter = @quarter
    dir = Input.dir8
    if dir > 0
      if @direction_moving or @last_direction == dir
        if @direction_wait > 0
          @direction_wait -= 1
        else
          case dir
          when 1
            move_right
            move_up  
            @quarter = true
          when 2
            move_up
          when 3
            move_up
            move_left 
            @quarter = true
          when 4
            move_right
          when 6
            move_left
          when 7
            move_down
            move_right    
            @quarter = true
          when 8
            move_down
          when 9
            move_left
            move_down
            @quarter = true
          end
          @last_direction   = dir
          @direction_moving = true
        end
      else
        case dir
        when 2
          turn_down
        when 4
          turn_left
        when 6
          turn_right
        when 8
          turn_up
        end
        @last_direction = dir
        @direction_wait = DIRECTION_WAIT
      end
    else
      @direction_wait   = 0
      @direction_moving = false
    end
    @need_refresh_pose = true if pre_quarter != @quarter
  end  
 
  # Diese Methode überschreibt das Original von +Game_Player+ aus dem XAS.
  def quarter_normal_move 
    pre_quarter = @quarter
    if $game_temp.check_name_time > 0 and self.action == nil and not
      moving? and @quarter
      $game_temp.check_name_time -= 1
      @quarter = false if $game_temp.check_name_time == 0
    end
    dir = Input.dir8
    if dir > 0
      if @direction_moving or @last_direction == dir
        if @direction_wait > 0
          @direction_wait -= 1
        else
          case dir
          when 1
            move_left
            move_down
            @quarter = true
          when 2
            move_down     
          when 3
            move_down
            move_right
            @quarter = true
          when 4
            move_left      
          when 6    
            move_right      
          when 7
            move_up
            move_left   
            @quarter = true
          when 8
            move_up      
          when 9
            move_right
            move_up
            @quarter = true
          end 
          @last_direction   = dir
          @direction_moving = true
        end
      else
        case dir
        when 2
          turn_down
        when 4
          turn_left
        when 6
          turn_right
        when 8
          turn_up
        end
        @last_direction = dir
        @direction_wait = DIRECTION_WAIT
      end
    else
      @direction_wait   = 0
      @direction_moving = false
    end
    $game_temp.check_name_time = XAS::FIX_DIAGONAL_TIME_STAND if moving?
    @need_refresh_pose = true if pre_quarter != @quarter  
  end
 
  # Diese Methode überschreibt das Original von +Game_Player+ aus dem XAS.
  def normal_movement
    dir = Input.dir4
    if dir > 0
      if @direction_moving or @last_direction == dir
        if @direction_wait > 0
          @direction_wait -= 1
        else
          case dir
          when 2
            move_down
          when 4
            move_left
          when 6
            move_right
          when 8
            move_up
          end   
          @last_direction   = dir
          @direction_moving = true
        end
      else
        case dir
        when 2
          turn_down
        when 4
          turn_left
        when 6
          turn_right
        when 8
          turn_up
        end
        @last_direction = dir
        @direction_wait = DIRECTION_WAIT
      end
    else
      @direction_wait   = 0
      @direction_moving = false
    end
  end
 
  # Diese Methode überschreibt das Original von +Game_Player+ aus dem XAS.
  def confuse_movement
    dir = Input.dir4
    if dir > 0
      if @direction_moving or @last_direction == dir
        if @direction_wait > 0
          @direction_wait -= 1
        else
          case dir
          when 2
            move_up
          when 4
            move_right
          when 6
            move_left
          when 8
            move_down
          end 
          @last_direction   = dir
          @direction_moving = true
        end
      else
        case dir
        when 2
          turn_down
        when 4
          turn_left
        when 6
          turn_right
        when 8
          turn_up
        end
        @last_direction = dir
        @direction_wait = DIRECTION_WAIT
      end
    else
      @direction_wait   = 0
      @direction_moving = false
    end
  end 
 
end