El script está mal y la flag que usaste no es muy apropiada.

Primero, en ves de usar esa flag, usa una que esté entre 500 a 5FF.
Luego, este sería en script correcto:

#dynamic 0x800000
#org @inicio
msgbox @msg 0x6 ''bla bla bla''
givepokemon 0x10 0x5 0xD 0x0 0x0 0x0
msgbox @msg1 0x6 ''bla bla bla'' (esto es opcional)
setflag 0x(aquí pones la flag que usaste, esto hará que la pokeball desaparesca, por ejemplo la 501)
release
end

#org @msg
= bla bla bla

#org @msg1
= bla bla bla