  event sysmessage Uf! Voy muy cargado !!
  wait 1s

  set %enboskex #charposx
  set %enboskey #charposy
  event sysmessage Pero na, me pillo el Rune-bus y me planto en el banco ya
  call recallto %RunaBancoH %RunaBancoR
  event sysmessage Ale hop!
  call banco
 ;Hay ke guardar la posicion pa ver si viajamos
   set %storedx #charposx
   set %storedy #charposy
  event sysmessage Listo. Volvemos al boskecillo
  call recallto %RunaBosqueH %RunaBosqueR
   if %storedx = #charposx
     {
     if %storedy = #charposy
        {
           ;No nos hemos movido!!
           MSG $/ TENGO PROBLEMAS PARA IR AL BOSQUE!!!!!!!
           if %LumberMusic = 1
                    playcd
           halt
        }
     }
event sysmessage Y ahora, a seguir talando
 if %TipoTalado = ZONA
   {
;Intentara volver a donde se quedo
   move %enboskex %enboskey 60s
   move %enboskex %enboskey a 6s
   exit
   }

;El tipo de Talado es Camino
Set %inicio %NextMove
set %fin    1

Set %TmpMove %TotalMoves / 2
;Estamos mas cerca del final que del principio   
if %NextMove > %TmpMove
   set %fin %TotalMoves 

for %movI %fin %inicio
  {
    call array GET %movI
    move %1 %2 a 30s
  }
set %NextMove %NextMove - 1