El script debería funcionar así como está, pero no lo puedo probar porque estoy teniendo problemas con el XSE.

#dynamic 0x800000

#org @comienzo
checkflag 0x
if 0x1 goto @goto1
msgbox @msg1
callstd 0x6
multichoice 0x13 0x6 0x2E 0x0
copyvar 0x8000 LASTRESULT
compare 0x8000 0x0
if 0x1 goto @goto2
compare 0x8000 0x1
if 0x1 goto @goto3
if 0x1 call @call1
setflag 0x
release
end




'-----------------------
#org @goto1
msgbox @msg2
callstd 0x6
release
end

'-----------------------
#org @goto3
msgbox @msg3
callstd 0x2
givepokemon 0x 0x 0x 0x 0x
setflag 0x800
release
end

'-----------------------
#org @goto4
msgbox @msg4
callstd 0x2
multichoice 0x13 0x6 0x2E 0x0
copyvar 0x8000 LASTRESULT
compare 0x8000 0x0
if 0x1 goto @goto2
compare 0x8000 0x1
if 0x1 goto @goto3
release
end

'-----------------------
#org @call1
release
end

'---------
' Strings
'---------
#org @msg1
= Hola Entrenador Pokemon, tengo a Charizard en mi equipo, pero no podré tenerlo más. ¿Quieres cuidarlo por mi?

#org @msg2
= ¿Como va charizard? ¿Ha aprendido nuevos trucos?

#org @msg3
= Muchas gracias, Cuida Bien de Charizard

#org @msg4
= ¿Por qué no? Piensalo de nuevo.

Cualquier cosa me avisas. Tené en cuenta que hay cosas que tenes que agregar vos, como las flags.