sidef/scripts/RosettaCode/the_isaac_cipher.sf

#!/usr/bin/ruby

#
## https://rosettacode.org/wiki/The_ISAAC_Cipher
#

require('Math::Random::ISAAC');

func xor_isaac(key, msg) {
  var rng = %s'Math::Random::ISAAC'.new(unpack('C*', key));

  msg.chars»ord»() \
     -> »^« 256.of{ rng.irand % 95 + 32 }.last(msg.len).reverse \
     -> «%« '%02X' -> join;
}

var msg = 'a Top Secret secret';
var key = 'this is my secret key';

var enc = xor_isaac(key, msg);
var dec = xor_isaac(key, pack('H*', enc));

say "Message: #{msg}";
say "Key    : #{key}";
say "XOR    : #{enc}";
say "XOR dcr: #{pack('H*', dec)}";