Me parece que en Ruby, se añade este comando despues del givepokemon.
special 0x9. ^^

Sino te quedó muy claro, puedes consultar el script donde te dan a Growlithe en Pokemon Omega :3 en el AdvanceMap XD, es un claro ejemplo.

Suerte!