iniciar-programa
define-nueva-instruccion g(n) como
  repetir n veces
    gira-izquierda;
define-nueva-instruccion c(n) como
inicio
  si frente-libre entonces
  inicio
    repetir 2 veces
      avanza;
    c(sucede(n));
  fin
  sino
  inicio
    g(2);
    repetir n veces
      avanza;
  fin;
fin;
define-nueva-instruccion p(n) como
inicio
  si no-junto-a-zumbador entonces
  inicio
    repetir n veces
      deja-zumbador;
    si frente-bloqueado entonces
    inicio
      g(2);
      mientras frente-libre hacer
        avanza;
        g(2);
    fin
    sino
    avanza;
    si derecha-bloqueada entonces
    inicio
      g(1);
      mientras frente-libre hacer
        avanza;
      g(3);
    fin
    sino
    inicio
      g(3);
      avanza;
      g(1);
    fin;
    si junto-a-zumbador entonces
    inicio
      g(2);
      repetir 2 veces
      inicio
        si frente-libre entonces
          avanza
        sino
        inicio
          g(2);
          mientras frente-libre hacer
            avanza;
        fin;
        si orientado-al-norte entonces
          g(2);
      fin;
      si derecha-libre entonces
      inicio
        g(3);
        avanza;
        g(3);
      fin
      sino
      inicio
        g(1);
        mientras frente-libre hacer
          avanza;
        g(1);
      fin;
    fin;
    p(sucede(n));
  fin;
fin;
      inicia-ejecucion
      mientras no-orientado-al-norte hacer
        g(1);
      mientras frente-libre hacer
        avanza;
      g(3);
      c(0);
      g(3);
      p(1);
        apagate;
    termina-ejecucion
finalizar-programa
