// Generierung einer Laufschrift in der Statuszeile des Browsers

// gobale Variablen

var scrolltext = "                                                                                                                              ... and the Lord spoke:   Go and take a skateboard and a sail and pay tribute to me on the wide areas of the flat stone ..."
var text_length = Math.max(250,scrolltext.length)  //maximale Textlänge
var pos        = 1
var fill_char  = " "                               // Ausgabetext mit fill_char auffüllen:
var ausgabetext = scrolltext
while (ausgabetext.length < text_length)
    ausgabetext += fill_char


function scrolltext_fkt()
 {
   // Zerlegt zuerst den Ausgabetext in zwei Teile.
   // Anfang und Ende der beiden Teilstrings ermitteln:
   anfang_teil2 = pos-1
   ende_teil2   = ausgabetext.length
   anfang_teil1 = 0
   ende_teil1   = ausgabetext.length-(ende_teil2-anfang_teil2)

   // Teilstrings ausschneiden
   var teil2 = ausgabetext.substring(anfang_teil2,ende_teil2)
   var teil1 = ausgabetext.substring(anfang_teil1,ende_teil1)

   // Statuszeile ausgeben
   self.status = teil2 + teil1

   // Position für nächsten Schnitt hochzählen:
   if (pos < text_length)
     pos++
   else
     pos = 1

   // nächsten TimeOut setzen. Sicherheitshalber wird ein
   // evtl. noch laufender Timer beendet

   clearTimeout(TIMEOUT_ID) 
   TIMEOUT_ID = setTimeout("scrolltext_fkt()",90);
} 


// Start der Laufschrift - Initialer Timeout

TIMEOUT_ID = setTimeout("scrolltext_fkt()",5000)