VAR MSG = "This is a JavaScript document that runs the horse effect";
Var interval = 100;
VAR Spacelen = 120;
VAR Space10 = ""
VAR SEQ = 0;
Function scroll () {
Len = msg.length;
WINDOW.STATUS = msg.substring (0, SEQ 1);
SEQ ;
IF (SEQ> = LEN) {
SEQ = SPACELEN;
Window.SetTimeout ("scroll2 ();", interval);
}
Else
Window.SetTimeout ("scroll ();", interval;
}
Function scroll2 () {
Var out = "";
For (i = 1; i <= spacelen / space10.length; i ) OUT =
Space10;
OUT = OUT MSG;
Len = Out.Length;
WINDOW.STATUS = OUT.SUBSTRING (SEQ, LEN);
SEQ ;
IF (SEQ> = LEN) {SEQ = 0;
Window.SetTimeout ("scroll2 ();", interval);
}
Scroll ();
script>
body>
html>