#dynamic 0x800000
#org @inicio
lockall
applymovement MOVE_PLAYER 0x81A0843
waitmovement 0x0
goto 0x8155B06
end

'-----------------------
#org 0x155B06
showmoney 0x0 0x0 0x0
msgbox @hi '"Welcome to the OCEANIC MUSEUM.\pThe..."
callstd 0x5
compare LASTRESULT 0x1
if 0x1 goto 0x8155B2D
closeonkeypress
hidemoney 0x0 0x0
applymovement MOVE_PLAYER 0x8155B8D
waitmovement 0x0
releaseall
end

'-----------------------
#org 0x155B2D
checkmoney 0xC8 0x0
compare LASTRESULT 0x0
if 0x1 goto 0x8155B5A
paymoney 0xC8 0x0
updatemoney 0x0 0x0 0x0
msgbox @pagado '"Please enjoy yourself."
callstd 0x4
setvar 0x40AA 0x1
hidemoney 0x0 0x0
releaseall
end

'-----------------------
#org 0x155B5A
checkflag 0x95
if 0x0 goto 0x8155B7B
msgbox @nomoney '"Oh? I'm sorry, but you don't seem t..."
callstd 0x4
closeonkeypress
hidemoney 0x0 0x0
applymovement MOVE_PLAYER 0x8155B8D
waitmovement 0x0
releaseall
end

'-----------------------
#org 0x155B7B
msgbox 0x817E22D '"Oh? You're with that group that\nwe..."
callstd 0x4
setvar 0x40AA 0x1
hidemoney 0x0 0x0
releaseall
end


'-----------
' Movements
'-----------
#org 0x1A0843
#raw 28 'Step on the Spot Right (Fastest)
#raw FE 'End of Movements

#org 0x155B8D
#raw 8 'Step Down (Normal)
#raw FE 'End of Movements


'---------
' Strings
'---------
#org @hi
= Bienvenido al teléferico con\nrumbo Ciudad Caliza, el viaje son\lsolo 200 [$], ¿quiere tomar el\lteleférico?

#org @pagado
= ¡Disfruta del trayecto!

#org @nomoney
= Lo siento, pero no puedes pagar el\nviaje.

#org 0x17E22D
= Oh? You're with that group that\nwent in earlier?\pYou're the only one who's late.\nYou'd better go catch up to them!