 // JEL - JavaSctipt ESUITE Libraries
 // by Enrico Sorcinelli - esuite@sestante.net
 // (C) Copyright 1999 - ESUITE / SESTANTE Media And Network Solutions
 // Compatibility: NAV3, NAV4, MSIE4


function TextScroll1(msg,delay) {
   timerOne=window.setTimeout("SetMessage1(100,'" + msg + "'," + delay + ")",delay);
}

function SetMessage1(seed,msg,delay)
{
   var out = " ";
   var c   = 1;

   if (seed > 100) {
      seed--;
      timerTwo=window.setTimeout("SetMessage1(" + seed + ",'" + msg + "'," + delay + ")",delay);
   }
   else if (seed <= 100 && seed > 0) {
      for (c=0 ; c < seed ; c++) {
         out+=" ";
      }
      out+=msg;
      seed--;
      window.status=out;
      timerTwo=window.setTimeout("SetMessage1(" + seed + ",'" + msg + "'," + delay + ")",delay);
   }
   else if (seed <= 0) {
      if (-seed < msg.length) {
         out+=msg.substring(-seed,msg.length);
         seed--;
         window.status=out;
         timerTwo=window.setTimeout("SetMessage1(" + seed + ",'" + msg + "'," + delay + ")",delay);
      }
      else {
         window.status=" ";
         timerTwo=window.setTimeout("SetMessage1(100" + ",'" + msg + "'," + delay + ")",delay);
      }
   }
}

function TextScroll2(msg,delay) {
   timerOne=window.setTimeout("SetMessage2('" + msg + "','','',''," + delay + ")",delay);
}

function SetMessage2(init_msg,str,msg,leftmsg,delay)
{
   if (msg == "") {
      str = " ";
      msg = init_msg;
      leftmsg = "";
   }
   if (str.length == 1) {
      while ( msg.substring(0,1) == " " ) {
         leftmsg = leftmsg + str;    
         str = msg.substring(0, 1);
         msg = msg.substring(1, msg.length);
      }
      leftmsg = leftmsg + str;
      str = msg.substring(0, 1);
      msg = msg.substring(1, msg.length);
      for (var ii = 0; ii < 120; ii++) {
         str = " " + str;
      }
   }
   else {
      str = str.substring(10, str.length); // decrease str little by little
   }
   window.status = leftmsg + str;
   timerOne = window.setTimeout("SetMessage2('" + init_msg + "','" + str + "','" + msg + "','" + leftmsg + "'," + delay + ")",delay);
}

