Esta global te dice la felicidad del Pokémon en la primera posición del equipo:
$Trainer.party[0].happiness
Prueba a ejecutar un script parecido a este:
$Trainer.party[0].happiness+=1