#dynamic 0x800000

#org @Start
lock
faceplayer
msgbox @Bienvenido 0x5
= Bienvenido al teleférico a Ciudad\nCaliza, el viaje son solo 500 [$],\l¿quieres montar?
checkmoney 0x1F4 0x0
compare LASTRESULT 0x1
if 0x0 goto @nomoney
paymoney 0x1F4 0x0
msgbox @PuedesPasar 0x6
= Disfruta del trayecto.
applymovement 0x1 @Aparta
#raw 0xB 'Paso Derecha (normal)
#raw 0x2 'Mirar Izquierda
#raw FE
waitmovement 0x1
release
end

#org @nomoney
msgbox @NoTiendesDinero 0x6
= No puedes permitirte el viaje.
release
end