Encryption Function:
DEFINE KEY 0xFACA
TAKE BUFFER REFERENCE TO CHAR POINTER
INDEX =0
WHILE(CHAR[INDEX]!=NULL)
{
CHAR[INDEX] = CHAR[INDEX] - KEY
}
RETURN ENCRYPTED BUFFER
Decryption Function:
DEFINE KEY 0xFACA
TAKE BUFFER REFERENCE TO CHAR POINTER
INDEX =0
WHILE(CHAR[INDEX]!=NULL)
{
CHAR[INDEX] = CHAR[INDEX] + KEY
}
RETURN DECRYPTED BUFFER