iniciar-programa
define-nueva-instruccion checa como
inicio
   repetir 4 veces
   inicio
       si frente-bloqueado y izquierda-bloqueada y derecha-bloqueada
       entonces
       inicio
       repetir 2 veces gira-izquierda;
       si frente-libre entonces
       inicio
          deja-zumbador;
          apagate;
       fin
          sino
          apagate;
        fin
        sino gira-izquierda;
    fin
 fin;
define-nueva-instruccion clavel como
inicio
  deja-zumbador;
  repetir 4 veces
  inicio
     si frente-libre entonces
     inicio
        avanza;
        si  no-junto-a-zumbador entonces clavel;
        repetir 2 veces gira-izquierda;
        avanza;
        repetir 2 veces gira-izquierda;
     fin;
      gira-izquierda;
   fin;
fin;
define-nueva-instruccion clavelin como
inicio
  coge-zumbador;
  repetir 4 veces
  inicio
     si frente-libre entonces
     inicio
        avanza;
             si frente-libre o derecha-libre o izquierda-libre
        entonces si junto-a-zumbador entonces clavelin;
        repetir 2 veces gira-izquierda;
        avanza;
        repetir 2 veces gira-izquierda;
     fin;
      gira-izquierda;
   fin;
fin;
    inicia-ejecucion
    clavel;
    clavelin;
    checa;
        apagate;
    termina-ejecucion
finalizar-programa

