/*
   Copyright (C) 1996  Frequency Graphics  All Rights Reserved.
	 Feel free to reuse this code snippet
	 provided this header remains in tact
	 Andy Augustine 3.17.96 [www.FreqGrafx.com/411/]
	 send comments to <mohammed@freqgrafx.com>
  */

  function statusMessageObject(p,d) {
	this.msg = MESSAGE
	this.out = " "
	this.pos = POSITION
	this.delay = DELAY
	this.i     = 0
	this.reset = clearMessage
  }
  var POSITION = 100
  var DELAY    = 120
  var MESSAGE  = "+ + + "

  function clearMessage() {
	this.pos = POSITION
  }

  var scroll = new statusMessageObject()
  function scroller() {
	//
	// add spaces to beggining of message
	//
	for (scroll.i = 0; scroll.i < scroll.pos; scroll.i++) {
	  scroll.out += " "
	}
	//
	// if you are still have leading spaces, just
	// add custom string to tail of message
	// OR else if the string is running off the
	// screen, only add the characters left
	//
	if (scroll.pos >= 0)
	 scroll.out += scroll.msg
	else scroll.out = scroll.msg.substring(-scroll.pos,scroll.msg.length)
	window.status = scroll.out
	// set parameters for next run
	scroll.out = " "
	scroll.pos--
	// if you are at the end of the message,
	// reset parameters to start again
	if (scroll.pos < -(scroll.msg.length)) {
	 scroll.reset()
	}
	setTimeout ('scroller()',scroll.delay)
  }