var x,y
var step=20
var flag=0

// Your message. Important: the space at the end of the sentence!
var message="MESSAGEmanager "
message=message.split("")

var xpos=new Array()
for (i=0;i<=message.length-1;i++) {
	xpos[i]=-50
}

var ypos=new Array()
for (i=0;i<=message.length-1;i++) {
	ypos[i]=-50
}

function handlerMM(e){
	x = (document.layers) ? e.pageX : document.body.scrollLeft+event.clientX
	y = (document.layers) ? e.pageY : document.body.scrollTop+event.clientY
	flag=1
}

function makesnake() {
	if (flag==1 && document.all) {
    	for (i=message.length-1; i>=1; i--) {
   			xpos[i]=xpos[i-1]+step
			ypos[i]=ypos[i-1]
    	}
		xpos[0]=x+step
		ypos[0]=y
	
		for (i=0; i<message.length-1; i++) {
    		var thisspan = eval("span"+(i)+".style")
    		thisspan.posLeft=xpos[i]
			thisspan.posTop=ypos[i]
    	}
	}
	
	else if (flag==1 && document.layers) {
    	for (i=message.length-1; i>=1; i--) {
   			xpos[i]=xpos[i-1]+step
			ypos[i]=ypos[i-1]
    	}
		xpos[0]=x+step
		ypos[0]=y
	
		for (i=0; i<message.length-1; i++) {
    		var thisspan = eval("document.span"+i)
    		thisspan.left=xpos[i]
			thisspan.top=ypos[i]
    	}
	}
		var timer=setTimeout("makesnake()",30)
}


		message     = 
		"MESSAGEmanager Communications Server^" + 
		"Voice, Fax, SMS, Telex and E-mail^"+
		"One Solution for all your communication requirements!!!^" +
        "Seamless integration with all desktop, email, ERP, mini and mainframe applications.^" +
        "Certified for Windows 2000 Server.^" + 
		"Runs with Domino^" + 
        "SAP Certified^" + 
        "MESSAGEmanager Communications Server^" +
        "MESSAGEmanager transforms Exchange & Notes/Domino into a fully featured voicemail system.^"+
        "SMS notifies you when an important fax, voice or email message has arrived, a meeting is scheduled, or a task is due.^"+
        "Send SMS messages from the desktop & generate SMS alerts from any application.^"+
        "^" 
  scrollSpeed = 25
  lineDelay   = 1500

  txt         = ""

  function scrollText(pos) {
    if (message.charAt(pos) != '^') {
      txt    = txt + message.charAt(pos)
      status = txt
      pauze  = scrollSpeed
    }
    else {
      pauze = lineDelay
      txt   = ""
      if (pos == message.length-1) pos = -1
    }
    pos++
    setTimeout("scrollText('"+pos+"')",pauze)
  }


scrollText(0);