iniciar-programa
define-prototipo-instruccion cuenta(x);
define-prototipo-instruccion avanzalo(n);


define-nueva-instruccion cuenta(x) como inicio
si junto-a-zumbador entonces inicio
coge-zumbador;
cuenta(sucede(x));

fin
sino

si no si-es-cero(x)entonces avanzalo(x);

fin;
DEFINE-NUEVA-INSTRUCCION avanzalo(n) como inicio
repetir n veces avanza;
cuenta(0);
deja-zumbador;
fin;

    inicia-ejecucion
    mientras no orientado-al-este hacer gira-izquierda;
    cuenta(0);
    deja-zumbador;
        apagate;
    termina-ejecucion
finalizar-programa
