Script Scene_NoTitle(Apresentação antes do Titulo) - Por João Neto

$scene = Scene_Title.new

$scene = Scene_NoTitle.new

=begin
################################################################################
Script Scene_NoTitle - Por João Neto - www.jogosrpg.com.br

Este Script faz com que você possa exibir uma aprensentação
no jogo antes da tela de título. Para definir o mapa da apresentação,
e a posição onde o herói aparecerá, modifique as variáveis
@mapa, @heroi_x e @heroi_y.
Para Usar, apenas Cole-o Acima do Main, e crie sua apresentação num mapa
comum.
Lembre-se de Modificar o seguinte trecho no Main:
$scene = Scene_Title.new para $scene = Scene_NoTitle.new
################################################################################
=end
class Scene_NoTitle < Scene_Base
  def start
    super
    @mapa = 1
    @heroi_x = 1
    @heroi_y = 1
    load_database
    create_game_objects
    command_new_game
  end
  def load_database
    $data_actors        = load_data("Data/Actors.rvdata")
    $data_classes      = load_data("Data/Classes.rvdata")
    $data_skills        = load_data("Data/Skills.rvdata")
    $data_items        = load_data("Data/Items.rvdata")
    $data_weapons      = load_data("Data/Weapons.rvdata")
    $data_armors        = load_data("Data/Armors.rvdata")
    $data_enemies      = load_data("Data/Enemies.rvdata")
    $data_troops        = load_data("Data/Troops.rvdata")
    $data_states        = load_data("Data/States.rvdata")
    $data_animations    = load_data("Data/Animations.rvdata")
    $data_common_events = load_data("Data/CommonEvents.rvdata")
    $data_system        = load_data("Data/System.rvdata")
    $data_areas        = load_data("Data/Areas.rvdata")
  end
  def create_game_objects
    $game_temp          = Game_Temp.new
    $game_message      = Game_Message.new
    $game_system        = Game_System.new
    $game_switches      = Game_Switches.new
    $game_variables    = Game_Variables.new
    $game_self_switches = Game_SelfSwitches.new
    $game_actors        = Game_Actors.new
    $game_party        = Game_Party.new
    $game_troop        = Game_Troop.new
    $game_map          = Game_Map.new
    $game_player        = Game_Player.new
  end
  def command_new_game
    $game_party.setup_starting_members
    $game_map.setup(@mapa)
    $game_player.moveto(@heroi_x, @heroi_y)
    $game_player.refresh
    $scene = Scene_Map.new
    Graphics.fadeout(30)
    Graphics.wait(10)
    Graphics.frame_count = 0
    $game_map.autoplay
  end
end