#dynamic 0x071A250
#org @inicio
lock
faceplayer
special 0x9F // Pantalla de selección de Pokémon
waitstate
compare 0x8004 0x6 // Comprueba si el jugador se echó para atras
if 0x4 goto @end // En cuyo caso, obliga al script a terminar.
special 0x7C // Toma el Mote del Pokémon que esté marcado en la Variable 0x8004 y lo guarda en el Buffer #1
callasm 0x8XXXXXX+1 // Invoca la rutina de ghoulslash
buffernumber 0x1 0x8005 // Guarda la cantidad de felicidad/amistad de tu Pokémon en el Buffer #2.
msgbox @1 0x6
release
end

#org @end
release
end

#org @1
= Tu [buffer1] tiene [buffer2]\npuntos de felicidad.