iniciar-programa

define-nueva-instruccion gira(n) como inicio
repetir n veces gira-izquierda;
fin;

define-nueva-instruccion mide como inicio
 si izquierda-bloqueada y derecha-bloqueada entonces inicio
  avanza;
  mide;
  deja-zumbador;
 fin sino inicio
    gira(3);
    mientras frente-libre hacer
     avanza;
    gira(2);
    si  derecha-bloqueada entonces inicio
        mientras frente-libre y derecha-bloqueada hacer
         avanza;
         si derecha-libre entonces inicio
            mientras no orientado-al-sur hacer
            gira-izquierda;
            avanza;
            mide;
         fin sino inicio
            gira(2);
            mientras frente-libre y izquierda-bloqueada hacer
            avanza;
            mientras no orientado-al-sur hacer
            gira-izquierda;
            si frente-libre entonces inicio
            avanza;
            mide;
            fIN;
         fin;
      fin sino inicio
      gira(3);
      avanza;
      mide;
      fin;
  fin;

fin;

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

