Click above to get retro games delivered to your door ever month!

  Name:     chrfound() - test if all chars in str1 are in str2
  Usage:    <logical> = chrfound(<chars>,<string>)
  Params:   string <chars> - the characters to search for
            string <string> - the string to search in
  Returns:  logical .T. if all the characters in the string <chars>
            are found in the string <string>

 ---------------------------------- Example ---------------------------------

                 ? chrfound("ABC","BBDSGHABDSJC")
                 * prints .T.

                 ? chrfound("aBC","DAEFGH")
                 * prints .F.