ТЕМА: Восьмифреймовое движение [XP]

# Скрипт для мультифреймовой анимации
# Game_Character.frames_count задает число кадров анимации (по умолчанию настроен на 8 кадров)
# Game_Character.frames_speed управляет скоростью анимации (по умолчанию настроен на адекватную скорость для  frames_count == 8)
 
class Game_Character
  attr_accessor :frames_count
  attr_accessor :frames_speed
 
  alias old_initialize initialize
  def initialize
    @frames_count=8
    @frames_speed=8
    old_initialize
  end
 
  def set_frames_count(count)
    @frames_count=count
    return
  end
 
  def set_frames_speed(speed)
    @frames_speed=speed
    return
  end
 
   alias old_update update
   def update
    if jumping?
      update_jump
    elsif moving?
      update_move
    else
      update_stop
    end
    if @anime_count > 18 - @move_speed * 2
      if not @step_anime and @stop_count > 0
        @pattern = @original_pattern
      else
        @pattern = (@pattern + 1) % @frames_count
      end
      @anime_count = 0
    end
    if @wait_count > 0
      @wait_count -= 1
      return
    end
    if @move_route_forcing
      move_type_custom
      return
    end
    if @starting or lock?
      return
    end
    if @stop_count > (40 - @move_frequency * 2) * (6 - @move_frequency)
      case @move_type
      when 1
        move_type_random
      when 2
        move_type_toward_player
      when 3
        move_type_custom
      end
    end
  end
 
  alias old_update_move update_move
  def update_move
    distance = 2 ** @move_speed
    if @y * 128 > @real_y
      @real_y = [@real_y + distance, @y * 128].min
    end
    if @x * 128 < @real_x
      @real_x = [@real_x - distance, @x * 128].max
    end
    if @x * 128 > @real_x
      @real_x = [@real_x + distance, @x * 128].min
    end
    if @y * 128 < @real_y
      @real_y = [@real_y - distance, @y * 128].max
    end
    if @walk_anime
      @anime_count += (1 + @frames_speed*0.1) * (@frames_count / 4)
    elsif @step_anime
      @anime_count += (1 + @frames_speed/2*0.1)* (@frames_count / 4)
    end
  end
 
  alias old_update_stop update_stop
  def update_stop
    if @step_anime
      @anime_count += (1 + @frames_speed/2*0.1)* (@frames_count / 4)
    elsif @pattern != @original_pattern
      @anime_count += (1 + @frames_speed*0.1)  * (@frames_count / 4)
    end
    unless @starting or lock?
      @stop_count += 1
    end
  end
 
end
 
class Sprite_Character 
 
  alias old_update update
  def update
    super
    if @tile_id != @character.tile_id or
       @character_name != @character.character_name or
       @character_hue != @character.character_hue
      @tile_id = @character.tile_id
      @character_name = @character.character_name
      @character_hue = @character.character_hue
      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
      else
        self.bitmap = RPG::Cache.character(@character.character_name,
          @character.character_hue)
        @cw = bitmap.width / @character.frames_count
        @ch = bitmap.height / 4
        self.ox = @cw / 2
        self.oy = @ch
      end
    end
    self.visible = (not @character.transparent)
    if @tile_id == 0
      sx = @character.pattern * @cw
      sy = (@character.direction - 2) / 2 * @ch
      self.src_rect.set(sx, sy, @cw, @ch)
    end
    self.x = @character.screen_x
    self.y = @character.screen_y
    self.z = @character.screen_z(@ch)
    self.opacity = @character.opacity
    self.blend_type = @character.blend_type
    self.bush_depth = @character.bush_depth
    if @character.animation_id != 0
      animation = $data_animations[@character.animation_id]
      animation(animation, true)
      @character.animation_id = 0
    end
  end
end
 
class Game_Map
  # задать framecount самому
  def set_event_framecount(ev_id, count)
    @events[ev_id].set_frames_count(count)
  end
  # задать framespeed самому
  def set_event_framespeed(ev_id, speed)
    @events[ev_id].set_frames_speed(count)
  end
