iniciar-programa

define-nueva-instruccion gira-derecha como inicio
    repetir 3 veces inicio
        gira-izquierda;
    fin;
fin;

define-nueva-instruccion posiciona como inicio
    mientras no-orientado-al-norte hacer inicio
        gira-izquierda;
    fin;
    avanza;
    gira-derecha;
    avanza;
fin;

define-nueva-instruccion mide-terreno(x) como inicio
    si izquierda-bloqueada y no-junto-a-zumbador entonces inicio
        deja-zumbador;
        avanza;
        si izquierda-libre entonces inicio
            gira-izquierda;
            avanza;
        fin;
        mide-terreno(sucede(x));
    fin
    sino inicio
        gira-derecha;
        avanza;
        gira-derecha;
        avanza;
    fin;
    deja-zumbador;
fin;

    inicia-ejecucion

        posiciona;
        mide-terreno(0);
        coge-zumbador;

        apagate;
    termina-ejecucion
finalizar-programa
