iniciar-programa 

define-nueva-instruccion es_N (t) como inicio
    si junto-a-zumbador y no si-es-cero (t) entonces inicio
       coge-zumbador;
       es_N (precede(t));
    fin
    sino inicio
        si si-es-cero (t) y no-junto-a-zumbador entonces deja-zumbador
           sino mientras junto-a-zumbador hacer coge-zumbador;
    fin;
fin;

define-nueva-instruccion prueba (p) como inicio
   si junto-a-zumbador entonces inicio
repetir precede(p) veces si junto-a-zumbador entonces coge-zumbador;
   si junto-a-zumbador entonces inicio
      coge-zumbador;
      prueba (p);
   fin
   sino inicio
      deja-zumbador;
   fin;
   fin;
fin;

define-nueva-instruccion primalidad (k) como inicio (*prueba de primalidad para enteros mayores a 7*)
   si junto-a-zumbador entonces inicio
      coge-zumbador;
      primalidad (sucede (k));
   fin
   sino inicio
      repetir k veces deja-zumbador;
      es_N (1);
      si junto-a-zumbador entonces coge-zumbador sino inicio
      repetir k veces deja-zumbador;
      es_N (2);
      si no junto-a-zumbador entonces inicio
         repetir k veces deja-zumbador;
         es_N (3);
         si no junto-a-zumbador entonces inicio
            repetir k veces deja-zumbador;
            es_N (5);
            si no junto-a-zumbador entonces inicio
               repetir k veces deja-zumbador;
               es_N (7);
            fin;
         fin;
      fin;

      si no-junto-a-zumbador entonces inicio
      repetir k veces deja-zumbador;
      prueba (2);
      si junto-a-zumbador entonces inicio (*siguiente prueba de primalidad*)
         repetir precede(k) veces deja-zumbador;
         prueba (3);
         si junto-a-zumbador entonces inicio  (*siguiente prueba de primalidad*)
            repetir precede (k) veces deja-zumbador;
            prueba (5);
            si junto-a-zumbador entonces inicio (*siguiente prueba de primalidad*)
               repetir precede (k) veces deja-zumbador;
               prueba (7);
            fin;
         fin;
      fin;

      fin;

      fin;
   fin; (*fin sino*)
fin; (*fin primalidad*)

define-nueva-instruccion BP como inicio
   si junto-a-zumbador entonces inicio

      repetir 4 veces inicio
      si frente-libre entonces inicio
      avanza;
      primalidad (0);
      BP;
      gira-izquierda;
      gira-izquierda;
      avanza;
      gira-izquierda;
      gira-izquierda;

      fin;
      gira-izquierda;
      fin;
      apagate;

   fin;
fin;

    inicia-ejecucion
       BP;
        apagate;
    termina-ejecucion
finalizar-programa
