Criptografar ou descriptografar uma cadeia.
<varC> = encrypt (<expC1>, <expC2>, <expN>)
<varC> Recebe o valor criptografado da cadeia <expC1>.
<expC1> Cadeia a ser criptografada.
<expC2> Cadeia que funciona como senha. Deve ter tamanho máximo de 8 posições.
<expN> Expressão numérica, podendo ser:
0 - Criptografa
1 - Descriptografia
Criptografa uma cadeia cujo tamanho deve ser múltiplo de 8, a partir de uma senha. O valor criptografado é uma cadeia gerada como retorno da função. Tal valor é descriptografado a partir da senha utilizada na criptografia.
res = encrypt ("12345678", "abc", 1)
? encrypt (res, "abc", 0) && retorna 12345678