iniciar-programa
define-nueva-instruccion gira(n) como repetir n veces gira-izquierda;
define-nueva-instruccion  pisos(n) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
si frente-libre entonces inicio
avanza;
fin
sino inicio
gira(2);
mientras frente-libre hacer avanza;
gira(1);
si frente-bloqueado entonces inicio
gira(2);
mientras frente-libre hacer avanza;
gira(3);
mientras frente-libre hacer avanza;
gira(2);
mientras junto-a-zumbador hacer avanza;
repetir n veces deja-zumbador;
deja-zumbador;
gira(2);
mientras frente-libre hacer avanza;
gira(3);
mientras frente-libre hacer avanza;
gira(3);
mientras frente-libre hacer avanza;
gira(3);
mientras izquierda-bloqueada y frente-libre hacer avanza;
gira(2);
avanza;
gira(1);
pisos(0);
fin;
avanza;
gira(1);
pisos(sucede(n));
fin;
pisos(sucede(n));
fin
sino inicio
si frente-libre entonces inicio
avanza;
fin
sino inicio
gira(2);
mientras frente-libre hacer avanza;
gira(1);
si frente-bloqueado y si-es-cero(n) entonces apagate;
si frente-bloqueado entonces inicio
gira(2);
mientras frente-libre hacer avanza;
gira(3);
mientras frente-libre hacer avanza;
gira(2);
mientras junto-a-zumbador hacer avanza;
repetir n veces deja-zumbador;
gira(2);
mientras frente-libre hacer avanza;
gira(3);
mientras frente-libre hacer avanza;
gira(3);
mientras frente-libre hacer avanza;
gira(3);
mientras izquierda-bloqueada y frente-libre hacer avanza;
gira(2);
avanza;
gira(1);
pisos(0);
fin;
avanza;
gira(1);
pisos(n);
fin;
pisos(n);
fin;
fin;
    inicia-ejecucion
    mientras no junto-a-zumbador hacer avanza;
    gira(3);
    mientras frente-libre hacer avanza;
    gira(2);
    pisos(0);
        apagate;
    termina-ejecucion
finalizar-programa
