iniciar-programa
  define-nueva-instruccion norte como mientras no-orientado-al-norte hacer gira-izquierda;
  define-nueva-instruccion sur como mientras no-orientado-al-sur hacer gira-izquierda;
  define-nueva-instruccion este como mientras no-orientado-al-este hacer gira-izquierda;
  define-nueva-instruccion oeste como mientras no-orientado-al-oeste hacer gira-izquierda;
  define-nueva-instruccion al-frente como mientras frente-libre hacer avanza;

  define-nueva-instruccion sube como inicio
      norte;
      mientras junto-a-zumbador hacer avanza;
      repetir 2 veces gira-izquierda;
      avanza;
  fin;

  define-nueva-instruccion regresa como inicio
      sur;
      al-frente;
      oeste;
      mientras frente-libre hacer avanza;
      repetir 2 veces gira-izquierda;
      mientras no-junto-a-zumbador y frente-libre hacer avanzA;
  fin;
  define-nueva-instruccion faltan como inicio
      norte;
      avanza;
      mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
      sur;
      avanza;
      mientras junto-a-zumbador hacer coge-zumbador;
  fin;
  define-nueva-instruccion sobran (n) como inicio
      norte;
      avanza;
      este;
      avanza;
      repetir n veces deja-zumbador;
  fin;
  define-nueva-instruccion compara(n) como inicio
      si junto-a-zumbador y no si-es-cero (n) entonces inicio
          coge-zumbador;
          compara(precede(n));
      fin sino inicio
          si si-es-cero (n) entonces inicio
                  (*ME FALTARON KAREL-VITAMINAS*)
              faltan;
          fin sino inicio
                  (*ME SOBRAN N KAREL-VITAMINAS*)
              sobran(n);
              apagate;
          fin;
      fin;
  fin;
    define-nueva-instruccion recoge(n) como inicio
      este;
      si frente-libre entonces inicio
          avanza;
          sube;
          mientras junto-a-zumbador hacer coge-zumbador;
          recoge(n);
          avanzA;
      fin sino inicio
          mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
          repetir n veces coge-zumbador;
          compara(n);
          oeste;
      fin;
  fin;
  define-nueva-instruccion lee(n) como inicio
      si junto-a-zumbador entonces inicio
          coge-zumbador;
          lee(sucede(n));
      fin sino inicio
          recoge(n);
          sur;
          al-frente;
          mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
      fin;
  fin;
  define-nueva-instruccion vacia como inicio
      mientras algun-zumbador-en-la-mochila hacer deja-zumbador;
      lee(0);
  fin;
    inicia-ejecucion
        vacia;
        apagate;
    termina-ejecucion
finalizar-programa
