iniciar-programa
define-nueva-instruccion gira(n) como inicio
repetir n veces gira-izquierda;
fin;
define-nueva-instruccion reloj(n) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
reloj(sucede(n));
fin
sino inicio
repetir n veces inicio
si frente-bloqueado entonces inicio
gira-izquierda;
fin;
si junto-a-zumbador entonces inicio
avanza;
fin;
mientras no-junto-a-zumbador hacer inicio
si frente-libre entonces inicio
avanza;
fin
sino inicio
gira-izquierda;
fin;
fin;
fin;
fin;
fin;

define-nueva-instruccion cuenta(n) como inicio
si frente-bloqueado y no orientado-al-sur entonces inicio
gira-izquierda;
fin;
si frente-libre entonces inicio
avanza;
cuenta(sucede(n));
fin
sino inicio
gira(1);
repetir precede(n) veces inicio
    reloj(0);
    fin;
    fin;
fin;
define-nueva-instruccion resulta(n) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
resulta(sucede(n));
fin
sino inicio
 mientras no-orientado-al-oeste hacer inicio
    gira-izquierda;
    fin;
    mientras frente-libre hacer inicio
    avanza;
    fin;
    gira(1);
    mientras frente-libre hacer inicio
    avanza;
    fin;
    repetir n veces inicio
    deja-zumbador;
    fin;
    fin;
    fin;





    inicia-ejecucion
    mientras no-orientado-al-sur hacer inicio
    gira-izquierda;
    fin;
    mientras frente-libre hacer inicio
    avanza;
    fin;
    gira(3);
    mientras frente-libre hacer inicio
    avanza;
    fin;
    gira(2);
    cuenta(0);
    resulta(0);
    apagate;
    termina-ejecucion
finalizar-programa
