Ruby Quellcode

# esper_animate(eventid (-1 = player), filename, frames, wait, x, y)
# $game_player.esper_animate(filename, frames, wait, x, y)
# $game_events[eventid].esper_animate(filename, frames, wait, x, y)
 
class Interpreter
  def esper_animate(id, *args)
    (id == -1 ? $game_player : $game_map.events[id]).esper_animate(*args)
  end
end
 
class Game_Character
 
  attr_accessor :esper_animation
 
  alias_method :esper_alias_game_char_initialize_animation, :initialize
  def initialize
    @esper_animation = nil
    @esper_animation_wait = 0
    @esper_animation_memory = nil
    esper_alias_game_char_initialize_animation
  end
 
  alias_method :esper_alias_game_char_update_animation, :update
  def update
    # Branch with jumping, moving, and stopping
    if jumping?
      update_jump
    elsif moving?
      update_move
    else
      update_stop
    end
    # If animation count exceeds maximum value
    # * Maximum value is move speed * 1 taken from basic value 18
    if @anime_count > 18 - @move_speed * 2
      # If stop animation is OFF when stopping
      if not @step_anime and @stop_count > 0
        # Return to original pattern
        @pattern = @original_pattern if !$no_ani
      # If stop animation is ON when moving
      else
        # Update pattern
        @pattern = (@pattern + 1) % 4
      end
      # Clear animation count
      @anime_count = 0
    end
 
    if @esper_animation != nil
      update_esper_animation(*@esper_animation)
    end
 
    # If waiting
    if @wait_count > 0
      # Reduce wait count
      @wait_count -= 1
      return
    end
    # If move route is forced
    if @move_route_forcing
      # Custom move
      move_type_custom
      return
    end
    # When waiting for event execution or locked
    if @starting or lock?
      # Not moving by self
      return
    end
    # If stop count exceeds a certain value (computed from move frequency)
    if @stop_count > (40 - @move_frequency * 2) * (6 - @move_frequency)
      # Branch by move type
      case @move_type
      when 1  # Random
        move_type_random
      when 2  # Approach
        move_type_toward_player
      when 3  # Custom
        move_type_custom
      end
    end
  end
 
  def update_esper_animation(filename, frames, wait, x, y)
    @esper_animation_wait += 1
    if wait <= @esper_animation_wait
      @esper_animation_wait = 0
      @pattern += 1
      if @pattern >= frames
        @character_name = @esper_animation_memory[0]
        @walk_anime = @esper_animation_memory[1]
        @step_anime = @esper_animation_memory[2]
        @esper_animation = nil
        @esper_animation_memory = nil
        $no_ani = false
        @pattern = 0
      end
    end
  end
 
  def esper_animate(filename, frames, wait, x, y)
    @esper_animation_memory = [@character_name, @walk_anime, @step_anime]
    @character_name = filename
    @walk_anime = @step_anime = false
    @esper_animation = [filename, frames, wait, x, y]
    $no_ani = true
  end
end
 
class Sprite_Character
  def update
    super
    esper_anirun = !@character.esper_animation.nil?
    # If tile ID, file name, or hue are different from current ones
    if @tile_id != @character.tile_id or
       @character_name != @character.character_name or
       @character_hue != @character.character_hue
      # Remember tile ID, file name, and hue
      @tile_id = @character.tile_id
      @character_name = @character.character_name
      @character_hue = @character.character_hue
      # If tile ID value is valid
      if @tile_id >= 384
        self.bitmap = RPG::Cache.tile($game_map.tileset_name,
          @tile_id, @character.character_hue)
        self.src_rect.set(0, 0, 32, 32)
        self.ox = 16
        self.oy = 32
      # If tile ID value is invalid
      else
        self.bitmap = RPG::Cache.character(@character.character_name,
          @character.character_hue)
        @cw = bitmap.width / (esper_anirun ? @character.esper_animation[1] : 4)
        @ch = bitmap.height / 4
        self.ox = @cw / 2
        self.oy = @ch
      end
    end
    # Set visible situation
    self.visible = (not @character.transparent)
    # If graphic is character
    if @tile_id == 0
      # Set rectangular transfer
      sx = @character.pattern * @cw
      sy = (@character.direction - 2) / 2 * @ch
      self.src_rect.set(sx, sy, @cw, @ch)
    end
    # Set sprite coordinates
    self.x = @character.screen_x
    self.y = @character.screen_y
    if esper_anirun
      self.x += @character.esper_animation[3]
      self.y += @character.esper_animation[4]
    end
    self.z = @character.screen_z(@ch)
    # Set opacity level, blend method, and bush depth
    self.opacity = @character.opacity
    self.blend_type = @character.blend_type
    self.bush_depth = @character.bush_depth
    # Animation
    if @character.animation_id != 0
      animation = $data_animations[@character.animation_id]
      animation(animation, true)
      @character.animation_id = 0
    end
  end
end