=begin
==============================================================================
Writen by: Mr Wiggles
ver. 1.3
Date 12/3/09

This script is for those who want to make the option of haveing the player
decide if they would want to play in full screen with out having to press
Alt + Enter

Instructions:

This script is plug and play, just paste it ABOVE main, and BELLOW everything
else!
lable it Scene_FullPromt and thats it!

Hope you enjoy!  >.<

==============================================================================
=end
#--------------------------------------------------------------------------
#--------------------------------------------------------------------------
# Start Scene_FullPromp
#--------------------------------------------------------------------------
class Scene_FullPromp
#------------------------------------------------------------------------------  
# Begin by loading DataBase
#------------------------------------------------------------------------------
    $data_system = load_data("Data/System.rxdata")
    $game_system = Game_System.new
def main
    s1 = "Full Screen"
    s2 = "Windowed"
    @command_window = Window_Command.new(192, [s1, s2])    
    @command_window.back_opacity = 160
    @command_window.x = 320 - @command_window.width / 2
    @command_window.y = 200
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        break
      end
    end
    Graphics.freeze
    @command_window.dispose
end
#--------------------------------------------------------------------------
#  Update
#--------------------------------------------------------------------------
def update
    @command_window.update
    # If C button was pressed
    if Input.trigger?(Input::C)
      case @command_window.index
      when 0  # Yes
       showm = Win32API.new 'user32', 'keybd_event', %w(l l l l), ''
       showm.call(18,0,0,0)
       showm.call(13,0,0,0)
       showm.call(13,0,2,0)
       showm.call(18,0,2,0)
       $scene = nil
      when 1  # No
       $scene = nil
      end
    end
  end
end
#---------------------------------------------------------------------------
# Re-Write Main - It's Temperary for plug and play
#---------------------------------------------------------------------------
begin
  Graphics.freeze
   $scene = Scene_FullPromp.new
  while $scene != nil
    $scene.main
  end
  Graphics.transition(20)
rescue Errno::ENOENT
  filename = $!.message.sub("No such file or directory - ", "")
  print("Unable to find file #{filename}.")
end