iniciar-programa
define-nueva-instruccion cuenta(x) como
inicio
si orientado-al-norte y derecha-libre y frente-libre entonces
inicio
avanza;
cuenta(sucede(x));
fin;
si orientado-al-sur y derecha-libre y  frente-libre entonces
inicio
avanza;
cuenta(precede(x));
fin;
si derecha-bloqueada y frente-libre entonces
inicio
gira-izquierda;
mientras frente-libre y derecha-libre hacer avanza;
si frente-bloqueado entonces
inicio
repetir x veces deja-zumbador;
apagate;
fin;
gira-izquierda;
cuenta(x);
fin;
si frente-bloqueado entonces
inicio
repetir x veces deja-zumbador;
apagate;
fin;
fin;
    inicia-ejecucion
    si orientado-al-este entonces
    inicio
    mientras derecha-libre hacer avanza;
    gira-izquierda;
    fin;
    cuenta(0);
        apagate;
    termina-ejecucion
finalizar-programa
