Encrypt/Decrypt string

Procedure to encrypt a string based on a seed– A good enhancement would be to make the seed passable and create a table to hold multiple seeds based on some key.  Please download the source and follow instructions on Procedure page to install and get running.  Tell us what you think