FLASH中纯as的打字效果动画

/*
www.3c800.com
*/
this.createTextField("textcontent", 1, 200, 10, 300, 500);
textcontent.multiline = true;
textcontent.wordWrap = true;
textcontent.html = true;
//-----------------------------------------------
function typetext(str:String, speed:Number) {
 //str:文字内容 speed:打字速度
 var i = 0;
 var ttext = new Object();
 var IS_type_txt:Boolean = true;
 ttext.interval = function() {
  var type_txt_move = new String(str);
  textcontent.htmlText = type_txt_move.substring(0, i+1);
  if (IS_type_txt) {
   i++;
  } else {
   //i = 0;//循环打字
   clearInterval(ttext_ID);
  }
  if (i>=type_txt_move.length) {
   IS_type_txt = false;
  } else if (i<=0) {
   IS_type_txt = true;
  }
 };
 var ttext_ID = setInterval(ttext, "interval", speed);
}
//-----------------------------------------
typetext("<b>《致绿衣使者》</b><br/>      田子君<br/>春天你向我走来<br/>满脸堆笑如同灿烂的迎春花开<br/>是你用使者的风范<br/>让我和春天抱个满怀<br/><br/>夏天你向我走来<br/>雨水掺杂着汗滴<br/>顺着你额前的发端轻轻滑落<br/>在你转身的刹那<br/>从你的眼睛里我读到了执着<br/><br/>秋天你向我走来<br/>地上翻飞的落叶好似你匆匆的步态<br/>无悔的选择<br/>是你对生命真挚的热爱<br/><br/>冬天你向我走来<br/>畅游的花为你深情地伴舞<br/>帘中你坚毅的面容<br/>是我心中永恒的雕塑……", 100);