Change Name from the party

[Diego Mertens]

My original post: Cambiar Mote desde el Equipo
¡Alola!
Do you remember the practic Let´s Go Pikachu & Eevee's Nickname change from the Party? Well, You can add it to your Essentials 17.2 game!

First, we're going to the "PScreen_Party" Script, and search for:

      break if pkmnid<0 # Canceled
      cmdEntry   = -1
      cmdNoEntry = -1
      cmdSummary = -1
      commands = []

And under cmdSummary = -1 we add:

      cmdApodo   = -1

Then, search pkmn = @party[pkmnid] and under:

commands[cmdSummary = commands.length]   = _INTL("Summary")

We add:

      commands[cmdApodo = commands.length]     = _INTL("Change Name")

In the same Script, we search:

      if cmdSummary>=0 && command==cmdSummary
        @scene.pbSummary(pkmnid)

And we paste under it: (show printable version to avoid errors)

      elsif cmdApodo>=0 && command==cmdApodo
        if pkmn.isForeign?($Trainer) #checks if the pokemon isnt yours, if is that the case, shows text
          @scene.pbDisplay(_INTL("This Pokémon isn't yours.\nIts in memory of it's Original Trainer."))
        else
          @scene.pbDisplay(_INTL("Choose the Nickname that you want."))
          speciesname = PBSpecies.getName(pkmn.species)
          oldname = (pkmn.name && pkmn.name!=speciesname) ? pkmn.name : ""
            newname = pbEnterPokemonName(_INTL("{1}'s nickname?",speciesname),
                0,PokeBattle_Pokemon::NAMELIMIT,oldname,pkmn)
            if newname && newname!=""
              pkmn.name = newname
              pbRefreshSingle(pkmnid)
            elsif newname="" #if the name is null, will...
              pkmn.name = speciesname #...change its name from the species name
              pbRefreshSingle(pkmnid)
            end
        end

Will look like this: (the photos are in spanish, because are from the original post made by me)
If its from othe Trainer:

If is yours:

This is the end of the post, I hope that you enjoy it.
If is there an error, let me know it.
See you later!

 

[Diego Mertens]

If you want to put it under the switch option like in the games, just put the last script under this:

      elsif cmdSwitch>=0 && command==cmdSwitch
        @scene.pbSetHelpText(_INTL("Move to where?"))
        oldpkmnid = pkmnid
        pkmnid = @scene.pbChoosePokemon(true)
        if pkmnid>=0 && pkmnid!=oldpkmnid
          pbSwitch(oldpkmnid,pkmnid)
        end

 

[Gaming Lab]

For some reason, that doesn't work. I did everything that you wrote, but nothing shows up.

 

[WolfPP]

For some reason, that doesn't work. I did everything that you wrote, but nothing shows up.

In 'PScreen_Party' find

cmdSwitch  = -1

inside 'def pbPokemonScreen'. Under, paste:

cmdName    = -1

Then, inside

Spoiler:

      commands[cmdSwitch = commands.length]       = _INTL("Switch") if @party.length>1
      if !pkmn.egg?
        if pkmn.mail
          commands[cmdMail = commands.length]     = _INTL("Mail")
        else
          commands[cmdItem = commands.length]     = _INTL("Item")
        end
      end

paste

      commands[cmdName = commands.length]         = _INTL("Change Name")

Finally, search to:

Spoiler:

      next if havecommand
      if cmdSummary>=0 && command==cmdSummary
        @scene.pbSummary(pkmnid)
      elsif cmdDebug>=0 && command==cmdDebug
        pbPokemonDebug(pkmn,pkmnid)
      elsif cmdSwitch>=0 && command==cmdSwitch
        @scene.pbSetHelpText(_INTL("Move to where?"))
        oldpkmnid = pkmnid
        pkmnid = @scene.pbChoosePokemon(true)
        if pkmnid>=0 && pkmnid!=oldpkmnid
          pbSwitch(oldpkmnid,pkmnid)
        end

And paste below:

Spoiler:

      elsif cmdName>=0 && command==cmdName
        if pkmn.isForeign?($Trainer) #checks if the pokemon isnt yours, if is that the case, shows text
          @scene.pbDisplay(_INTL("This Pokémon isn't yours.\nIts in memory of it's Original Trainer."))
        else
          @scene.pbDisplay(_INTL("Choose the Nickname that you want."))
          speciesname = PBSpecies.getName(pkmn.species)
          oldname = (pkmn.name && pkmn.name!=speciesname) ? pkmn.name : ""
            newname = pbEnterPokemonName(_INTL("{1}'s nickname?",speciesname),
                0,PokeBattle_Pokemon::NAMELIMIT,oldname,pkmn)
            if newname && newname!=""
              pkmn.name = newname
              pbRefreshSingle(pkmnid)
            elsif newname="" #if the name is null, will...
              pkmn.name = speciesname #...change its name from the species name
              pbRefreshSingle(pkmnid)
            end
        end

 

[CTF Studios]

Really awesome thank you very much work perfectly. :)

 

[GraceAndFame]

Anyone have a V18 version of these scripts?