Einfache Version
<!DOCTYPE html>
<html lang="de">
<head>
<meta charset="UTF-8">
<title>Ticker</title>
<script>
'use strict';
<%
' VBScript Functions aufruf
objTicker.buildScript()
%>
// als Ergebnis kommt
var news = [
'Meine Laber aber Laber ist mit Schwermetallen voll.',
'Jähzorn, Muff und kalte Stiche, Horoskopenhexentroll.',
'Wie Gedanken auf dem Besen pfeift es nah am Herd vorbei.',
'Denkste ich sei es gewesen, doch wars Frauenhexerei.',
'Drum Hexe sei verflucht das du mich Liebst,',
'denn nur mit Hexenzauber schafft ich das du bliebst!',
'Ich bin in dir und ich verbrenne,',
'da ich weit vor dir bin und trotzdem hinterher dir renne.',
'Erlöse dich aus meinem Sinn!',
'Frei und sinngemäß aus dem Gedächtnis',
'von Peter Anselm Friedel.'
];
// hier steckt der Ticker
var ticker = {play: function(msg, ix) {var text = news[msg];
if (ix < text.length) {if (text.charAt(ix) === ' ') { ix++ }document.getElementById('news').innerHTML = text.substring(0, ix + 1);ix++;
setTimeout(function () { ticker.play(msg, ix) }, 50);}
else {msg++;
if (msg === news.length) { msg = 0 }setTimeout(function () { ticker.play(msg, 0) }, 5000);}
}
};
</script>
</head>
<body onload="ticker.play(0, 0)">
<h1 id="news">Ticker</h1>
</body>
</html>