#-------------------------------------------------------------------------------
# Start Screen XP Version
# Last update : 2010/09/05
# Edited by Guyver's Bane
# Support provided by Night5h4d3 for battle test problem
# Additional edits provided by Night Runner, and stripe103
# Credit if used
#===============================================================================
# This script allows you to have a Start screen upon playing
#==============================================================================#
#
#-------------------------------------------------------------------------------
# Installation: Place above "Main". Basically it's pulg'n play.
#-------------------------------------------------------------------------------
#
#-------------------------------------------------------------------------------
# Instructions
#-------------------------------------------------------------------------------
# You must edit Scene_Title in Main, changing it to Scene_Start. See Example.
# Also BGM can be edited to your liking on line 56. Command sound on line 92.
# And title background on line 48.
#
#-------------------------------------------------------------------------------
#===============================EXAMPLE=========================================
#-------------------------------------------------------------------------------
#begin
# Graphics.freeze
# $scene = Scene_Start.new
# $scene.main while $scene != nil
# Graphics.transition(30)
#rescue Errno::ENOENT
# filename = $!.message.sub("No such file or directory - ", "")
# print("Unable to find file #{filename}.")
#end

class Scene_Start
#--------------------------------------------------------------------------
# * Main Processing
#--------------------------------------------------------------------------
def main
# If battle test
if $BTEST
$scene = Scene_Title.new
end
# Load database
$data_system = load_data("Data/System.rxdata")
# Make system object
$game_system = Game_System.new
# Make title graphic
@sprite = Sprite.new
@sprite.bitmap = RPG::Cache.title("001-Title01")
# Make command window
s1 = " Press Start"
@command_window = Window_Command.new(115, [s1])
@command_window.back_opacity = 160
@command_window.x = 320 - @command_window.width / 2
@command_window.y = 288
# Play title BGM
Audio.bgm_play("Audio/BGM/012-Theme01", 100, 100)
# Execute transition
Graphics.transition
# Main loop
loop do
# Update game screen
Graphics.update
# Update input information
Input.update
# Frame update
update
# Abort loop if screen is changed
if $scene != self
break
end
end
# Prepare for transition
Graphics.freeze
# Dispose of command window
@command_window.dispose
# Dispose of title graphic
@sprite.bitmap.dispose
@sprite.dispose
end
#--------------------------------------------------------------------------
# * Frame Update
#--------------------------------------------------------------------------
def update
# Update command window
@command_window.update
# If C button was pressed
if Input.trigger?(Input::C)
# Branch by command window cursor position
case @command_window.index
when 0 # Start
$game_system.se_play($data_system.decision_se)
#Audio.se_play("Audio/SE/choice1", 100, 100) # this line is optional for a different decision se. To use it just remove the above line.
#$game_system.se_play($data_system.decision_se)
$scene = Scene_Title.new
end
end
end
end

#-------------------------------------------------------------------------------
# Start Screen XP Version
# Last update : 2010/08/05          
# Edited by Guyver's Bane    
# Credit if used
#
# Slightly modified my Stripe103
#===============================================================================
#  This script allows you to have a Start screen upon playing
#==============================================================================#
#
#-------------------------------------------------------------------------------
#  Installation: Place above "Main". Basically it's pulg'n play.
#-------------------------------------------------------------------------------
#
#-------------------------------------------------------------------------------
#                                 Instructions
#-------------------------------------------------------------------------------
#  You must edit Scene_Title in Main, changing it to Scene_Start. See Example.
#  Also BGM can be edited to your liking on line 56. Command sound on line 92.
#  And title background on line 48.
#
#-------------------------------------------------------------------------------
#===============================EXAMPLE=========================================
#-------------------------------------------------------------------------------
#begin
#  Graphics.freeze
#  $scene = Scene_Start.new
#  $scene.main while $scene != nil
#  Graphics.transition(30)
#rescue Errno::ENOENT
#  filename = $!.message.sub("No such file or directory - ", "")
#  print("Unable to find file #{filename}.")
#end

