iniciar-programa
 define-nueva-instruccion final(x) como inicio
  mientras no-orientado-al-sur hacer gira-izquierda;
   mientras frente-libre hacer avanza;
    repetir x veces deja-zumbador;
     apagate;
      fin;
  define-nueva-instruccion esquina como inicio
  repetir 3 veces gira-izquierda;
   si frente-libre y derecha-libre entonces avanza;
    fin;
 define-nueva-instruccion gira(q) como repetir q veces gira-izquierda;
 define-nueva-instruccion perimetro(x) como inicio
  si derecha-bloqueada y junto-a-zumbador o no-junto-a-zumbador entonces inicio
    si junto-a-zumbador y derecha-bloqueada entonces avanza;
     si derecha-bloqueada y algun-zumbador-en-la-mochila y no-junto-a-zumbador entonces deja-zumbador;
      si frente-bloqueado y orientado-al-oeste entonces final(x);
       si derecha-libre entonces esquina;
        si junto-a-zumbador entonces perimetro(sucede(x));
        fin;
         perimetro(x);
          fin;
    inicia-ejecucion
    mientras no-orientado-al-norte hacer gira-izquierda;
    mientras izquierda-bloqueada y derecha-libre hacer avanza;
    si derecha-bloqueada entonces perimetro(0);
        apagate;
    termina-ejecucion
finalizar-programa
