All Pokémon Mega Evolve, even without a Mega Stone

[Regiscliff]

Hello guys,
I'm using Essentials v17 and I have an issue with the mega evolution script. All the pokémon that have an alternative form are mega evolving and they evolve regardless they are using a mega stone or not. Does anyone know how to solve this problem?

 

[Diegou18]

Hello guys,
I'm using Essentials v17 and I have an issue with the mega evolution script. All the pokémon that have an alternative form are mega evolving and they evolve regardless they are using a mega stone or not. Does anyone know how to solve this problem?

Have you modified anything in "def pbCanMegaEvolve?(index)" or in "def pbEnemyShouldMegaEvolve?(index)"?

 

[Vendily]

<Snipped>

Hi Regiscliff, I moved your thread here, the Pokemon Essentials forum. This is where you can ask questions.

 

[Regiscliff]

Have you modified anything in "def pbCanMegaEvolve?(index)" or in "def pbEnemyShouldMegaEvolve?(index)"?

No. The code looks like this:

################################################################################
# Mega Evolve battler.
################################################################################
def pbCanMegaEvolve?(index)
return false if $game_switches[NO_MEGA_EVOLUTION]
return false if !@battlers[index].hasMega?
return false if pbIsOpposing?(index) && !@opponent
return true if $DEBUG && Input.press?(Input::CTRL)
return false if !pbHasMegaRing?(index)
side=(pbIsOpposing?(index)) ? 1 : 0
owner=pbGetOwnerIndex(index)
return false if @megaEvolution[side]!=-1
return false if @battlers[index].effects[PBEffects::SkyDrop]
return true
end

def pbRegisterMegaEvolution(index)
side=(pbIsOpposing?(index)) ? 1 : 0
owner=pbGetOwnerIndex(index)
@megaEvolution[side]=index
end

def pbMegaEvolve(index)
return if !@battlers[index] || !@battlers[index].pokemon
return if !(@battlers[index].hasMega? rescue false)
return if (@battlers[index].isMega? rescue true)
ownername=pbGetOwner(index).fullname
ownername=pbGetOwner(index).name if pbBelongsToPlayer?(index)
case (@battlers[index].pokemon.megaMessage rescue 0)
when 1 # Rayquaza
pbDisplay(_INTL("{1}'s fervent wish has reached {2}!",ownername,@battlers[index].pbThis))
else
pbDisplay(_INTL("{1}'s {2} is reacting to {3}'s {4}!",
@battlers[index].pbThis,PBItems.getName(@battlers[index].item),
ownername,pbGetMegaRingName(index)))
end
pbCommonAnimation("MegaEvolution",@battlers[index],nil)
@battlers[index].pokemon.makeMega
@battlers[index].form=@battlers[index].pokemon.form
@battlers[index].pbUpdate(true)
@scene.pbChangePokemon(@battlers[index],@battlers[index].pokemon)
pbCommonAnimation("MegaEvolution2",@battlers[index],nil)
meganame=(@battlers[index].pokemon.megaName rescue nil)
if !meganame || meganame==""
meganame=_INTL("Mega {1}",PBSpecies.getName(@battlers[index].pokemon.species))
end
pbDisplay(_INTL("{1} has Mega Evolved into {2}!",@battlers[index].pbThis,meganame))
PBDebug.log("[Mega Evolution] #{@battlers[index].pbThis} became #{meganame}")
side=(pbIsOpposing?(index)) ? 1 : 0
owner=pbGetOwnerIndex(index)
@megaEvolution[side]=-2
end

 

[Diegou18]

No. The code looks like this:

Spoiler:

