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

Function:    DECRYPTED()

Purpose:     Decrypt a character string encrypted with ENCRYPTED()

Syntax:      DECRYPTED( string )

Arguments:   string      - The character encrypted with ENCRYPTED() to be
                           decrypted.

Returns:     An un-encrypted version of <string> of identical length.

Description: The is the companion to the ENCRYPTED() function.  Strings
             encrypted with the ENCRYPTED() function must be decrypted
             with this function.

Notes:       Strings decrypted with this function must have been encrypted
             with the companion ENCRYPTED() function.

Example:     *-- check a password stored in encrypted format
             @ 5,0 SAY "Enter your password:"

             *-- allow only 40 characters, upper case, and echo dots
             password = KEYINPUT(40, .T., .F.)        && see KEYINPUT()

             USE system.dbf
             IF .NOT. password == DECRYPTED(pword)
                *-- assumes password stored on encrypted format.
                SAYINBOX( "W/R", "*** ACCESS DENIED! ***", 6 )
                USE
                RETURN
             ENDIF

Source:      RL_DECRY.PRG

See also:    ENCRYPTED(), KEYINPUT()