iniciar-programa
   define-nueva-instruccion gira(n) como inicio
      repetir n veces
         gira-izquierda;
   fin;
   define-nueva-instruccion rev(n) como inicio
      si junto-a-zumbador entonces inicio
         repetir n veces inicio
            si junto-a-zumbador y orientado-al-sur entonces inicio
               coge-zumbador;
            fin
            sino inicio
               si orientado-al-sur entonces inicio
                  gira(1);
               fin
               sino inicio
                  deja-zumbador;
               fin;
            fin;
         fin;
         si orientado-al-sur entonces inicio
            gira(3);
            avanza;
            gira(3);
            avanza;
            deja-zumbador;
            gira(2);
            avanza;
            gira(1);
            avanza;
         fin
         sino inicio
            repetir n veces inicio
               si junto-a-zumbador y orientado-al-este entonces inicio
                  coge-zumbador;
               fin
               sino inicio
                  si orientado-al-este entonces inicio
                     gira(3);
                  fin
                  sino inicio
                     deja-zumbador;
                  fin;
               fin;
            fin;
            gira(1);
         fin;
      fin
      sino inicio
         gira(1);
      fin;
      gira(1);
      avanza;
      avanza;
      gira(1);
      avanza;
      gira(1);
   fin;
   define-nueva-instruccion suma como inicio
      si junto-a-zumbador entonces inicio
         coge-zumbador;
         suma;
         deja-zumbador;
      fin
      sino inicio
         si frente-libre entonces inicio
            avanza;
            suma;
         fin;
      fin;
   fin;
   define-nueva-instruccion coge(n) como inicio
      si junto-a-zumbador entonces inicio
         coge-zumbador;
         coge(sucede(n));
      fin
      sino inicio
         gira(2);
         avanza;
         gira(1);
         repetir 11 veces
            avanza;
         gira(3);
         mientras derecha-libre hacer inicio
            suma;
            rev(n);
         fin;
         suma;
      fin;
   fin;
   inicia-ejecucion
      repetir 3 veces
         avanza;
      coge(0);
      apagate;
   termina-ejecucion
finalizar-programa