################################################################################
# Mega Evolve battler.
################################################################################
  def pbCanMegaEvolve?(index)
    return false if $game_switches[NO_MEGA_EVOLUTION]
    return false if !@battlers[index].hasMega?
    return false if pbIsOpposing?(index) && !@opponent
    return true if $DEBUG && Input.press?(Input::CTRL)
    return false if !pbHasMegaRing?(index)
    side=(pbIsOpposing?(index)) ? 1 : 0
    owner=pbGetOwnerIndex(index)
    return false if @megaEvolution[side][owner]!=-1
    return false if @battlers[index].effects[PBEffects::SkyDrop]
    return true
  end

  def pbRegisterMegaEvolution(index)
    side=(pbIsOpposing?(index)) ? 1 : 0
    owner=pbGetOwnerIndex(index)
    @megaEvolution[side][owner]=index
  end

  def pbMegaEvolve(index)
    return if !@battlers[index] || !@battlers[index].pokemon
    return if !(@battlers[index].hasMega? rescue false)
    return if (@battlers[index].isMega? rescue true)
    ownername=pbGetOwner(index).fullname
    ownername=pbGetOwner(index).name if pbBelongsToPlayer?(index)
    case (@battlers[index].pokemon.megaMessage rescue 0)
    when 1 # Rayquaza
      pbDisplay(_INTL("{1}'s fervent wish has reached {2}!",ownername,@battlers[index].pbThis))
    else
      pbDisplay(_INTL("{1}'s {2} is reacting to {3}'s {4}!",
         @battlers[index].pbThis,PBItems.getName(@battlers[index].item),
         ownername,pbGetMegaRingName(index)))
    end
    pbCommonAnimation("MegaEvolution",@battlers[index],nil)
    @battlers[index].pokemon.makeMega
    @battlers[index].form=@battlers[index].pokemon.form
    @battlers[index].pbUpdate(true)
    @scene.pbChangePokemon(@battlers[index],@battlers[index].pokemon)
    pbCommonAnimation("MegaEvolution2",@battlers[index],nil)
    meganame=(@battlers[index].pokemon.megaName rescue nil)
    if !meganame || meganame==""
      meganame=_INTL("Mega {1}",PBSpecies.getName(@battlers[index].pokemon.species))
    end
    pbDisplay(_INTL("{1} has Mega Evolved into {2}!",@battlers[index].pbThis,meganame))
    PBDebug.log("[Mega Evolution] #{@battlers[index].pbThis} became #{meganame}")
    side=(pbIsOpposing?(index)) ? 1 : 0
    owner=pbGetOwnerIndex(index)
    @megaEvolution[side][owner]=-2
  end

Mine is here:

Spoiler:

################################################################################
# Mega Evolve battler.
################################################################################
  def pbCanMegaEvolve?(index)
    return false if $game_switches[NO_MEGA_EVOLUTION]
    return false if !@battlers[index].hasMega?
    return false if pbIsOpposing?(index) && !@opponent
    return true if $DEBUG && Input.press?(Input::CTRL)
    return false if !pbHasMegaRing?(index)
    side=(pbIsOpposing?(index)) ? 1 : 0
    owner=pbGetOwnerIndex(index)
    return false if @megaEvolution[side][owner]!=-1
    return false if @battlers[index].effects[PBEffects::SkyDrop]
    return true
  end

  def pbRegisterMegaEvolution(index)
    side=(pbIsOpposing?(index)) ? 1 : 0
    owner=pbGetOwnerIndex(index)
    @megaEvolution[side][owner]=index
  end

  def pbMegaEvolve(index)
    return if !@battlers[index] || !@battlers[index].pokemon
    return if !(@battlers[index].hasMega? rescue false)
    return if (@battlers[index].isMega? rescue true)
    ownername=pbGetOwner(index).fullname
    ownername=pbGetOwner(index).name if pbBelongsToPlayer?(index)
    case (@battlers[index].pokemon.megaMessage rescue 0)
    when 1 # Rayquaza
      pbDisplay(_INTL("{1}'s fervent wish has reached {2}!",ownername,@battlers[index].pbThis))
    else
      pbDisplay(_INTL("La {2} de {1} está reaccionando con el {4} de {3}!",
         @battlers[index].pbThis,PBItems.getName(@battlers[index].item),
         ownername,pbGetMegaRingName(index)))
    end
    pbCommonAnimation("MegaEvolution",@battlers[index],nil)
    @battlers[index].pokemon.makeMega
    @battlers[index].form=@battlers[index].pokemon.form
    @battlers[index].pbUpdate(true)
    @scene.pbChangePokemon(@battlers[index],@battlers[index].pokemon)
    pbCommonAnimation("MegaEvolution2",@battlers[index],nil)
    meganame=(@battlers[index].pokemon.megaName rescue nil)
    if !meganame || meganame==""
      meganame=_INTL("Mega {1}",PBSpecies.getName(@battlers[index].pokemon.species))
    end
    pbDisplay(_INTL("¡{1} ha Mega Evolucionado a {2}!",@battlers[index].pbThis,meganame))
    PBDebug.log("[Mega Evolution] #{@battlers[index].pbThis} became #{meganame}")
    side=(pbIsOpposing?(index)) ? 1 : 0
    owner=pbGetOwnerIndex(index)
    @megaEvolution[side][owner]=-2
  end

