iniciar-programa
    define-nueva-instruccion lineauno como
    inicio
        mientras no orientado-al-este hacer gira-izquierda;

        mientras frente-libre hacer inicio
         si no junto-a-zumbador entonces
          deja-zumbador;
            avanza;
            repetir 3 veces gira-izquierda;
            avanza;
            gira-izquierda;

        fin;
    fin;

    define-nueva-instruccion lineados como
    inicio
        mientras no orientado-al-oeste hacer gira-izquierda;

        mientras frente-libre hacer inicio
         si no junto-a-zumbador entonces
          deja-zumbador;
            avanza;
            gira-izquierda;
            avanza;
            repetir 3 veces gira-izquierda;

        fin;
    fin;
    inicia-ejecucion



        mientras no orientado-al-norte hacer gira-izquierda;
        mientras frente-libre hacer avanza;
        mientras no orientado-al-oeste hacer gira-izquierda;
        mientras frente-libre hacer avanza;
        lineauno;
        si no junto-a-zumbador entonces
        deja-zumbador;
        mientras no orientado-al-norte hacer gira-izquierda;
        mientras frente-libre hacer avanza;
        mientras no orientado-al-este hacer gira-izquierda;
        mientras frente-libre hacer avanza;
        lineados;
        si no junto-a-zumbador entonces
        deja-zumbador;
        apagate;
    termina-ejecucion
finalizar-programa
