document.writeln('<textarea id="txt20_id" name="txt20" readonly style="width:500px;height:150px;background-color:#99ff66;color:#0000cc;border: 1px solid #33ff00;font-family:Courier;font-size:14"></textarea>' + '<BR>');

var t=125,restart=2000;
var dt=t*0;
var s="Drcouvrez le prochain MONDIAL DES CIDRES DE GLACE qui se tiendra à Rougemont les 12, 12 et 14 fevrier prochain";
var i=0;
function isNetscape()
{
        return "Netscape"==navigator.appName;
}
function DoIt()
{
        if (!i)
           document.getElementById("txt20_id").value="";
        document.getElementById("txt20_id").value+=s.charAt(i++);
        if (!isNetscape())
           document.getElementById("txt20_id").doScroll("pageDown");
        if (i<s.length)
        {
                r=Math.random();
                if (r<=0.3)
                        r=1;
                else if (r<=0.6)
                        r=-1
                else
                        r=0;
                setTimeout(DoIt,Math.round(t+dt*r));
                return;
        }
        if (restart)
        {
                i=0;
                setTimeout(DoIt,restart);
        }
}
setTimeout(DoIt,restart);