RC4TWO - Encryption Without Mcrypt

<?
function rc4two($data, $salt, $encrypt = true)
{
	$key = array();
	$result = "";
	$state = array();
	$salt = md5(str_rot13($salt));
	$len = strlen($salt);

	if ($encrypt)
	{
		$data = str_rot13($data);
	}
	else
	{
		$data = base64_decode($data);
	}

	$ii = -1;

	while (++$ii < 256)
	{
		$key[$ii] = ord(substr($salt, (($ii % $len) + 1), 1));
		$state[$ii] = $ii;
	}

	$ii = -1;
	$j = 0;

	while (++$ii < 256)
	{
		$j = ($j + $key[$ii] + $state[$ii]) % 255;
		$t = $state[$j];

		$state[$ii] = $state[$j];
		$state[$j] = $t;
	}

	$len = strlen($data);
	$ii = -1;
	$j = 0;
	$k = 0;

	while (++$ii < $len)
	{
		$j = ($j + 1) % 256;
		$k = ($k + $state[$j]) % 255;
		$t = $key[$j];

		$state[$j] = $state[$k];
		$state[$k] = $t;

		$x = $state[(($state[$j] + $state[$k]) % 255)];
		$result .= chr(ord($data[$ii]) ^ $x);
	}

	if ($encrypt)
	{
		$result = base64_encode($result);
	}
	else
	{
		$result = str_rot13($result);
	}

	return $result;
}

?>