class Scene_Start
  #--------------------------------------------------------------------------
  # * Main Processing
  #--------------------------------------------------------------------------
  def main
    # If battle test
    if $BTEST
      $scene = Scene_Title.new
    end
    # Load database
    $data_system = load_data("Data/System.rxdata")
    # Make system object
    $game_system = Game_System.new
    # Make title graphic
    @sprite = Sprite.new
    @sprite.bitmap = RPG::Cache.title($data_system.title_name)
    # Make command window
    s1 = " Press Start"
    @command_window = Window_Command.new(115, [s1])
    @command_window.back_opacity = 160
    @command_window.x = 320 - @command_window.width / 2
    @command_window.y = 288
    # Play title BGM
    $game_system.bgm_play($data_system.title_bgm)
    # Stop playing ME and BGS
    Audio.me_stop
    Audio.bgs_stop
    # Execute transition
    Graphics.transition
    # Main loop
    loop do
      # Update game screen
      Graphics.update
      # Update input information
      Input.update
      # Frame update
      update
      # Abort loop if screen is changed
      if $scene != self
        break
      end
    end
    # Prepare for transition
    Graphics.freeze
    # Dispose of command window
    @command_window.dispose
    # Dispose of title graphic
    @sprite.bitmap.dispose
    @sprite.dispose
  end
  #--------------------------------------------------------------------------
  # * Frame Update
  #--------------------------------------------------------------------------
  def update
    # Update command window
    @command_window.update
    # If C button was pressed
    if Input.trigger?(Input::C)
      # Branch by command window cursor position
      case @command_window.index
      when 0  # New game
        # Play decision SE
        $game_system.se_play($data_system.decision_se)
        $scene = Scene_Title.new
      end
    end
  end
end

#-------------------------------------------------------------------------------
# Start Screen XP Version
# Last update : 09/Mar/10          
# Edited by Guyver's Bane    
# Further Edits by: Night_Runner
# Credit Guyver's Bane if used.
#===============================================================================
#  This script allows you to have a Start screen upon playing
#==============================================================================#
#
#-------------------------------------------------------------------------------
#  Installation: Place above "Main". Basically it's pulg'n play.
#-------------------------------------------------------------------------------
#
#-------------------------------------------------------------------------------
#                                 Instructions
#-------------------------------------------------------------------------------
#  Also BGM can be edited to your liking on line 56. Command sound on line 92.
#  And title background on line 48.
#
#-------------------------------------------------------------------------------


class Scene_Start
  #--------------------------------------------------------------------------
  # * Main Processing
  #--------------------------------------------------------------------------
  def main
    # If battle test
    if $BTEST
      $scene = Scene_Title.new
    end
    # Load database
    $data_system = load_data("Data/System.rxdata")
    # Make system object
    $game_system = Game_System.new
    # Make title graphic
    @sprite = Sprite.new
    @sprite.bitmap = RPG::Cache.title("001-Title01")
    # Make command window
    s1 = " Press Start"
    @command_window = Window_Command.new(150, [s1])
    @command_window.back_opacity = 160
    @command_window.x = 320 - @command_window.width / 2
    @command_window.y = 288
    # Play title BGM
    Audio.bgm_play("Audio/BGM/012-Theme01", 100, 100)
    # Execute transition
    Graphics.transition
    # Main loop
    loop do
      # Update game screen
      Graphics.update
      # Update input information
      Input.update
      # Frame update
      update
      # Abort loop if screen is changed
      if $scene != self
        break
      end
    end
    # Prepare for transition
    Graphics.freeze
    # Dispose of command window
    @command_window.dispose
    # Dispose of title graphic
    @sprite.bitmap.dispose
    @sprite.dispose
  end
  #--------------------------------------------------------------------------
  # * Frame Update
  #--------------------------------------------------------------------------
  def update
    # Update command window
    @command_window.update
    # If C button was pressed
    if Input.trigger?(Input::C)
      # If the only option is selected.
      $game_system.se_play($data_system.decision_se)
      $scene = Scene_Title.new
    end
  end
  #--------------------------------------------------------------------------
  # * Run this script.
  #--------------------------------------------------------------------------
  $scene = Scene_Start.new
  $scene.main while $scene.is_a?(self)
end