animação de sprite por tecla

#=================================================================
#--------------- animação quadro a quadro-------------------------
# By : Maephel
# é necessário ter o imput_master do valentine
# Personagem mostra uma animação quadro a quadro quando você
# aperta "x"
#-----------------------------------------------------------------
module ATTK
  # sufixo do gráfico do personagem atacando
  # Para poder usar o script coloque o grafico do seu char
  # atacando assim:
  #Nomedochar-attk (Ex: hero01-attk
  IMG_ATTK = "-attk"
  # A tecla que faz atacar
  ATTK_TECLA = (Input::Key['X'])
  ATK_SWITCH = 0 #id da switch que vai ligar quando atacar
  #0 para nenhuma
end
#-----------------------------------------------------------------
# Fim da Edição
#=================================================================
class Game_Character
  alias attk_initialize initialize
  def initialize
    attk_initialize
    @atacando = false
  end
end

class Game_Player < Game_Character
  alias attkgp_initialize initialize
  alias attkgp_update update
  def update
    actor = $game_party.actors[0]
    def img_attk?(actor)
      begin
        RPG::Cache.character(actor.character_name.to_s + ATTK::IMG_ATTK, actor.character_hue)
      rescue
        return false
      end
      return true
    end
    unless @atacando == true
      if Input.trigger?(ATTK::ATTK_TECLA)
        atacar
      end
    else
      if Input.trigger?(ATTK::ATTK_TECLA) or moving? or @pattern >= 3
        @step_anime = false
        @anime_count = 0
        @pattern = 0
        @move_speed = 4
        @character_name = actor.character_name
        @atacando = false
        if ATTK::ATK_SWITCH != 0
          $game_switches[ATTK::ATK_SWITCH] = false
        end
      end
    end
    attkgp_update
  end
  def atacar
    actor = $game_party.actors[0]
    if img_attk?(actor)
      @character_name = actor.character_name + ATTK::IMG_ATTK
      #@move_speed = 8
      @step_anime = true
    end
    @atacando = true
    if ATTK::ATK_SWITCH != 0
      $game_switches[ATTK::ATK_SWITCH] = true
    end
  end
end