(Lianja) ARC4 PRNG (Pseudo Random Number Generator)

Uses the ARC4 stream encryption algorithm as a pseudo random number generator.

Chilkat Lianja Extension Download Chilkat Lianja Extension

// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

loCrypt = createobject("CkCrypt2")

// Set the encryption algorithm to ARC4:	
loCrypt.CryptAlgorithm = "arc4"

// We want the encrypted output to be a hex-encoded string.
loCrypt.EncodingMode = "hex"

lcKey = "000102030405060708090A0B0C0D0E0F"
lcData = "12345678"

// Key length is 128 bits in this example.
loCrypt.KeyLength = 128
loCrypt.SetEncodedKey(lcKey,"hex")

// Generate 16 "random" 8-byte blocks, encoded as hex strings.
// This example will generate the identical output each time
// it is run.

for i = 0 to 15
    lcCipherHex = loCrypt.EncryptStringENC(lcData)
    ? lcData
    ? lcCipherHex
    lcData = lcCipherHex
next


release loCrypt