O puedes usar esta opción juntando los dos scripts antes mencionados para que al preguntarte te muestre una imagen del pokemón que quiera dar!!! :XD:

#dynamic 0x800000

#org @inicio
showpokepic 0xnº de pokemon en hexadecimal 0xPosX 0xPosY
msgbox @frase 0x5
compare LASTRESULT 0x1
if 0x1 goto @inicio2
hidepokepic
msgbox @frase3 0x6
end

#org @inicio2
msgbox @frase2 0x6
givepokemon 0x0 0x0 0x0 0x0 0x0 0x0
setflag 0x200
hidesprite 0x0 ---numero del mini
end

#org @frase
=¿Quieres esté Pokemón?

#org @frase2
=Has Recibido a (pokemón).

#org @frase3
=No, que lastima!!