class CustomGifts
  def self.AAAAAAAAAA
    if $game_switches[98] == false
      #The pichu from Lerucean Town
      pkmn = Pokemon.new(:PICHU, 30)
      pkmn.item = :ZAPPLATE
      pkmn.form = 2           # Spiky-eared
      pkmn.makeFemale
      pkmn.shiny = false
      pkmn.learn_move(:VOLTTACKLE)
      pkmn.learn_move(:HELPINGHAND)
      pkmn.learn_move(:SWAGGER)
      pkmn.learn_move(:PAINSPLIT)
      pkmn.cannot_release = true
      pkmn.cannot_trade = true
      pkmn.calc_stats
      pbAddPokemon(pkmn)
      $game_switches[98] = true
    else
      pbMessage(_INTL("You have already redeemed this code."))
    end
  end
  def self.BBBBBBBBBB
    if $game_switches[99] == false
      # 99 Master Balls
      pbReceiveItem(:MASTERBALL,99)
      $game_switches[99] == true
    else
      pbMessage(_INTL("You have already redeemed this code."))
    end
  end
#Useage guide: 
https://eeveeexpo.com/resources/1113/
  def self.SNORLAXFIX
    if $game_switches[100] == false
      #Fixed Snorlax
      pkmn = Pokemon.new(:SNORLAX, 100)
      pkmn.item = :SNORLAXPPLATE
      pkmn.form = 1           # King
      pkmn.makeMale
      pkmn.shiny = true
      pkmn.learn_move(:SNOR)
      pkmn.learn_move(:FELLSTINGER)
      pkmn.learn_move(:ROOST)
      pkmn.learn_move(:ORIGINPULSE)
      pkmn.cannot_release = true
      pkmn.cannot_trade = true
      pkmn.calc_stats
      pbAddPokemon(pkmn)
      $game_switches[100] == true
    else
      pbMessage(_INTL("You have already redeemed this code."))
    end
  end
  def self.LUGIAROAR
    if $game_switches[100] == false
      #The only way to get Dragon Lugia
      pkmn = Pokemon.new(:Lugia, 20)
      pkmn.item = :DRAGONFANG
      pkmn.form = 99           # Dragon
      pkmn.shiny = true
      pkmn.learn_move(:ICEBEAM)
      pkmn.learn_move(:SURF)
      pkmn.learn_move(:ETERNABEAM)
      pkmn.learn_move(:CONFUSERAY)
      pkmn.cannot_release = true
      pkmn.cannot_trade = true
      pkmn.calc_stats
      pbAddPokemon(pkmn)
      $game_switches[100] == true
    else
      pbMessage(_INTL("You have already redeemed this code."))
    end
  end
  def self.MEWTWOBITE
    if $game_switches[100] == false
      #Mewtwo of ???
      pkmn = Pokemon.new(:MEWTWO, 20)
      pkmn.item = :TWISTEDSPOON
      pkmn.shiny = true
      pkmn.learn_move(:THUNDERBOLT)
      pkmn.learn_move(:CRUNCH)
      pkmn.learn_move(:PRISMATICLASER)
      pkmn.learn_move(:LEECHSEED)
      pkmn.cannot_release = true
      pkmn.cannot_trade = true
      pkmn.calc_stats
      pbAddPokemon(pkmn)
      $game_switches[100] == true
    else
      pbMessage(_INTL("You have already redeemed this code."))
    end
  end
  def self.SQUIRTLEDIG
    if $game_switches[100] == false
      #Digging Squirtle
      pkmn = Pokemon.new(:SQUIRTLE, 20)
      pkmn.item = :SOFTSAND
      pkmn.makeFemale
      pkmn.shiny = true
      pkmn.learn_move(:DIG)
      pkmn.learn_move(:FLY)
      pkmn.learn_move(:BLUEFLARE)
      pkmn.learn_move(:SANDATTACK)
      pkmn.cannot_release = true
      pkmn.cannot_trade = true
      pkmn.calc_stats
      pbAddPokemon(pkmn)
      $game_switches[100] == true
    else
      pbMessage(_INTL("You have already redeemed this code."))
    end
  end
  def self.DUNSPARCE
    if $game_switches[100] == false
      #Will's Dunsparce
      pkmn = Pokemon.new(:DUNSPARCE, 20)
      pkmn.item = :LEFTOVERS
      pkmn.makeMale
      pkmn.shiny = true
      pkmn.learn_move(:DRACOMETEOR)
      pkmn.learn_move(:GUNKSHOT)
      pkmn.learn_move(:BOOMBURST)
      pkmn.learn_move(:HEALORDER)
      pkmn.cannot_release = true
      pkmn.cannot_trade = true
      pkmn.calc_stats
      pbAddPokemon(pkmn)
      $game_switches[100] == true
    else
      pbMessage(_INTL("You have already redeemed this code."))
    end
  end
end
class MysteryCodes
  def self.enterCode
    if pbConfirmMessage(_INTL("Would you like to enter a code?"))
      code = pbMessageFreeText("Enter Code",_INTL(""),false,10)
      if code == "AAAAAAAAAA"
        CustomGifts.AAAAAAAAAA
      elsif code == "BBBBBBBBBB"
        CustomGifts.BBBBBBBBBB
      elsif code == "SNORLAXFIX"
        CustomGifts.SNORLAXFIX
      elsif code == "LUGIAROAR"
        CustomGifts.LUGIAROAR
      elsif code == "MEWTWOBITE"
        CustonGifts.MEWTWOBITE
      end
    else
      pbMessage(_INTL("Please come again soon!"))
    end
  end
end