Function Keyed ($ txt, $ encrypt_key) {$ encrypt_key = md5 ($ encrypt_key); $ CTR = 0; $ TMP = ""; for ($ I = 0; $ I
Function Encrypt ($ txt, $ key) {srand ((Double) microtime () * 1000000); $ encrypt_key = md5 (rand (0,32000)); $ CTR = 0; $ TMP = ""; for ($ I = 0; $ i
Function Decrypt ($ txt = key) {$ txt = keyed ($ txt, $ key); $ TMP = ""; for ($ I = 0; $ i
