iniciar-programa
    define-nueva-instruccion mi como inicio
    si junto-a-zumbador entonces inicio
    coge-zumbador;
    mi;
    si no junto-a-zumbador entonces inicio
    avanza;
    mientras junto-a-zumbador  y frente-libre hacer avanza;
    fin;
    deja-zumbador;
     fin;
     fin;
     define-nueva-instruccion xp como inicio
     si junto-a-zumbador entonces inicio
     coge-zumbador;
     xp;
     deja-zumbador;
     avanza;
     fin;
     fin;
     define-nueva-instruccion mi2 como inicio
     si junto-a-zumbador entonces inicio
     coge-zumbador;
     coge-zumbador;
     mi2;
     deja-zumbador;
     deja-zumbador;
     avanza;
     fin;
     fin;
    inicia-ejecucion
    mientras no orientado-al-este hacer gira-izquierda;
    mientras frente-libre hacer avanza;
     gira-izquierda;
    gira-izquierda;
    mi;
    mientras frente-libre hacer avanza;
    gira-izquierda;
    gira-izquierda;
     mientras frente-libre hacer inicio
      si junto-a-zumbador  entonces inicio
      coge-zumbador;
      si no junto-a-zumbador entonces inicio
      gira-izquierda;
      gira-izquierda;
      mientras frente-libre hacer avanza;
      deja-zumbador;
      gira-izquierda;
      gira-izquierda;
      avanza;
      mientras no junto-a-zumbador y frente-libre hacer avanza;
      fin
      sino inicio
      coge-zumbador;
      si no junto-a-zumbador entonces inicio
      mientras frente-libre hacer avanza;
      gira-izquierda;
      gira-izquierda;
      deja-zumbador;
      deja-zumbador;
      mientras frente-libre hacer avanza;
      gira-izquierda;
      gira-izquierda;
      avanza;
      mientras no junto-a-zumbador y frente-libre hacer avanza;
      fin
      sino inicio
       apagate;
      fin;
     fin;
     fin;

     si no junto-a-zumbador y frente-libre entonces
     avanza;
    fin;
    mientras no orientado-al-este hacer gira-izquierda;
    mientras frente-libre hacer avanza;
    gira-izquierda;
    gira-izquierda;
    mi2;
    mientras frente-libre hacer avanza;
    gira-izquierda;
    gira-izquierda;
    xp;
        apagate;
    termina-ejecucion
finalizar-programa
