#dynamic 0x802C80

#org @start
checkflag 0x6000
if 0x1 goto 0xfinal
writebytetooffset 0x01 0x087F0000
writebytetooffset 0x02 0x087F0001
msgbox 0x8texto_1 0x6
callstd 0x2
goto 0xintroducir_contraseña

#org 0xintroducir_contraseña
compare 0x4051 0x2
if 0x1 goto 0xcontraseña_introducida
comparefarbytetobyte 0x4000130 0x7F
if 0x1 goto 0xcomprobar_1
comparefarbytetobyte 0x4000130 0xDF
if 0x1 goto 0xcomprobar_2
comparefarbytetobyte 0x4000130 0xBF
if 0x1 goto 0xcomprobar_3
comparefarbytetobyte 0x4000130 0xEF
if 0x1 goto 0xcomprobar_4
comparefarbytetobyte 0x4000130 0xF7
if 0x1 goto 0xcomprobar_5
comparefarbytetobyte 0x4000130 0xFD
if 0x1 goto 0xcomprobar_6
comparefarbytetobyte 0x4000130 0xFE
if 0x1 goto 0xcomprobar_7
comparefarbytetobyte 0x4000130 0x01
if 0x1 goto 0xcomprobar_8
comparefarbytetobyte 0x4000130 0x01
if 0x1 goto 0xcomprobar_9
goto 0xintroducir_contraseña

#org 0xcomprobar_1
compare 0x4051 0x1
if 0x1 goto 0xcomprobar_1_1
writebytetooffset 0x7F 0x087F1000
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_1_1
writebytetooffset 0x7F 0x087F1001
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_2
compare 0x4051 0x1
if 0x1 goto 0xcomprobar_2_1
writebytetooffset 0xDF 0x087F1000
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_2_1
writebytetooffset 0xDF 0x087F1001
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_3
compare 0x4051 0x1
if 0x1 goto 0xcomprobar_3_1
writebytetooffset 0xBF 0x087F1000
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_3_1
writebytetooffset 0xBF 0x087F1001
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_4
compare 0x4051 0x1
if 0x1 goto 0xcomprobar_4_1
writebytetooffset 0xEF 0x087F1000
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_4_1
writebytetooffset 0xEF 0x087F1001
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_5
compare 0x4051 0x1
if 0x1 goto 0xcomprobar_5_1
writebytetooffset 0xF7 0x087F1000
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_5_1
writebytetooffset 0xF7 0x087F1001
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_6
compare 0x4051 0x1
if 0x1 goto 0xcomprobar_6_1
writebytetooffset 0xFD 0x087F1000
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_6_1
writebytetooffset 0xFD 0x087F1001
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_7
compare 0x4051 0x1
if 0x1 goto 0xcomprobar_7_1
writebytetooffset 0xFE 0x087F1000
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_7_1
writebytetooffset 0xFE 0x087F1001
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_8
compare 0x4051 0x1
if 0x1 goto 0xcomprobar_8_1
writebytetooffset 0x01 0x087F1000
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_8_1
writebytetooffset 0x01 0x087F1001
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_9
compare 0x4051 0x1
if 0x1 goto 0xcomprobar_9_1
writebytetooffset 0x02 0x087F1000
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcomprobar_9_1
writebytetooffset 0x02 0x087F1001
addvar 0x4051 0x1
goto 0xintroducir_contraseña

#org 0xcontraseña_introducida
comparefarbytetobyte 0x087F0000 0x087F1000
if 0x0 goto 0xerror_contraseña
sound 0xconfirmation
goto 0xtodo_correcto

#org 0xerror_contraseña
msgbox 0x8texto_2 0x6
callstd 0x2
end

#org 0xtodo_correcto
sound 0xfanfare
msgbox 0x8texto_3 0x6
callstd 0x2
givepokemon 0xFB 0x100 0xA 0x0 0x0 0x0
setflag 0x6000
release
end

#org 0xfinal
msgbox 0x8texto_4 0x6
callstd 0x2
release
end

#org 0x8texto_1
= Oh una caja fuerte, pero está\ncerrada hay que abrirla con una\lcontraseña, vamos a\lintroducirla.." "Presiona\lcualquier tecla que creas que es\lla contraseña"

#org 08texto_3
= La contraseña es correcta, y la\ncaja se abriá...

#org 0x8texto_2
= la contraseña introducida es\nincorrecta, vuelve a intentarlo\lmás tarde.