//-- Begin Scroller's Parameters and messages -->
//scroller's width
var swidth=630;

//scroller's height
var sheight=100;


//scroller's speed 
var sspeed=2;
var restart=sspeed;
var rspeed=sspeed;

//scroller's pause 
var spause=2000;

//scroller's background
var sbcolor="#FFFFFF";

//messages: set your own; use as many as you'd like; set up Hyperlinks to
//URLs as you normally do: <a target=... href="... URL ...">..message..</a>;
var singletext=new Array();
singletext[0]="Avec ses quelque 26.000 habitants Yverdon-les-Bains est une ville ouverte et accueillante au centre de la Suisse romande sise au cœur d/'une vaste région allant des sommets du Jura au littoral du Lac de Neuchâtel.";
singletext[1]="<b>Thermalisme et Culture</b><br>Les activités touristiques sont caractérisées par le thermalisme, avec le Centre thermal, et par le centre historique de la ville, avec son Château savoyard qui accueille le Musée d’Yverdon et Région qui présente 6000 ans d'histoire yverdonnoise ininterrompue, le Musée Pestalozzi et Musée de la Mode. La Maison d’Ailleurs, musée de la science-fiction  accueillera, en plus de ses expositions et dès octobre 2008, une splendide collection « Jules Vernes ». Pour les amateurs d’art, la Galerie de l’Hôtel de Ville ne pourra que surprendre le visiteur par la qualité et la diversité de son programme d’exposition.";
singletext[2]="En matière de spectacles, la richesse des programmes saisonniers des Théâtres Benno Besson et de l’Echandole connaissent un véritable succès. Le Théâtre Elisabéthain, implanté dans la zone des Rives du Lac complète cette offre.";
singletext[3]="<b>Cadre de Vie</b><br>Les rives du lac constituent également un atout touristique remarquable. Yverdon-les-Bains a su conserver de nombreux espaces verts qui ont permis la réalisation d'une infrastructure de détente très complète. Le nouveau Parc des Rives du Lac en est le dernier né. La présence du Centre Pro Natura à Champ-Pittet et de la Grande-Cariçaie, la plus grande réserve naturelle de Suisse, draine dans la commune de nombreux visiteurs.";
singletext[4]="<b>Economie – Formation - Technologie</b><br>Yverdon-les-Bains est une cité en pleine expansion qui recouvre une grande diversité d’activités. Elle offre de nombreuses possibilités pour les entreprises qui cherchent une implantation en Suisse romande, dans un carrefour stratégique. Le développement du parc technologique Y-Parc, en synergie avec la présence de la plus grande Ecole Hesso de Suisse occidentale est un atout considérable.";
//singletext[...]='...';
//-- end Parameters and message -->

//-- begin: Scroller's Algorithm -->
var ii=0;
function goup(){if(sspeed!=rspeed*16){sspeed=sspeed*2;restart=sspeed;}}

function startScrolling(){
if(document.getElementById){ns6div=document.getElementById('iens6div');ns6div.style.top=sheight+"px";ns6div.innerHTML=singletext[0];sizeup=ns6div.offsetHeight;ns6scroll();}
else 
if(document.layers){ns4layer=document.ns4div.document.ns4div1;ns4layer.top=sheight;ns4layer.document.write(singletext[0]);ns4layer.document.close();sizeup=ns4layer.document.height;ns4scroll();}
else 
if(document.all){iediv=iens6div;iediv.style.pixelTop=sheight+"px";iediv.innerHTML=singletext[0];sizeup=iediv.offsetHeight;iescroll();}}
function iescroll(){if(iediv.style.pixelTop>0&&iediv.style.pixelTop<=sspeed){iediv.style.pixelTop=0;setTimeout("iescroll()",spause);}else 
if(iediv.style.pixelTop>=sizeup*-1){iediv.style.pixelTop-=sspeed+"px";setTimeout("iescroll()",100);}else{if(ii==singletext.length-1)ii=0;else ii++;iediv.style.pixelTop=sheight+"px";iediv.innerHTML=singletext[ii];sizeup=iediv.offsetHeight;iescroll();}}
function ns4scroll(){if(ns4layer.top>0&&ns4layer.top<=sspeed){ns4layer.top=0;setTimeout("ns4scroll()",spause);}else 
if(ns4layer.top>=sizeup*-1){ns4layer.top-=sspeed;setTimeout("ns4scroll()",100);}else{if(ii==singletext.length-1)ii=0;else ii++;ns4layer.top=sheight;ns4layer.document.write(singletext[ii]);ns4layer.document.close();sizeup=ns4layer.document.height;ns4scroll();}}
function ns6scroll(){if(parseInt(ns6div.style.top)>0&&parseInt(ns6div.style.top)<=sspeed){ns6div.style.top=0;setTimeout("ns6scroll()",spause);}else 
if(parseInt(ns6div.style.top)>=sizeup*-1){ns6div.style.top=parseInt(ns6div.style.top)-sspeed+"px";setTimeout("ns6scroll()",100);}
else{if(ii==singletext.length-1)ii=0;else ii++;
ns6div.style.top=sheight+"px";ns6div.innerHTML=singletext[ii];sizeup=ns6div.offsetHeight;ns6scroll();}}
//-- end Algorithm -->

