#dynamic 0x800000
'------------------------
#org @inicio
applymovement 0xA @move
waitmovement 0xA
sound 0x15
applymovement 0xFF @move2
waitmovement 0xFF
checkflag 0x1000
if 0x1 goto @inicio2
msgbox @frase 0x6
writebytetooffset 0x60 0x4000000
writebytetooffset 0x71 0x4000001
msgbox @frase2 0x6
comparefarbytetobyte 0x4000130 0xBF
if 0x1 goto @arriba
comparefarbytetobyte 0x4000130 0x7F
if 0x1 goto @abajo
goto @cancelar
end

#org @arriba
writebytetooffset 0x7F 0x4000001
sound 0x15
applymovement 0xFF @move3
waitmovement 0xFF
fadescreen 0x1
warpmuted 0x3 0x13 0xFF 0xE 0xB
fadescreen 0x0
setflag 0x1000
end

#org @abajo
setvar 0x40FB 0x1
writebytetooffset 0x7F 0x4000001
msgbox @frase3 0x6
trainerbattle 0x1 0x1 0x0 @challenge @defeat @despues
end

#org @despues
msgbox @frase4 0x6
applymovement 0xFF @move4
applymovement 0xA @move5
waitmovement 0xA
fadescreen 0x1
hidesprite 0xA
setflag 0x1001
fadescreen 0x0
msgbox @tu 0x6
end

#org @inicio2
msgbox @frase5 0x6
trainerbattle 0x1 0x1 0x0 @challenge @defeat @despues
end

#org @cancelar
msgbox @frase6 0x6
comparefarbytetobyte 0x4000130 0xBF
if 0x1 goto @arriba
comparefarbytetobyte 0x4000130 0x7F
if 0x1 goto @abajo
goto @cancelar
end

#org @frase
= [green_fr]???: Espera, no te vayas.\p[PLAYER]: ¿Por que?, ¿quien eres tu?\p[green_fr]???: Me llamo Ali y vengo desde\nuna region muy lejana a esta.\pSu nombre es HOENN, pero bueno...\lte he llamado porque he visto\lque tienes un POKéMON y me\lapeteceria un combate contigo\lpara ver que tan de fuertes son\llos POKéMON en esta region...\l¿KANTO no?, si, ¿y que me dices?

#org @frase2
= [PLAYER]: No se yo, pero este chico\nme parece un tanto sospechoso...\p¿Que deberia hacer?\nPulsa \hF8\h06 para huir de el.\lPulsa \hF8\h07 para hacerle frente.

#org @frase3
= [PLAYER]: ¡ACEPTO!

#org @challenge
= [green_fr]Ali: Preparate, porque vas a\nmorder el polvo.

#org @defeat
= ... ... ...

#org @frase4
= [green_fr]Ali: Seguiremos en contacto...

#org @tu
= [PLAYER]: Esco ha sconado un tanto raro...

#org @frase5
= [green_fr]Ali: Esta vez no te escapas.

#org @frase6
= [PLAYER]: Debo elejir que hacer...\pPulsa \hF8\h06 para huir de el.\nPulsa \hF8\h07 para hacerle frente.

#org @move
#raw 0x12
#raw 0x12
#raw 0x12
#raw 0x12
#raw 0x1
#raw 0xFE

#org @move2
#raw 0x62
#raw 0x1C
#raw 0x0
#raw 0xFE

#org @move3
#raw 0x62
#raw 0x1E
#raw 0xFE

#org @move4
#raw 0x20
#raw 0x2
#raw 0xFE

#org @move5
#raw 0x11
#raw 0x11
#raw 0xFE