Coliseu - Script

#==============================================================================
# Takkun Engine - Teletransporte
# por Takkun
#==============================================================================
# Atualizações & Informações:
#  Versão: v1.0 - Criado: 10/03/2014
#
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
# Este script adiciona a possibilidade de quando o herói pressione determinada
# tecla ele se teletransporte a uma determinada distância. (A distância pode ser
# configurada no módulo abaixo. Caso queira que ocorra o Fade-Out e Fade in
# quando for teletransportar de um mapa para o outro basta apenas desligar a
# switch que ativa ou desativa o script.
#==============================================================================
$takkunengine = [] if $takkunengine.nil?
$takkunengine << ["Takkun Engine - Teletransporte",1.0]
#==============================================================================
# ** Takkun Engine - Teletransporte
#------------------------------------------------------------------------------
# Módulo de Configuração do Takkun Engine - Teletransporte
#==============================================================================
module Takkun_Teleport
  #Tecla que irá executar o ato de teletransportar.
  Tecla = :X
  #Distância de Teleporte. (Em Tiles)
  Distancia = 1
  #Switch que ativa ou desativa o sistema de teletransportar.
  Switch = 2
  #Som que fará ao personagem teleportar.
  Som = "Teleport"
end
#==============================================================================
# ** Scene_Map
#------------------------------------------------------------------------------
#  Esta classe executa o processamento da tela de mapa.
#==============================================================================
class Scene_Map < Scene_Base
  def pre_transfer
    @map_name_window.close
    case $game_temp.fade_type
    when 0
      if $game_switches[Takkun_Teleport::Switch] == false
      fadeout(fadeout_speed)
    else
      #Deixe aqui vazio mesmo.
    end
    when 1
      if $game_switches[Takkun_Teleport::Switch] == false
      white_fadeout(fadeout_speed)
    else
      #Deixe aqui vazio mesmo.
    end
    end
  end
  def post_transfer
    case $game_temp.fade_type
    when 0
      if $game_switches[Takkun_Teleport::Switch] == false
      Graphics.wait(fadein_speed / 2)
      fadein(fadein_speed)
    else
      #Deixe aqui vazio mesmo.
    end
    when 1
      if $game_switches[Takkun_Teleport::Switch] == false
      Graphics.wait(fadein_speed / 2)
      white_fadein(fadein_speed)
    else
      #Deixe aqui vazio mesmo.
    end
    end
    @map_name_window.open
  end
end
#==============================================================================
# ** Game_Player
#------------------------------------------------------------------------------
#  Esta classe gerencia o jogador.
# A instância desta classe é referenciada por $game_player.
#==============================================================================
class Game_Player < Game_Character
  alias te_neo123_teleport_update update
  def update
    te_neo123_teleport_update
    if $game_switches[Takkun_Teleport::Switch] == true
      if Input.trigger?(Takkun_Teleport::Tecla)
      te_neo123_teleport
    end
    def te_neo123_teleport
      case @direction
      when 2
        $game_player.reserve_transfer($game_map.map_id, @x, @y + Takkun_Teleport::Distancia)
        Audio.se_play('Audio/SE/'+Takkun_Teleport::Som+'.ogg',90,150)
      when 4
        $game_player.reserve_transfer($game_map.map_id, @x - Takkun_Teleport::Distancia, @y)
        Audio.se_play('Audio/SE/'+Takkun_Teleport::Som+'.ogg',90,150)
      when 6
        $game_player.reserve_transfer($game_map.map_id, @x + Takkun_Teleport::Distancia, @y)
        Audio.se_play('Audio/SE/'+Takkun_Teleport::Som+'.ogg',90,150)
      when 8
        $game_player.reserve_transfer($game_map.map_id, @x, @y - Takkun_Teleport::Distancia)
        Audio.se_play('Audio/SE/'+Takkun_Teleport::Som+'.ogg',90,150)
        end
      end
    end
  end
end