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

 C_DECRYPT()

 DESCRIPTION

 C_DECRYPT() converts a non-readable character string previously
 encrypted with C_ENCRYPT() to it's original, readable format.  An
 optional password key is used to decrypt the string if the password
 key was used when the data was encrypted by C_ENCRYPT().

 NOTES

 The character string to decrypt must have been previously encrypted
 using the C_ENCRYPT() function.  If a password key was used with
 C_ENCRYPT(), the same key must be used to decrypt the data.

 SYNTAX

 C_DECRYPT(string [,password])

 PARAMETERS

 string (C) is the character string to decrypt.

 password (C) is a character string to be used as a password key to
 strengthen the data encryption.  If password was specified when the
 string was encrypted with C_ENCRYPT(), it must be specified to
 decrypt the string.

 RETURNS

 C_DECRYPT() converts string to it's original, readable format and
 returns a character string.

 EXAMPLES

 use userfile          && Open user/password file

 m_id = space(10)
 m_pw = space(10)

 @ 0,0 say "Enter Userid:   " get m_id      && Get user id and
 @ 1,0 say "Enter Password: " get m_pw      && password from user.
 read

 seek m_id                                   && Find user id
 if userfile->pw != c_decrypt(m_pw, m_id)    && Decrypt password
   ? "Invalid Entry"                         && and check for match.
 endif