iniciar-programa
define-nueva-instruccion cuenta-dos(m) como
inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
cuenta-dos(sucede(m));
fin
sino inicio
repetir 2 veces gira-izquierda;
avanza;
repetir 3 veces gira-izquierda;
avanza;
avanza;
repetir 3 veces gira-izquierda;
mientras no-junto-a-zumbador y frente-libre hacer avanza;
si no-junto-a-zumbador entonces inicio
repetir 2 veces gira-izquierda;
mientras frente-libre hacer avanza;
repetir 2 veces gira-izquierda;
fin;
si junto-a-zumbador entonces coge-zumbador;
repetir m veces avanza;
deja-zumbador;
fin;
fin;
define-nueva-instruccion cuenta(n) como
inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
cuenta(sucede(n));
fin
sino inicio
repetir n veces inicio
deja-zumbador;
avanza;
deja-zumbador;
repetir 2 veces gira-izquierda;
avanza;
repetir 2 veces gira-izquierda;
fin;
fin;
fin;
define-nueva-instruccion sigue(z) como
inicio
si no-junto-a-zumbador entonces inicio
mientras frente-libre hacer avanza;
repetir 3 veces gira-izquierda;
mientras frente-libre hacer avanza;
repetir 3 veces gira-izquierda;
 avanza;
    repetir 3 veces gira-izquierda;
    cuenta(0);
    avanza;
    cuenta-dos(0);
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    repetir 3 veces gira-izquierda;
    avanza;
    avanza;
    repetir 3 veces gira-izquierda;
    cuenta(0);
    avanza;
    cuenta-dos(0);
    repetir 3 veces gira-izquierda;
    avanza;
    sigue(sucede(z));
    fin
    sino inicio
    mientras frente-libre hacer avanza;
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    deja-zumbador;
    repetir z veces deja-zumbador;
    apagate;
    fin;
fin;
    inicia-ejecucion
    avanza;
    repetir 3 veces gira-izquierda;
    cuenta(0);
    avanza;
    cuenta-dos(0);
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;                              
    repetir 3 veces gira-izquierda;
    avanza;
    avanza;
    repetir 3 veces gira-izquierda;
    cuenta(0);
    avanza;
    cuenta-dos(0);
    repetir 3 veces gira-izquierda;
    avanza;
    si junto-a-zumbador entonces inicio
    mientras frente-libre hacer avanza;
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    deja-zumbador;
    apagate;
    fin;
    sigue(0);
        apagate;
    termina-ejecucion
finalizar-programa
