<!--inizio script shockwave text-->
/*
Shock Wave Text script- By ejl@worldmailer.com
Submitted to and featured on Dynamic Drive (www.dynamicdrive.com)
For full source code, usage terms, and 100's more DHTML scripts, visit http://dynamicdrive.com
*/

var size = 16;
var speed_between_messages = 1800  //in miliseconds

var tekst = new Array()
{
tekst[0] = "Yet Another Site From Potassa Hill :)";
tekst[1] = "Sito sviluppato nel 2001...";
tekst[2] = "... da Massimiliano Paino...";
tekst[3] = "... per LA PAGODA Arredamenti!";
tekst[4] = "Ringraziamenti & Crediti:";
tekst[5] = "Patrizia per la pazienza,";
tekst[6] = "Stefano per il businness,";
tekst[7] = "www.dynamicdrive.com per il supporto JavaScript,";
tekst[7] = "Paul Lutus per Arachnophilia 4.0,";
tekst[8] = "Code Generation per Web Scripter Pro 4.0.0.";
}
var klaar = 0;
var s = 0;
var veran =0;
var tel = 0;

function bereken(i,Lengte)	{
	return (size*Math.abs( Math.sin(i/(Lengte/3.14))) );
							}

function motor(p)	{
var output = "";
for(w = 0;w < tekst[s].length - klaar+1; w++)	{
		q = bereken(w/2 + p,16);
		if (q > size - 0.5){klaar++;}
		if (q < 5)	{
			tel++;
			if (tel > 1)	{
				tel = 0;
				if (veran == 1)	{
				veran = 0;
				s++;
				if ( s == tekst.length){s = 0;}
				p = 0;
				if (window.loop){clearInterval(loop)}
				loop = motor();
								}
							}
					}
		output += "<font color='#0000ee' align='center' style='font-size: "+ q +"pt'>" +tekst[s].substring(w,w+1)+ "</font>";
												}
for(k=w;k<klaar+w;k++)	{ 
	output += "<font color='#0000ee' align='center' style='font-size: " + size + "pt'>" +tekst[s].substring(k,k+1)+ "</font>";
						}
idee.innerHTML = output;	
}

function startmotor(p){
	if (!document.all)
		return
	var loop = motor(p); 
	if (window.time){clearInterval(time)}
	if (klaar == tekst[s].length)	{
		klaar = 0;
		veran = 1;
		tel = 0;
		var time = setTimeout("startmotor(" +(p+1) + ")", speed_between_messages);
									}
	else	{	
		var time =setTimeout("startmotor(" +(p+1) + ")", 50);
			}
						}
