class program
    {
    define turnright()
        {
        iterate( 3 )
            turnleft();
        }

    define halfturn()
        {
        turnleft();
        turnleft();
        }

    define backmove()
        {
        halfturn();
        move();
        }

    define leftmove()
        {
        turnleft();
        move();
        }

    define rightmove()
        {
        turnright();
        move();
        }

    define exploraCamino()
        {
        leftmove();
        if( nextToABeeper )
            {
            pickbeeper();
            camina();
            move();
            }
        else
            backmove();
        }

    define camina()
        {
        exploraCamino();
        exploraCamino();
        exploraCamino();
        turnleft();
        }

    program()
        {
        pickbeeper();
        camina();
        turnoff();
        }
    }