Token()

         Returns a string word

    Syntax:

         Token( cString, [cSepara], [nWord] ) -> cWord

         cString : The string to treat
         cSepara : A string with valid word separators. By default
                   ,;:. ?..!()&/*+-%[]{}"
         nWord   : The word number to return. By default 1.

    Description:

         Treats a string as if it were a phrase determinig a specified
         word intervening its position inside the same.

    Return:

         The specified word or "" if the word number is higher to the
         maximun number of words in the phrase.

    Example:

         ? Token ( "Fast Library For Clipper", , 2 )    // "Library"