iniciar-programa
define-nueva-instruccion gira(g) como
inicio
repetir g veces gira-izquierda;
fin;
define-nueva-instruccion gusta como
inicio
    si junto-a-zumbador entonces inicio
        coge-zumbador;
        si no-junto-a-zumbador entonces inicio
            mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
            avanza;
        fin;
        gusta;
        avanza;
    fin sino inicio
    avanza;
    fin;
fin;
   define-nueva-instruccion Te como
   inicio
       si junto-a-zumbador entonces
       inicio
           coge-zumbador;
           Te;
           deja-zumbador;
       fin sino
       inicio
           gira(1);
           avanza;
           mientras junto-a-zumbador hacer avanza;
           gira(2);
           avanza;
           gira(3);
           avanza;
           si junto-a-zumbador entonces inicio
           gira-izquierda;
           mientras junto-a-zumbador hacer avanza;
           gira(3);
           fin;
       fin;
   fin;
define-nueva-instruccion pan como
inicio
    si frente-libre entonces
    inicio
    avanza;
    mientras no-junto-a-zumbador y frente-libre hacer avanza;
    si junto-a-zumbador y frente-libre  entonces
    inicio
    coge-zumbador;
        pan;
        si algun-zumbador-en-la-mochila entonces deja-zumbador;
        avanza;
        fin;
    fin;
    si frente-bloqueado y orientado-al-oeste entonces
    inicio
    gira(3);
    avanza;
    gira(3);
    avanza;
    avanza;

    fin;
fin;
    inicia-ejecucion
    mientras no-orientado-al-este hacer gira-izquierda;
    gusta;
    si junto-a-zumbador entonces inicio
    mientras junto-a-zumbador hacer coge-zumbador;
    avanza;
    gira(1);
    avanza;
    mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
    gira(2);
    avanza;
    gira(3);
    repetir 2 veces avanza;
    gira(2);
    fin;
    mientras junto-a-zumbador hacer avanza;
    si no-junto-a-zumbador  entonces
    inicio
        gira(2);
    fin;
    mientras frente-libre hacer inicio
    si frente-libre entonces
    inicio
          mientras frente-libre y no-junto-a-zumbador hacer avanza;
        si junto-a-zumbador y frente-libre entonces
        inicio
            gira(2);
            mientras junto-a-zumbador hacer avanza;
            gira(2);
        fin;
       si frente-bloqueado y junto-a-zumbador entonces
        inicio
        gira(3);
        avanza;
        gira(3);
        avanza;
        avanza;
        mientras junto-a-zumbador hacer avanza;
        gira(2);
        avanza;
        gira(3);
        mientras junto-a-zumbador hacer
        inicio
             Te;
             gira(3);
             mientras junto-a-zumbador hacer avanza;
             gira(2);
             avanza;
             gira(1);
             avanza;
             gira(3);
             mientras junto-a-zumbador hacer avanza;
             gira(2);
             avanza;
             gira(3);
        fin;
        gira(2);
        avanza;
        gira(2);
            apagate;
        fin;
    fin;
        pan;
        mientras junto-a-zumbador hacer avanza;
        gira(3);
        avanza;
        gira(3);
    fin;
        apagate;
    termina-ejecucion
finalizar-programa
