iniciar-programa
define-nueva-instruccion gira(x) como repetir x veces gira-izquierda;
define-nueva-instruccion radio como inicio
    si junto-a-zumbador entonces inicio
        coge-zumbador;
        radio;
        avanza;
        deja-zumbador;
    fin;
fin;
define-nueva-instruccion regresa como inicio
    si junto-a-zumbador entonces inicio
        coge-zumbador;
        avanza;
        regresa;
        deja-zumbador;
    fin;
fin;
define-nueva-instruccion escalera como inicio
    gira(3);
    avanza;
    mientras no-junto-a-zumbador hacer inicio
        gira(3);
        avanza;
        si no-junto-a-zumbador entonces inicio
        si no-junto-a-zumbador entonces deja-zumbador;             
            gira(1);
            avanza;
        fin;
    fin;
fin;


    inicia-ejecucion
   si no-junto-a-zumbador entonces inicio
       deja-zumbador;
       apagate;
   fin;
   mientras no-orientado-al-norte hacer gira-izquierda;
    repetir 4 veces inicio
        radio;
        gira(2);
        avanza;
        regresa;
        deja-zumbador;
        gira(2);
        gira(1);
    fin;
    mientras junto-a-zumbador hacer coge-zumbador;
    mientras no-junto-a-zumbador hacer avanza;
    repetir 4 veces inicio
    escalera;
    gira(1);
    fin;

        apagate;
    termina-ejecucion
finalizar-programa
