module OptionTypes
  WILD_POKE = 0
  TRAINER_POKE = 1
end

class ExperimentalOptionsScene < PokemonOption_Scene
  def initialize
    super
    @openTrainerOptions = false
    @openWildOptions = false
    @openGymOptions = false
    @openItemOptions = false
    $game_switches[SWITCH_RANDOMIZED_AT_LEAST_ONCE] = true
  end

  def getDefaultDescription
    return _INTL("Set the randomizer settings")
  end

  def pbStartScene(inloadscreen = false)
    super
    @changedColor = true
    @sprites["title"] = Window_UnformattedTextPokemon.newWithSize(
      _INTL("Experimental options"), 0, 0, Graphics.width, 64, @viewport)
    @sprites["textbox"].text = getDefaultDescription
    pbFadeInAndShow(@sprites) { pbUpdate }
  end

  def pbGetOptions(inloadscreen = false)
    options = [
      EnumOption.new(_INTL("Expert mode (beta)"), [_INTL("On"), _INTL("Off")],
                     proc {
                       $game_switches[SWITCH_EXPERT_MODE] ? 0 : 1
                     },
                     proc { |value|
                       $game_switches[SWITCH_EXPERT_MODE] = value == 0
                     }, "Changes all of the trainer teams to make them as challenging as possible!"
      ),
      EnumOption.new(_INTL("No levels mode"), [_INTL("On"), _INTL("Off")],
                     proc {
                       $game_switches[SWITCH_NO_LEVELS_MODE] ? 0 : 1
                     },
                     proc { |value|
                       $game_switches[SWITCH_NO_LEVELS_MODE] = value == 0
                     }, "All Pokémon use their base stats, regardless of levels."
      ),
      EnumOption.new(_INTL("Reversed mode"), [_INTL("On"), _INTL("Off")],
                     proc {
                       $game_switches[SWITCH_REVERSED_MODE] ? 0 : 1
                     },
                     proc { |value|
                       $game_switches[SWITCH_REVERSED_MODE] = value == 0
                     }, "Inverts the fusions of all the trainers in the game."
      )

    #,
          # EnumOption.new(_INTL("Double abilities"), [_INTL("On"), _INTL("Off")],
          #                proc {
          #                  $game_switches[SWITCH_DOUBLE_ABILITIES] ? 0 : 1
          #                },
          #                proc { |value|
          #                  $game_switches[SWITCH_DOUBLE_ABILITIES] = value == 0
          #                }, "Fused Pokémon have two abilities at the same time"
          #)

    ]
    return options
  end


end