AutoIt

ARC4 PRNG (Pseudo Random Number Generator)

See more Encryption Examples

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

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

$oCrypt = ObjCreate("Chilkat.Crypt2")

;  Set the encryption algorithm to ARC4:	
$oCrypt.CryptAlgorithm = "arc4"

;  We want the encrypted output to be a hex-encoded string.
$oCrypt.EncodingMode = "hex"

Local $sKey = "000102030405060708090A0B0C0D0E0F"
Local $sData = "12345678"

;  Key length is 128 bits in this example.
$oCrypt.KeyLength = 128
$oCrypt.SetEncodedKey $sKey,"hex"

;  Generate 16 "random" 8-byte blocks, encoded as hex strings.
;  This example will generate the identical output each time
;  it is run.
Local $sCipherHex
Local $i
For $i = 0 To 15
    $sCipherHex = $oCrypt.EncryptStringENC($sData)
    ConsoleWrite($sData & @CRLF)
    ConsoleWrite($sCipherHex & @CRLF)
    $sData = $sCipherHex
Next