Encrypt()

         Encrypts a string

    Syntax:

         Encrypt( cString, cPassword ) -> cNewString

         cString   : The string to encrypt
         cPassword : The string used to encrypt

    Description:

         Encrypts a string with a secret method.

    Return:

         A encrypt character value.

    Example:

         cValue := Encrypt( "The beach is empty now", "This is my password" )