But I think that you should check this one, maybe you have it different. (Btw, I'm using v17.2 and I don't know if there's any difference in this case with v17).

################################################################################
# Decide whether the opponent should Mega Evolve their Pokémon.
################################################################################
  def pbEnemyShouldMegaEvolve?(index)
    # Simple "always should if possible"
    return pbCanMegaEvolve?(index)
  end

If you need it, there you have my Pokemon_MegaEvolution script.

Spoiler:

################################################################################
# Mega Evolutions and Primal Reversions are treated as form changes in
# Essentials.
################################################################################
class PokeBattle_Pokemon
  def getMegaForm(itemonly=false)
    formdata = pbLoadFormsData
    return 0 if !formdata[@species] || formdata[@species].length==0
    ret = 0
    dexdata = pbOpenDexData
    for i in formdata[@species]
      next if !i || i<=0
      pbDexDataOffset(dexdata,i,29)
      megastone = dexdata.fgetw
      if megastone>0 && self.hasItem?(megastone)
        ret = i; break
      end
      if !itemonly
        pbDexDataOffset(dexdata,i,56)
        megamove = dexdata.fgetw
        if megamove>0 && self.hasMove?(megamove)
          ret = i; break
        end
      end
    end
    dexdata.close
    return ret  # fSpecies or 0
  end

  def getUnmegaForm
    return -1 if !isMega?
    dexdata = pbOpenDexData
    pbDexDataOffset(dexdata,self.fSpecies,37)
    unmegaform = dexdata.fgetb
    dexdata.close
    return unmegaform   # form number
  end

  def hasMegaForm?
    mf = self.getMegaForm
    return mf>0 && mf!=self.species
  end

  def isMega?
    mf = self.getMegaForm
    return mf!=self.species && mf==self.fSpecies
  end

  def makeMega
    fsp = self.getMegaForm
    if fsp>0
      f = pbGetSpeciesFromFSpecies(fsp)[1]
      self.form = f
      pbPlayCry(self)
    end
  end

  def makeUnmega
    newf = self.getUnmegaForm
    self.form = newf if newf>=0
  end

  def megaName
    formname = pbGetMessage(MessageTypes::FormNames,self.fSpecies)
    return (formname && formname!="") ? formname : _INTL("Mega {1}",PBSpecies.getName(@species))
  end

  def megaMessage
    dexdata = pbOpenDexData
    pbDexDataOffset(dexdata,self.getMegaForm,58)
    message = dexdata.fgetb
    dexdata.close
    return message   # 0=default message, 1=Rayquaza message
  end





  def hasPrimalForm?
    v=MultipleForms.call("getPrimalForm",self)
    return v!=nil
  end

  def isPrimal?
    v=MultipleForms.call("getPrimalForm",self)
    return v!=nil && v==@form
  end

  def makePrimal
    v=MultipleForms.call("getPrimalForm",self)
    self.form=v if v!=nil
    pbPlayCry(self)
  end

  def makeUnprimal
    v=MultipleForms.call("getUnprimalForm",self)
    if v!=nil; self.form=v
    elsif isPrimal?; self.form=0
    end
  end
  
  def revertOtherForms
    if isConst?(self.species,PBSpecies,:GRENINJA) ||
       isConst?(self.species,PBSpecies,:MIMIKYU)
      self.form=0 
    elsif isConst?(self.species,PBSpecies,:ZYGARDE)
      if $zygardeform>=0
        self.form=$zygardeform
        $zygardeform=-1
      elsif self.form==2  # If caught a Full Forme
        self.form=rand(2)
      end
    end
  end
  
end

# Primal Reversion #############################################################

MultipleForms.register(:KYOGRE,{
"getPrimalForm"=>proc{|pokemon|
   next 1 if isConst?(pokemon.item,PBItems,:BLUEORB)
   next
},
"getUnprimalForm"=>proc{|pokemon|
   next 0
}, 
"getBaseStats"=>proc{|pokemon|
   next [100,150,90,90,180,160] if pokemon.form==1
   next
},
"ability"=>proc{|pokemon|
   next getID(PBAbilities,:PRIMORDIALSEA) if pokemon.form==1
   next
},
"weight"=>proc{|pokemon|
   next 1555 if pokemon.form==1
   next
},
"onSetForm"=>proc{|pokemon,form|
   pbSeenForm(pokemon)
}
})

MultipleForms.register(:GROUDON,{
"getPrimalForm"=>proc{|pokemon|
   next 1 if isConst?(pokemon.item,PBItems,:REDORB)
   next
},
"getUnprimalForm"=>proc{|pokemon|
   next 0
}, 
"getBaseStats"=>proc{|pokemon|
   next [100,180,160,90,150,90] if pokemon.form==1
   next
},
"ability"=>proc{|pokemon|
   next getID(PBAbilities,:DESOLATELAND) if pokemon.form==1
   next
},
"weight"=>proc{|pokemon|
   next 1555 if pokemon.form==1
   next
},
"onSetForm"=>proc{|pokemon,form|
   pbSeenForm(pokemon)
}
})

Be careful, I have some scripts that aren't in an Essentials without modifying (like Mimikyu's parts).

 

[Regiscliff]

Ok, I will try yours.

 

[Regiscliff]

It works perfectly now. It looks like the problem was in the Pokemon_MegaEvolution script. Some things were missing. Thank you so much!