iniciar-programa

   define-nueva-instruccion ubicate como inicio
    mientras no-orientado-al-sur hacer gira-izquierda;
    mientras frente-libre hacer avanza;
    repetir 3 veces gira-izquierda;
    mientras frente-libre hacer avanza;
    mientras no-orientado-al-norte hacer gira-izquierda;
    fin;

    define-nueva-instruccion d1 como inicio
    mientras frente-libre y no-junto-a-zumbador hacer
    inicio
    deja-zumbador;
    avanza;
    repetir 3 veces gira-izquierda;
    avanza;
    mientras no-orientado-al-norte hacer gira-izquierda;
    fin;
    deja-zumbador;
    fin;

    define-nueva-instruccion u2 como inicio
    gira-izquierda;
    mientras frente-libre hacer avanza;
    gira-izquierda;
    mientras frente-libre hacer avanza;
    gira-izquierda;
    mientras frente-libre hacer avanza;
    mientras no-orientado-al-norte hacer gira-izquierda;
    fin;

    define-nueva-instruccion d2 como inicio
    mientras frente-libre y no-junto-a-zumbador hacer
    inicio
    deja-zumbador;
    avanza;
    gira-izquierda;
    avanza;
    mientras no-orientado-al-norte hacer gira-izquierda;
    si junto-a-zumbador entonces inicio
    avanza;
    gira-izquierda;
    avanza;
    repetir 3 veces gira-izquierda;
    fin;
    fin;
    deja-zumbador;
    fin;

    inicia-ejecucion
    si frente-bloqueado y derecha-bloqueada entonces inicio
    si izquierda-bloqueada entonces
    inicio
    deja-zumbador;
    apagate;
    fin;
    fin;
    ubicate;
    d1;
    u2;
    d2;


        apagate;
    termina-ejecucion
finalizar-programa
