CryptA Function

 FUNCTION CryptA(
	cSource AS STRING,
	cKey AS STRING
) AS STRING

public static string CryptA(
	string cSource,
	string cKey
)

 1LOCAL a AS STRING
 2LOCAL cKey as STRING
 3a := "The quick brown fox jumps over the lazy dog."
 4cKey := "CAT"
 5? a
 6// The quick brown fox jumps over the lazy dog.
 7? CryptA(a, cKey)
 8// ú¿C_6g[‡N%ì*„k ÙYñƒ---à-øÃFé†ÈbÓÈã_ø´Ù¢ù½Ÿ
 9? a
10// ú¿C_6g[‡N%ì*„k ÙYñƒ---à- øÃFé†ÈbÓÈã_ø´Ù¢ù½Ÿ
11CryptA(a, cKey)
12? a
13// The quick brown fox jumps over the lazy dog.