iniciar-programa
define-nueva-instruccion gira(n) como
inicio
repetir n veces gira-izquierda;
fin;
define-nueva-instruccion baja como
inicio
    si junto-a-zumbador entonces
    inicio
    coge-zumbador;
    avanza;
    gira(3);
    avanza;
    mientras no-junto-a-zumbador hacer avanza;
    gira(2);
    avanza;
    deja-zumbador;
    mientras frente-libre hacer avanza;
    gira(3);
    fin ;

    si frente-bloqueado entonces sal-de-instruccion;
    si no-junto-a-zumbador entonces
    avanza;
    baja;

fin;
define-nueva-instruccion sube como
inicio
gira(3);
mientras junto-a-zumbador hacer avanza;
gira(2);
avanza;
coge-zumbador;
gira(2);
mientras frente-libre hacer avanza;
deja-zumbador;
gira(2);
avanza;
mientras no-junto-a-zumbador hacer avanza;
fin;
define-nueva-instruccion erocion como
inicio
     si junto-a-zumbador entonces
     inicio
     gira(1);
     mientras junto-a-zumbador hacer avanza;
     avanza;
     gira(1);
     avanza;
     si junto-a-zumbador entonces
     inicio
     sube;
     gira(1);
     fin
     sino
     gira(2);
     avanza;
     gira(3);
     avanza;
     mientras frente-libre hacer avanza;
     gira(1);
     si frente-bloqueado entonces
     inicio
     mientras no-orientado-al-norte hacer gira(1);
     mientras frente-libre hacer avanza;
     gira(1);
     mientras frente-libre hacer avanza;
     gira(2);
     baja;
     fin;
     fin;
     si frente-bloqueado entonces
     inicio
     mientras no-orientado-al-norte hacer gira(1);
     mientras frente-libre hacer avanza;
     gira(1);
     mientras frente-libre hacer avanza;
     gira(2);
     baja;
     sal-de-instruccion;
     fin;
     avanza;
     erocion;

fin;
define-nueva-instruccion eras(n) como
inicio
si algun-zumbador-en-la-mochila entonces
inicio
deja-zumbador;
eras(sucede(n));
fin
sino
inicio
repetir n veces coge-zumbador;
repetir n veces
inicio
erocion;
gira(2);
mientras frente-libre hacer avanza;
gira(1);
mientras frente-libre hacer avanza;
gira(1);
fin;
fin;

fin;
    inicia-ejecucion
    gira(3);
    eras(0);
        apagate;
    termina-ejecucion
finalizar-programa
