COMPRESSION RLE (PART II)

Chaine claire.<br>
<textarea id="0" onkeyUp="document.getElementById(1).value=compress(this.value);document.getElementById(2).value=decompress(compress(this.value));document.getElementById(3).value=this.value.length-compress(this.value).length">

</textarea><br><br>
Chaine compressée.<br>
<textarea id="1">

</textarea><br><br>
Chaine décompréssée.<br>
<textarea id="2">

</textarea><br><br>
Caractères gagnés.<br>
<input type="text" id="3">
<script>
function compress(text)
{
var ranked=text.split("");
var compstr="";
var k=0;
for(i=0;i<ranked.length;i++)
{
	if(k<255){k++}else{compstr+=ranked[i]+String.fromCharCode(k);k=0;};
	if(ranked[i]!=ranked[i+1]){compstr+=ranked[i]+String.fromCharCode(k);k=0;}
}
return compstr;
}


function decompress(text)
{
var decompstr="";
	for(i=0;i<text.length;i+=2)
	{
		for(k=0;k<text.charCodeAt(i+1);k++)
		{
			decompstr+=text.charAt(i);
		}
	}
return decompstr
}

</script>