#dynamic 0xAqui colocan un offset libre
#org @COMIENZO 'O un nombre para identificar el script
lock
faceplayer
checkflag 0xXXXX ' Aqui colocan una flag libre (de la 2300 hasta la 4000 estan libres)
if 0x1 goto @ESTABIEN ' Offset del mensaje: Tu pokemon esta bien, y el mio?
setvar 0x8008 0xX ' Aqui va el numero del trade, del 1 al 10 (pero en hexa es decir de 1-A)
copyvar 0x8004 0x8008
special2 LASTRESULT 0xFC
copyvar 0x8009 LASTRESULT
msgbox @QUIERES? ' Offset de la pregunta: quieres tal pokemon por tal otro?
callstd 0x5
compare LASTRESULT 0x0
if 0x1 goto @DIABLOS ' Offset del mensaje cuando le dices que no quieres
special 0x9F
waitstate
copyvar 0x800A 0x8004
compare 0x8004 0xFF
if 0x1 goto @DIABLOS ' El mismo nombre que el DIABLOS de arriba
copyvar 0x8005 0x800A
special2 LASTRESULT 0xFF
copyvar 0x800B LASTRESULT
comparevars2 LASTRESULT 0x8009
if 0x5 goto @ESENO ' Offset del mensaje: Ese no es
copyvar 0x8004 0x8008
copyvar 0x8005 0x800A
special 0xFD
special 0xFE
waitstate
msgbox @GRACIAS ' Mensaje luego del intercambio
callstd 0x4
setflag 0xXXXX ' Coloquen aqui la misma flag que arriba... para que no se repita el evento
release
end

#org @ESTABIEN
msgbox @ESTABIEN1
callstd 0x4
release
end

#org @DIABLOS
msgbox @DIABLOS1
callstd 0x4
release
end

#org @ESENO
bufferpokemon 0x0 0x8009
msgbox @ESENO1
callstd 0x4
release
end

#org @QUIERES?
= Quieres mi <--- (con eso nombras al pokemon que el quiere) por mi <--- (y con esto a su pokemon)?

#org @GRACIAS
= Gracias... me gusta mas en este !

#org @ESTABIEN1
= Extraxo a mi , por cierto, tu se porta muy bien.

#org @DIABLOS1
= Diablos quiero ese
#org @ESENO1
= Ese no es bobo.