# Paste this underneath the Firestone ItemHandler in PItem_ItemEffects:

  def hasFantasy?(pokemon)
    if pokemon.isConst?(pokemon.species,PBSpecies,:SOLOSIS)
      return true
    end
  end

ItemHandlers::UseOnPokemon.add(:FANTASYSERUM,proc{|item,pokemon,scene|
   if (pokemon.isShadow? rescue false)
     scene.pbDisplay(_INTL("It won't have any effect."))
     next false
   end
   if pokemon.level < 30
     scene.pbDisplay(_INTL("It won't have any effect."))
     next false
   end
   if !hasFantasy?(pokemon)
     scene.pbDisplay(_INTL("It won't have any effect."))
     next false
   end
   newspecies=pbCheckEvolution(pokemon,item)
   if newspecies<=0
     scene.pbDisplay(_INTL("It won't have any effect."))
     next false
   else
     pokemon.form = 1
     pbFadeOutInWithMusic(99999){
        evo=PokemonEvolutionScene.new
        evo.pbStartScreen(pokemon,newspecies)
        evo.pbEvolution(false)
        evo.pbEndScreen
        scene.pbRefreshAnnotations(proc{|p| pbCheckEvolution(p,item)>0 })
        scene.pbRefresh
     }
     next true
   end
})



# At the very top of "module PBEvoltion" in Pokemon_Evolution, you will see a 35 slot long list. At 31 (For others probably Custom1 by # default), add "Serum" (no quotes):

  Serum             = 31


# In the list of EVONAMES=[.........], replace Custom1 or at whatever slot you put the Serum, with Serum. (make sure indexes match up,
# so if you've put Serum in slot 33 or something, be sure to replace the 33rd slot in the evonames array with Serum as well)

# Underneath that, in EVOPARAM=[0,.......], put '1' in the index for Serum (Probably last line first character for you).

# Inside "def pbGetMinimumLevel(species)", you will see a big list of PBEvolution::(evolution method). Add in "PBEvolution::Serum
# before the closing square bracket.

# Next, go to all the "when PBEvolution::(evolution method)" underneath "def pbMiniCheckEvolution" and paste this somewhere (Be careful
# not to break other "when"s:

  when PBEvolution::Serum
    if pokemon.level>=level
      return poke
    end


# Find "def pbMiniCheckEvolutionItem" and replace the whole with this (or add the two lines I added in!):

def pbMiniCheckEvolutionItem(pokemon,evonib,level,poke,item)
  # Checks for when an item is used on the Pokémon (e.g. an evolution stone)
  case evonib
  when PBEvolution::Item
    return poke if level==item
  when PBEvolution::ItemMale
    return poke if level==item && pokemon.isMale?
  when PBEvolution::ItemFemale
    return poke if level==item && pokemon.isFemale?
  when PBEvolution::Serum
    return poke if item==PBItems::FANTASYSERUM
  end
  return -1
end