FoxPro/Visual FoxPro - Funcion para encryptar codigo

Alguien conoce alguna pagina donde puedo localizar un programa para encriptar texto.

Les agradecere que alguien me pueda informar de esto..

Hola Marco!
Aqui vá una rutina que me construí, para encriptar las password, dios quiera que te sirva.

nuno = SUBSTR(password_usu,1,1)
ndos = SUBSTR(password_usu,2,1)
ntre = SUBSTR(password_usu,3,1)
ncua = SUBSTR(password_usu,4,1)
ncin = SUBSTR(password_usu,5,1)
nsei = SUBSTR(password_usu,6,1)
nsie = SUBSTR(password_usu,7,1)
noch = SUBSTR(password_usu,8,1)
nun1 = chr(asc(nuno)+8)
ndo2 = chr(asc(ndos)+7)
ntr3 = chr(asc(ntre)+6)
ncu4 = chr(asc(ncua)+5)
nci5 = chr(asc(ncin)+4)
nse6 = chr(asc(nsei)+3)
nsi7 = chr(asc(nsie)+2)
noc8 = chr(asc(noch)+1)
descla = nun1+ndo2+ntr3+ncu4+nci5+nse6+nsi7+noc8

es sencilla adaptandola a tus necesidades te puede servir Chao!

Claudio González Soto
Chile