end

# Скрипт для мультифреймовой анимации
# Game_Character.frames_count задает число кадров анимации (по умолчанию настроен на 8 кадров)
# Game_Character.frames_speed управляет скоростью анимации (по умолчанию настроен на адекватную скорость для  frames_count == 8)
 
class Game_Character
  attr_accessor :frames_count
  attr_accessor :frames_speed
 
  alias old_initialize initialize
  def initialize
    @frames_count=8
    @frames_speed=8
    old_initialize
  end
 
  def set_frames_count(count)
    @frames_count=count
    return
  end
 
  def set_frames_speed(speed)
    @frames_speed=speed
    return
  end
 
   alias old_update update
   def update
    if jumping?
      update_jump
    elsif moving?
      update_move
    else
      update_stop
    end
    if @anime_count > 18 - @move_speed * 2
      if not @step_anime and @stop_count > 0
        @pattern = @original_pattern
      else
        @pattern = (@pattern + 1) % @frames_count
      end
      @anime_count = 0
    end
    if @wait_count > 0
      @wait_count -= 1
      return
    end
    if @move_route_forcing
      move_type_custom
      return
    end
    if @starting or lock?
      return
    end
    if @stop_count > (40 - @move_frequency * 2) * (6 - @move_frequency)
      case @move_type
      when 1
        move_type_random
      when 2
        move_type_toward_player
      when 3
        move_type_custom
      end
    end
  end
 
  alias old_update_move update_move
  def update_move
    distance = 2 ** @move_speed
    if @y * 128 > @real_y
      @real_y = [@real_y + distance, @y * 128].min
    end
    if @x * 128 < @real_x
      @real_x = [@real_x - distance, @x * 128].max
    end
    if @x * 128 > @real_x
      @real_x = [@real_x + distance, @x * 128].min
    end
    if @y * 128 < @real_y
      @real_y = [@real_y - distance, @y * 128].max
    end
    if @walk_anime
      @anime_count += (1 + @frames_speed*0.1) * (@frames_count / 4)
    elsif @step_anime
      @anime_count += (1 + @frames_speed/2*0.1)* (@frames_count / 4)
    end
  end
 
  alias old_update_stop update_stop
  def update_stop
    if @step_anime
      @anime_count += (1 + @frames_speed/2*0.1)* (@frames_count / 4)
    elsif @pattern != @original_pattern
      @anime_count += (1 + @frames_speed*0.1)  * (@frames_count / 4)
    end
    unless @starting or lock?
      @stop_count += 1
    end
  end
 
end
 
class Sprite_Character 
 
  alias old_update update
  def update
    super
    if @tile_id != @character.tile_id or
       @character_name != @character.character_name or
       @character_hue != @character.character_hue
      @tile_id = @character.tile_id
      @character_name = @character.character_name
      @character_hue = @character.character_hue
      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
      else
        self.bitmap = RPG::Cache.character(@character.character_name,
          @character.character_hue)
        @cw = bitmap.width / @character.frames_count
        @ch = bitmap.height / 4
        self.ox = @cw / 2
        self.oy = @ch
      end
    end
    self.visible = (not @character.transparent)
    if @tile_id == 0
      sx = @character.pattern * @cw
      sy = (@character.direction - 2) / 2 * @ch
      self.src_rect.set(sx, sy, @cw, @ch)
    end
    self.x = @character.screen_x
    self.y = @character.screen_y
    self.z = @character.screen_z(@ch)
    self.opacity = @character.opacity
    self.blend_type = @character.blend_type
    self.bush_depth = @character.bush_depth
    if @character.animation_id != 0
      animation = $data_animations[@character.animation_id]
      animation(animation, true)
      @character.animation_id = 0
    end
  end
end
 
class Game_Map
  # задать framecount самому
  def set_event_framecount(ev_id, count)
    @events[ev_id].set_frames_count(count)
  end
  # задать framespeed самому
  def set_event_framespeed(ev_id, speed)
    @events[ev_id].set_frames_speed(count)
  end
end
 
