message     = "De Credit Management Group^" +		  
						"Full service organisatie op het gebied van Credit Management^" +
						"Business to Business incasso^" +
						"Internationaal Incasso^" +
						"International Credit Management Consultancy^" +
						"Detachering Credit Professionals^" +
						"Outsourcing Debiteurenbeheer^" +
						"Corporate Recovery^" +
						"^"
		  scrollSpeed = 25
		  lineDelay   = 5500
		
		  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)