iniciar-programa
    define-nueva-instruccion esquina como inicio
        mientras no-orientado-al-oeste hacer inicio
           gira-izquierda;
        fin;
        mientras frente-libre hacer inicio
           avanza;
        fin;
        si frente-bloqueado entonces inicio
           gira-izquierda;
        fin;
        mientras frente-libre hacer inicio
           avanza;
        fin;
        gira-izquierda;
     fin;
    define-nueva-instruccion gira(n) como inicio
       repetir n veces gira-izquierda;
    fin;
    define-nueva-instruccion kontando como inicio
       si junto-a-zumbador entonces inicio
          coge-zumbador;
          kontando;
          si frente-libre y junto-a-zumbador entonces inicio
             avanza;
          fin sino inicio
             si frente-bloqueado y izquierda-libre y junto-a-zumbador entonces inicio
                gira-izquierda;
                avanza;
             fin;
          fin;
          mientras no-junto-a-zumbador hacer inicio
             si frente-libre y no-junto-a-zumbador entonces inicio
                avanza;
             fin;
             si frente-bloqueado y izquierda-libre y no-junto-a-zumbador entonces inicio
                gira-izquierda;
                avanza;
             fin;
          fin;
       fin;
    fin;
    define-nueva-instruccion peri(n) como inicio
       si junto-a-zumbador entonces inicio
          si frente-libre entonces inicio
             avanza;
             peri(sucede(n));
          fin sino inicio
             si frente-bloqueado y no-orientado-al-sur y izquierda-libre entonces inicio
                gira-izquierda;
                avanza;
                peri(sucede(n));
             fin sino inicio
                si frente-bloqueado y orientado-al-sur entonces inicio
                   si si-es-cero(n) entonces inicio
                      apagate;
                   fin;
                   gira-izquierda;
                   repetir precede (n) veces inicio
                      kontando;
                   fin;
                fin;
             fin;
          fin;
       fin sino inicio
          si no-junto-a-zumbador entonces inicio
             si frente-libre entonces inicio
                avanza;
                peri(n);
             fin sino inicio
                si frente-bloqueado y no-orientado-al-sur y izquierda-libre entonces inicio
                   gira-izquierda;
                   avanza;
                   peri(n);
                fin sino inicio
                   si frente-bloqueado y orientado-al-sur entonces inicio
                      si si-es-cero(n) entonces inicio
                         apagate;
                      fin;
                      gira-izquierda;
                      repetir precede (n) veces kontando;
                   fin;
                fin;
             fin;
          fin;
       fin;
    fin;
    define-nueva-instruccion robados como inicio
       si junto-a-zumbador entonces inicio
          coge-zumbador;
          robados;
          deja-zumbador;
       fin sino inicio
          esquina;
       fin;
    fin;
    inicia-ejecucion
        esquina;
        peri(0);
        robados;
        apagate;
    termina-ejecucion
finalizar-programa
