iniciar-programa
define-nueva-instruccion gira-derecha como
inicio
  repetir 3 veces
    gira-izquierda;
fin;
define-nueva-instruccion paso-atras como
inicio
  repetir 2 veces
    gira-izquierda;
  avanza;
  repetir 2 veces
    gira-izquierda;

fin;
define-nueva-instruccion primos como
inicio
 (*1*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*2*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*3*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*4*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*5*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*6*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*7*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*8*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*9*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*10*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*11*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*12*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*13*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*14*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*15*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*16*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*17*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*18*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*19*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*20*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*21*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*22*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*23*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*24*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*25*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*26*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*27*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*28*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*29*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*30*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*31*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*32*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*33*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*34*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*35*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*36*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*37*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*38*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*39*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*40*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
   (*41*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*42*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*43*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*44*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*45*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*46*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*47*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*48*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*49*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*50*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*51*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio

    sal-de-instruccion;
  fin;
  (*52*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*53*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*54*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*55*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*56*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*57*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
  
    sal-de-instruccion;
  fin;
  (*58*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*59*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*60*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*61*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*62*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*63*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*64*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*65*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*66*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*67*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*68*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*69*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*70*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*71*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*72*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*73*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*74*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*75*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*76*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*77*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*78*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*79*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*80*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    sal-de-instruccion;
  fin;
  (*81]*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio

    sal-de-instruccion;
  fin;
  (*82*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio

    sal-de-instruccion;
  fin;
  (*83*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*84*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio

    sal-de-instruccion;
  fin;
  (*85*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio

    sal-de-instruccion;
  fin;
  (*86*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio

    sal-de-instruccion;
  fin;
  (*87*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    
    sal-de-instruccion;
  fin;
 (*88*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*89*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  (*90*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*91*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
    (*92*)
    coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*93*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*94*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*95*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*96*)
   coge-zumbador;
  si no-junto-a-zumbador entonces
    sal-de-instruccion;
  (*97*)
  coge-zumbador;
  si no-junto-a-zumbador entonces
  inicio
    deja-zumbador;
    sal-de-instruccion;
  fin;
  mientras junto-a-zumbador hacer
    coge-zumbador;
  

fin;
define-nueva-instruccion busca como
inicio
 mientras junto-a-zumbador hacer
 inicio
    mientras junto-a-zumbador hacer
      coge-zumbador;
    si frente-libre entonces
    inicio
      avanza;
      si junto-a-zumbador entonces
        primos;
      si no-junto-a-zumbador entonces
      inicio
        paso-atras;
         si izquierda-libre entonces
      inicio
        gira-izquierda;
        avanza;
        si junto-a-zumbador entonces
         primos;
         si no-junto-a-zumbador entonces
         inicio
           paso-atras;
           gira-derecha;
            si derecha-libre entonces
        inicio
          gira-derecha;
          avanza;
          si junto-a-zumbador entonces
            primos;
          si no-junto-a-zumbador entonces
          inicio
            paso-atras;
            gira-izquierda;
             repetir 2 veces
            gira-izquierda;
           si frente-libre entonces
           inicio
             avanza;
             si junto-a-zumbador entonces
               primos;
             si no-junto-a-zumbador entonces
             inicio
               paso-atras;
               apagate;
             fin;
           fin
           sino
             apagate;
           fin;
          fin;
         fin;
      fin
      sino
      inicio
        si derecha-libre entonces
        inicio
          gira-derecha;
          avanza;
          si junto-a-zumbador entonces
            primos;
          si no-junto-a-zumbador entonces
          inicio
            paso-atras;
            gira-izquierda;
          fin;
        fin
        sino
        inicio
        repetir 2 veces
            gira-izquierda;
           si frente-libre entonces
           inicio
             avanza;
             si junto-a-zumbador entonces
               primos;
             si no-junto-a-zumbador entonces
             inicio
               paso-atras;
               apagate;
                repetir 2 veces
            gira-izquierda;
           si frente-libre entonces
           inicio
             avanza;
             si junto-a-zumbador entonces
               primos;
             si no-junto-a-zumbador entonces
             inicio
               paso-atras;
               apagate;
             fin;
           fin
           sino
             apagate;
             fin;
           fin
           sino
             apagate;
        fin;
      fin;
      fin;
    fin
    sino
    inicio
      si izquierda-libre entonces
      inicio
        gira-izquierda;
        avanza;
        si junto-a-zumbador entonces
         primos;
         si no-junto-a-zumbador entonces
         inicio
           paso-atras;
           gira-derecha;
            si derecha-libre entonces
        inicio
          gira-derecha;
          avanza;
          si junto-a-zumbador entonces
            primos;
          si no-junto-a-zumbador entonces
          inicio
            paso-atras;
            gira-izquierda;
             repetir 2 veces
            gira-izquierda;
           si frente-libre entonces
           inicio
             avanza;
             si junto-a-zumbador entonces
               primos;
             si no-junto-a-zumbador entonces
             inicio
               paso-atras;
               apagate;
             fin;
           fin
           sino
             apagate;
          fin;
        fin;

         fin;
      fin
      sino
      inicio
        si derecha-libre entonces
        inicio
          gira-derecha;
          avanza;
          si junto-a-zumbador entonces
            primos;
          si no-junto-a-zumbador entonces
          inicio
            paso-atras;
            gira-izquierda;
          fin;
        fin
        sino
        inicio
          repetir 2 veces
            gira-izquierda;
           si frente-libre entonces
           inicio
             avanza;
             si junto-a-zumbador entonces
               primos;
             si no-junto-a-zumbador entonces
             inicio
               paso-atras;
               apagate;
             fin;
           fin
           sino
             apagate;
        fin;
      fin;
    fin;
 fin;
fin;
    inicia-ejecucion
      busca;
        apagate;
    termina-ejecucion
finalizar-programa
