iniciar-programa
define-nueva-instruccion topa como
inicio
    si frente-libre entonces
    inicio
        avanza;
        topa;
    fin;
fin;
define-nueva-instruccion norte como
inicio
    mientras no orientado-al-norte hacer
        gira-izquierda;
fin;
define-nueva-instruccion sur como
inicio
    mientras no orientado-al-sur hacer
        gira-izquierda;
fin;
define-nueva-instruccion unouno como
inicio
    mientras no orientado-al-oeste hacer
        gira-izquierda;
    topa;
    sur;
    topa;
    norte;
fin;
define-nueva-instruccion subiendo como
inicio
    si no junto-a-zumbador entonces
        deja-zumbador;
    norte;
    avanza;
    mientras no orientado-al-este hacer
        gira-izquierda;
    si frente-libre entonces
        avanza;
fin;
define-nueva-instruccion bajando como
inicio
      si no junto-a-zumbador entonces
        deja-zumbador;
    sur;
    avanza;
    mientras no orientado-al-este hacer
        gira-izquierda;
    si frente-libre entonces
        avanza;
fin;
    inicia-ejecucion
        unouno;
        mientras frente-libre hacer
            subiendo;
        si no junto-a-zumbador entonces
            deja-zumbador;
        mientras no orientado-al-oeste hacer
            gira-izquierda;
        topa;
        sur;
        mientras frente-libre hacer
            bajando;
        si no junto-a-zumbador entonces
            deja-zumbador;
        apagate;
    termina-ejecucion
finalizar-programa
