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