class Game_Event
  alias mfg_refresh refresh
  def refresh
    mfg_refresh
    setup_frames(@page.nil?)
  end
 
  def setup_frames(dispose)
    unless dispose && @list.nil?
      for command in @list
        if command.code == 108 && command.parameters[0].include?("[frames")
          command.parameters[0].scan(/\[frames ([0.0-9.9]+)\]/)
          set_frames_count($1.to_i)
          return
        end
      end
    end
  end
end

# Скрипт для мультифреймовой анимации
# версия: 1.1
# автор: caveman
#
# Использование:
# 1) $game_map.set_event_framecount(ev_id, count) - задать число фреймов
# анимации событию
# 2) $game_map.set_event_framespeed(ev_id, count) - задать скорость проигрывания
# фреймов событию
# 3) Упрощенный вариант - поместить на страничку события комментарий вида
# [frames 8] - ставит этому событию 8 фреймовую анимацию
#
# Для нестандартного числа фреймов нужны нестандартные чарсеты
# горизонтальный размер кратен числу фреймов (изначально - 4)
# Вертикальный размер равен 4, как и раньше.
#
# Скрипт не поддерживает VX чарсеты 3х4 и большие VX чарсеты с кучей чаров
# ТОЛЬКО XP. ТОЛЬКО ХАРДКОР!
 
class Game_CharacterBase
  attr_accessor :frames_count
  attr_accessor :frames_speed
 
  alias mfa_initialize initialize
  def initialize
    @frames_count=8 
    @frames_speed=5
    mfa_initialize
  end
 
  def set_frames_count(count)
    @frames_count=count
    return
  end
 
  def set_frames_speed(speed)
    @frames_speed=speed
    return
  end
 
  alias mfa_update_anime_pattern update_anime_pattern
  def update_anime_pattern
    if !@step_anime && @stop_count > 0
      @pattern = @original_pattern
    else
      @pattern = (@pattern + 1) % @frames_count
    end
  end
 
  alias mfa_update_anime_count update_anime_count
  def update_anime_count
    if moving? && @walk_anime
      #@anime_count += 1.5
      @anime_count += (1 + @frames_speed*0.1) * (@frames_count / 4)
    elsif @step_anime || @pattern != @original_pattern
      #@anime_count += 1
      @anime_count += (1 + @frames_speed/2*0.1)* (@frames_count / 4)
    end
  end
end
 
 
class Game_Map
  def set_event_framecount(ev_id, count)
    @events[ev_id].set_frames_count(count)
  end
 
  def set_event_framespeed(ev_id, speed)
    @events[ev_id].set_frames_speed(count)
  end
end
 
 
class Sprite_Character
  alias mfa_set_character_bitmap set_character_bitmap
  def set_character_bitmap
    self.bitmap = Cache.character(@character_name)
    sign = @character_name[/^[\!\$]./]
    if sign && sign.include?('$')
      @cw = bitmap.width / (@character.frames_count - 1)
      @ch = bitmap.height / 4
    else
      @cw = bitmap.width / @character.frames_count
      @ch = bitmap.height / 4
    end
    self.ox = @cw / 2
    self.oy = @ch
  end
 
  alias mfa_update_src_rect update_src_rect
  def update_src_rect
    if @tile_id == 0
      index = @character.character_index
      pattern = @character.pattern < @character.frames_count ? @character.pattern : 1
      sx = pattern * @cw
      sy = (index / 4 * 4 + (@character.direction - 2) / 2) * @ch
      self.src_rect.set(sx, sy, @cw, @ch)
    end
  end
end
 
 
class Game_Event
  alias mfa_setup_page setup_page
  def setup_page(new_page)
    mfa_setup_page(new_page)
    setup_frames(@page.nil?)
  end
 
  def setup_frames(dispose)
    unless dispose && @list.nil?
      for command in @list
        if command.code == 108 && command.parameters[0].include?("[frames")
          command.parameters[0].scan(/\[frames ([0.0-9.9]+)\]/)
          set_frames_count($1.to_i)
          return
        end
      end
    end
  end
end