/* =============================================================================


   Walz & Klein Innovative Softwareentwicklung

   Freiburg

   Januar 2000

============================================================================= */
var AMsg=new Array ();
// ------------------------------------------------------------
// Statuszeilen Texte
// ------------------------------------------------------------		
AMsg[0]="CD-Master CD-Kopierstationen Standalone auch ohne PC auf Knopfdruck kopieren. Auch mehrere Kopien gleichzeitig möglich !";
AMsg[1]="Gleich passend dazu: CD-Drucker. Professionelle Farbdrucke direkt auf CD ohne Papierlabels";
AMsg[2]="Extreme Preissenkungen bei Speichererweiterungen. Unbedingt anrufen !";
AMsg[3]="300 Seiten Upgradekatalog (nur für Händler!). Sie können den Katalog gleich online bestellen";

var Speed=30;
var MsgTextAnz=3;


// =====================================================================
// Variablen	
// =====================================================================
var AMsgL=new Array ();
var AMsgLen=new Array ();
var MsgTextPos;
var MsgTextNo;
var i,j,k;
var leerzeichen;

// ------------------------------------------------------------
// Dem Text werden Leerzeichen vorangestellt
// ------------------------------------------------------------		
	leerzeichen=" "
	for (b=75; b>=0; b--)	
	   {	     
	     leerzeichen=leerzeichen+" ";	
	   }
	
	for (i = 0; i <= MsgTextAnz; i++) 
	{
		AMsgL[i]=leerzeichen+AMsg[i];		  	
		AMsgLen[i]=AMsgL[i].length; 		  			  						
	}	
	// INIT Position
	MsgTextPos=0;
	// Alle beginnen beim ersten text
	MsgTextNo=0;

/* =============================================================================Januar 2000

   LSStatuszeile

   Aktualisiert die Statuszeile

============================================================================= */
function LSStatuszeile()
{
}
function LSSaatatuszeile()


{
	// --------------------------------------------------------------
   	// Bestimme die aktuelle Position
	// --------------------------------------------------------------	
	MsgTextPos=MsgTextPos+1;	
	// --------------------------------------------------------------
   	// Nächster text ?
   	// Muß eine weitere die Nachricht verwendet werden ? oder ist der String zB nur zur Hälfte angezeigt
	// --------------------------------------------------------------       	
	if (MsgTextPos>=AMsgLen[MsgTextNo])
		{	
		//Beginnen von vorn
     		MsgTextPos=0;
     		// weiteren Text verwenden ?
     		if (MsgTextNo < MsgTextAnz)
     			{
     			MsgTextNo =MsgTextNo + 1;
     			}
     		else
     			{
     			MsgTextNo =0;
     			}
     	}

      	// --------------------------------------------------------------
   	// Bestimme die aktuelle Zeichenkette
	// --------------------------------------------------------------   

	// Text
       	i=AMsgL[MsgTextNo];       	       	
       	// Länge
       	k=AMsgLen[MsgTextNo];  
       	// Berechnen
      	message_ausgabe=i.substring(MsgTextPos,k); 
      	       
      	 // Der Text wird in dem Formular ausgegeben

	
     	
     	x = "\r MsgTextNo\t" + MsgTextNo;
     	x = x + "\r AMsg\t" + AMsg[MsgTextNo];	
     	x = x + "\r AMsgL\t" + AMsgL[MsgTextNo];	
     	x = x + "\r AMsgLen\t" + AMsgLen[MsgTextNo];	
 
      	window.status=message_ausgabe;

   	window.setTimeout ('LSStatuszeile()', 100);
      
}