v19 Primal Boost 1

################################################################################
# Choose Pokemon For Primal Boost Method
################################################################################

def pbChooseAblePrimalBoostPokemon
  return pbChoosePokemon(1, 3, proc { |pkmn|
    next false if pkmn.isEgg?
    next pkmn.level >= 100
  }) { |pkmn, i|
    next false if !pkmn
    next false if !pkmn.level || pkmn.level < 100
    next true
  }
end


################################################################################
# Primal Boost
################################################################################


class PokemonPrimalBoost
  def initialize
    @pokemon = nil
  end

  def valid_pokemon?(pokemon)
    return true if pokemon.iv.values.any? { |iv| iv < 31 }
    false
  end

  def choose_pokemon
    pbChooseAblePrimalBoostPokemon { |pkmn|  # Use the custom method here
      pkmn.level == 100
    }

    chosen_pokemon_index = pbGet(1)

    return if chosen_pokemon_index == -1

    @pokemon = $Trainer.party[chosen_pokemon_index]
  end

  def primal_boost_pokemon
    choose_pokemon

    return unless @pokemon

    return unless valid_pokemon?(@pokemon)

    increase_all_ivs_by_11(@pokemon)
    reduce_level_and_experience_by_10(@pokemon)

    @pokemon.calc_stats
    
    # Call the original PokemonPrimalBoostScene here
    scene = PokemonPrimalBoostScene.new
    scene.pbStartScene(@pokemon)
    scene.pbPrimalBoost
    scene.pbEndScene

    pbMessage(_INTL("{1} has been Primal Boosted!", @pokemon.name))
  end

  def increase_all_ivs_by_11(pokemon)
    stats = [:HP, :ATTACK, :DEFENSE, :SPECIAL_ATTACK, :SPECIAL_DEFENSE, :SPEED]
    
    stats.each do |stat|
      current_iv = pokemon.iv[stat]
      next if current_iv.nil?
      
      # Increase the IV
      pokemon.iv[stat] = [current_iv + 11, 31].min
    end
  end

  def reduce_level_and_experience_by_10(pokemon)
    new_level = [pokemon.level - 10, 1].max # Ensure level doesn't go below 1
    pokemon.level = new_level
    pokemon.exp = pokemon.growth_rate.minimum_exp_for_level(new_level)
  end
end

# Script Commands: (Requires both commands)
# pbChooseAblePrimalBoostPokemon  # Allows the selection of a level 100 pokemon
# PokemonPrimalBoost.new.primal_boost_pokemon  # Initiates the Primal Boost process for the selected Pokémon

#===============================================================================
# Pokémon Primal Boost Scene
#===============================================================================
class PokemonPrimalBoostScene
  def initialize
    @sprites = {}
    @viewport = Viewport.new(0,0,Graphics.width,Graphics.height)
    @viewport.z = 99999
  end

  def pbStartScene(pokemon)
    @pokemon = pokemon
    addBackgroundOrColoredPlane(@sprites,"background","evolutionbg",
       Color.new(248,248,248),@viewport)

    # Setting up Pokémon Sprite
    rsprite = PokemonSprite.new(@viewport)
    rsprite.setOffset(PictureOrigin::Center)
    rsprite.setPokemonBitmap(@pokemon, false)
    rsprite.x = Graphics.width/2
    rsprite.y = (Graphics.height-64)/2
    @sprites["rsprite"] = rsprite

    pbFadeInAndShow(@sprites)
  end

  def pbPrimalBoost
    # Play your desired SE here
    pbSEPlay("SE_Zoom6", 100, 50)
    zoom_duration = 20   # Frame duration for zoom effect

    # Zoom in effect
    for i in 1..zoom_duration
      @sprites["rsprite"].zoom_x += 0.01
      @sprites["rsprite"].zoom_y += 0.01
      pbUpdate
      Graphics.update
    end

    # Short pause after zoom
    (Graphics.frame_rate/2).times do
      pbUpdate
      Graphics.update
    end

    # Play another SE here
    pbSEPlay("Pkmn move learnt", 100, 50)
    # Wait for the SE to finish
    (Graphics.frame_rate).times do
      pbUpdate
      Graphics.update
    end
  end

  def pbEndScene
    pbFadeOutAndHide(@sprites)
    pbDisposeSpriteHash(@sprites)
    @viewport.dispose
  end

  def pbUpdate
    pbUpdateSpriteHash(@sprites)
  end
end