HTML Notation Converter

Right, two text boxes on stage, one input:

htmlinput.text = '';
htmlinput.addEventListener(Event.CHANGE,outputhtml);
var htmlCode:Array = ['<','>',"\r",'&','"'];
var htmlNotation:Array = ['&lt;','&gt;',"\n",'&amp;','&quot;'];
function outputhtml(evnt:Event):void {
htmloutput.text = "<pre>";
var str:String = htmlinput.text;
for(var i:uint = 0; i<str.length; i++) {
 var char:String = str.charAt(i);
 trace(char+' '+str.charCodeAt(i));
 var ind:int = htmlCode.indexOf(char);
 if(ind == -1) {
  htmloutput.appendText(char);
 }else{
  htmloutput.appendText(htmlNotation[ind]);
 }
}
htmloutput.appendText("</pre>");
}

This code was also output using it, and I put the ampersand and quote marks in, because it was great at converting html into html notation, but my actual html notation was getting converted back to html by the blog editor!

It doesn't recognise all linebreaks, but it will pick up on the proper ones, web text is a bit funny like that...