#================================================================
#                  S C E N E _ S E R I A L
# By: Neto Rpg
#================================================================
#
#                  C O N F I G U R A Ç Ã O
#
#================================================================
# Aqui você define o serial do seu jogo, este deve ser o mesmo
# que você gerou pelo gerador de scripts.
# Lembrando que os números/letras NÃO devem ficar entre áspas.
#================================================================
 Serial =            1111-1111-1111-1111
#================================================================
#
#================================================================
# Aqui você define a menságem que irá aparecer caso a pessoa não
# tenha o serial válido.
#================================================================
 Menságem = "Você não possui o Serial."
#================================================================
#
#
#================================================================
#                        I N I C I O
#================================================================
class Scene_TitleS
  def main
  $data_system = load_data("Data/System.rxdata")
  $game_system = Game_System.new
    $scene = Scene_LoadS.new
  end
end
#================================================================
class Scene_SerialF
  def main
    Graphics.transition
    loop do
      Graphics.update
      Input.update
      update
      if $scene != self
        break
      end
    end
    Graphics.freeze
  end
  def update
      on_decision(make_filename(@file_index))
  end
  def make_filename(file_index)
    return "Serial.key"
  end
end
#===============================================================
class Scene_LoadS < Scene_SerialF
  def initialize
    $game_temp = Game_Temp.new
    $game_temp.last_file_index = 0
    latest_time = Time.at(0)
      filename = make_filename(0)
      if FileTest.exist?(filename)
        file = File.open(filename, "r")
        file.close
      end
  end
  def on_decision(filename)
    unless FileTest.exist?(filename)
      $game_system.se_play($data_system.buzzer_se)
      print Menságem
      $scene = nil
      return
      end
    file = File.open(filename, "rb")
    $serial = Marshal.load(file)
    file.close
    if $serial == Serial
      $scene = Scene_Title.new
    else
      print Menságem
      $scene = nil
    end
  end
end