Foros de Emudesc

#==============================================================================
#    Version 1.3
#    Fix: Shortened the code thank you aliasing.
#    Aliased Main & Update methods.
#------------------------------------------------------------------------------
#  This class performs title screen processing.
#  The edits to this class will allow for an intro in a map to start after
#  Inactivity of the player for a certain period of time.
#==============================================================================

#This is for the ID of the map in which the intro will begin
INTRO_MAP_ID = 2
#This is for the X tile in which to which the player will be put in the intro
INTRO_MAP_BEGIN_X = 1
#This is for the Y tile in which to which the player will be put in the intro
INTRO_MAP_BEGIN_Y = 1
#Intro Wait time [Increase the number to make it wait more]
INTRO_WAIT = 100
#The intro will start with a black screen
PITCH_BLACK = true

class Scene_Title
  #--------------------------------------------------------------------------
  # * Main Processing
  #--------------------------------------------------------------------------
  alias tds_intro_main main  
   def main
    # Variable used for waiting
    @wait = 0    
    # This will lock the transition from title to intro
    @changing_to_intro = false
  tds_intro_main     
end
  #--------------------------------------------------------------------------
  # * Frame Update [Wait added]
  #--------------------------------------------------------------------------
  alias update_tds_intro update  
  def update
  update_tds_intro    
  if @wait < INTRO_WAIT
     @wait += 1 
  end    
    
  if @wait == INTRO_WAIT
      @changing_to_intro = true
      @command_window.contents_opacity -= 5
      @command_window.opacity -= 5
      @command_window.active = false      
      @sprite.opacity -= 5
  if @command_window.contents_opacity == 0 &&  @sprite.opacity == 0
      @command_window.contents_opacity = 0
      @command_window.opacity = 0    
      intro_sequence
    end    
  end        
        
#If any key is pressed the time counter goes back to 0    
 if @changing_to_intro == false     
  if Input.trigger?(Input::UP) or Input.trigger?(Input::DOWN) or 
     Input.trigger?(Input::LEFT) or Input.trigger?(Input::RIGHT) or
     Input.trigger?(Input::A) or Input.trigger?(Input::B) or
     Input.trigger?(Input::C) or Input.trigger?(Input::X) or
     Input.trigger?(Input::Y) or Input.trigger?(Input::Z) or
     Input.trigger?(Input::L) or Input.trigger?(Input::R)
     Input.trigger?(Input::ALT) or Input.trigger?(Input::CTRL) or 
     Input.trigger?(Input::SHIFT)  
     @wait = 0
    end
  end
end
  #--------------------------------------------------------------------------
  # * Command: Intro_sequence
  #--------------------------------------------------------------------------  
  def intro_sequence
    Audio.bgm_fade(800)
    $game_temp          = Game_Temp.new
    $game_system        = Game_System.new
    $game_switches      = Game_Switches.new
    $game_variables     = Game_Variables.new
    $game_self_switches = Game_SelfSwitches.new
    $game_screen        = Game_Screen.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
    # Move to intro map
    $game_map.setup(INTRO_MAP_ID)
    # Move player to initial position
    $game_player.moveto(INTRO_MAP_BEGIN_X, INTRO_MAP_BEGIN_Y) 
    # Refresh player
    $game_player.refresh
    # Run automatic change for BGM and BGS set with map
    $game_map.autoplay
    # Update map (run parallel process event)
    $game_map.update 
    if PITCH_BLACK == true    
    $game_screen.start_tone_change(Tone.new(-255, -255, -255, 0), 0)   
    end
    # Switch to map screen
    $scene = Scene_Map.new 
  end  
end

#==============================================================================
# Intro Skip
#==============================================================================
#------------------------------------------------------------------------------
# Â This causes the intro map to go back to scene title when keys are pressed
#==============================================================================
class Scene_Map
 Â alias tds_intro_map_update update
 Â def update
 Â  Â tds_intro_map_update
 
#Maps that are part of the intro, keep adding ID for all maps [1,2,3,4]
if [2].include?($game_map.map_id) Â  Â  Â  Â  Â  
 Â if Input.trigger?(Input::UP) or Input.trigger?(Input::DOWN) or 
 Â  Â  Input.trigger?(Input::LEFT) or Input.trigger?(Input::RIGHT) or
 Â  Â  Input.trigger?(Input::A) or Input.trigger?(Input::B) or
 Â  Â  Input.trigger?(Input::C) or Input.trigger?(Input::X) or
 Â  Â  Input.trigger?(Input::Y) or Input.trigger?(Input::Z) or
 Â  Â  Input.trigger?(Input::L) or Input.trigger?(Input::R)
 Â  Â  Input.trigger?(Input::ALT) or Input.trigger?(Input::CTRL) or 
 Â  Â  Input.trigger?(Input::SHIFT) 
     $scene = Scene_Title.new   
 Â  Â  Â end
 Â  Â end
 Â end
end