Codificar y decodificar claves fácilmente

Muy simple y lo codifica en base 64 binario. Para VFP 7/8

tupass = "PEPE"
pass_encoded = STRCONV(tupass,13) 
? pass_encoded
pass_decoded = STRCONV(pass_encoded,14)
? pass_decoded

José Temporini