javascript:
   var Wtg =new Array("So. ","Mo. ","Di. ","Mi. ","Do. ","Fr. ","Sa. ");
   var street_flg = true;	//Sa -> true=1, Fr -> false=0;

   var Jetzt = new Date();
   var datum = new Date();
   var veranst="";
   var lauftxt="";
   var txt="";
   var Tag = Jetzt.getDate();
   var Monat = Jetzt.getMonth() + 1;
   var Jahr = Jetzt.getYear();
/*
Tag=2
Monat=06
Jahr=2009
*/
   if (Jahr < 999)
    Jahr += 1900;
   var Jahr4=Jahr
    Jahr -= 2000;

  var Vortag = ((Tag < 10) ? "0" : "");
  var Vormon = ((Monat < 10) ? "0" : "");
  var Vorjahr = ((Jahr < 10) ? "0" : "");
  var AktDatum = Vortag + Tag + "." + Vormon + Monat + "." + Jahr4;
  var suchdat= Vorjahr + Jahr + "." + Vormon + Monat + "." +  Vortag + Tag
  var link_flg=2;			//Monat=0, 1. Veranst=1, jede Veranst=2

//Shuffle Laufschrift ab 1.5.
	var shuffle="" ;
	if ((Monat > 4) && (Monat < 8)){
	// Datum vom 1. Samstag im Juli des aktuellen Jahres berechnen
		var sh=((6 + 7 - wochentg("01.07." + Jahr)) % 7 ) + 1 ;
		if ((Monat==7) && (Tag > sh)) {
			//nach der Shuffle
		}
		else {
			shuffle="<h2><span class='tim'><a href='./veranst/riverboat/river_"+ Jahr4 + ".html'><marquee align='middle' scrolldelay='25' scrollamount='3'><span class='blue'>Hier das Programm der River-Boat-Shuffle am Samstag, den " + sh + ". Juli " + Jahr4 + "</span></marquee></a> </span></h2>\n";
		}
	}
//Streetlife Laufschrift ab 1.6.
	var street="" ;
	if ((Monat > 5) && (Monat < 9)){
	// Datum vom 1. Samstag (street_flag=true) oder 1. Freitag (street_flag=false) im August des aktuellen Jahres berechnen
		var st_a=((5 + street_flg + 7 - wochentg("01.08." + Jahr)) % 7 ) + 1 ;
		st_a-=street_flg;
		var st_e=st_a + 2;
		st_a==0 ? st_a="31. Juli" : st_a=st_a + ".";
		if ((Monat==8) && (Tag > st_e)) {
			//nach Streetlife
		}
		else {
			street="<h2><span class='tim'><a href='./veranst/street_life/street_life_"+ Jahr4 + ".html'><marquee align='middle' scrolldelay='25' scrollamount='3'><span class='maroon'>Beachten Sie das Programm von Streetlife " + Jahr4 + " vom " + st_a + " bis " + st_e + ". August</span></marquee></a> </span></h2>\n";
		}
	}

	var nr = -1 ;
	var laenge=gr.length;

if(laenge > 1) {

// nächste Veranstaltung suchen
   for(var j = 0; j < laenge; j++) {
   	var dat = gr[j][1];
	var ergdat = dat.slice(6) + dat.slice(2,6)+ dat.slice(0,2);
	if (suchdat > ergdat){
		nr = j-1;
		j=laenge;
	}
   }

// nächsten 4 Veranstaltung heraussuchen und als Merqueeaufbereiten
	var tg = 0;
	var zusatz = "";
	var offset = 0;
	var off=0;
	var stdat=0;
	var vor1="<h2><span class='tim'>"
	var vor2="<marquee align='middle' scrolldelay='25' scrollamount='3'>Die nächsten Konzerte:";
	var href=""
	var href_vor="<a href='veranst/club/"
	var href_nach="</a>"
	var href_nach1=""
	link_flg>1 ? href_nach1="" : href_nach1=href_nach;

	for(j = nr; j > nr-4; j--){

	switch(gr[j-offset][2]) {

		case "rs":
		// Shuffle nur einmal ausgeben
		 	for(k=j-offset; k > 0; k--){
		 		if (gr[k][2]!="rs"){
		 			off=j-offset-k-1;
		 			k=0;
		 		}
		 	}
			gr[j-offset][0]="River-Boat-Shuffle";
			break;
		case "st":
		// Streetlife nur einmal ausgeben
		 	for(k=j-offset; k > 0; k--){
		 		if (gr[k][2]!="st"){
		 			off=j-offset-k-1;
		 			k=0;
		 		}
		 	}
		 	dat = gr[j-offset][1];
		 	ergdat = dat.slice(0,2);
		 	stdat=parseInt(ergdat)+2;
		 	ergdat = dat.slice(3,5);

			gr[j-offset][0]="bis So. " + stdat + ".8. Streetlife";
            break;
		case "bs":
			// Bluesclub special
			veranst = veranst +  gr[j-offset][0];
		 	for(k=j-offset-1; k > 0; k--){
		 		if (gr[k][2] =="bs"){
					veranst = veranst + ", " + gr[k][0];
		 			}
				else {
		 			off=j-offset-k-1;
		 			k=0;
					}
		 		}
			gr[j-offset][0]=veranst;
			break;
		}
		tg = wochentg(gr[j-offset][1]);
   		Tag = datum.getDate();
   		Monat = datum.getMonth() + 1;
   		zusatz = art(j-offset);
		txt_ver =  Wtg[tg] + Tag  + "." + Monat + "." + zusatz + ' ' + gr[j-offset][0] ;

		if (link_flg==2) {
			txt = txt + "&nbsp;&nbsp; " + href_vor + gr[j-offset][3] + "'> " +txt_ver + href_nach + ";" ;
		}
		else txt=txt + "&nbsp;&nbsp; " + txt_ver + ";" ;


//	Link für 1. Veranstaltung der Laufschrift berechnen
		if (j==nr) {

			if (link_flg==1) {
				href = href_vor + gr[j-offset][3] + "'>";
			}
			else if (link_flg==0) {
				var v1m = gr[j-offset][1].slice(3,5);
				if (v1m == "08") v1m="07";
				var v1j2 = gr[j-offset][1].slice(6);
				var v1j4 = "20"+ v1j2;
				href = href_vor + v1j4 + "/veranstaltungen_" + v1j2 + v1m + ".html'>";
			}
		}

	offset=offset+off
	off=0;
	if(j-offset<=0) j=nr-4;
	}

	txt = shuffle + street + vor1 + href + vor2 + txt;
   	txt=txt+"</marquee>"+href_nach+"</span></h2>";
}
	lauftxt=txt;

function wochentg(dattxt)
{
var dat = dattxt.split(".");
mon = dat[1].valueOf();
mon = mon - 1;
var jahr = dat[2].valueOf();
jahr = jahr -1+1;
if (jahr < 70) {jahr = jahr + 2000;} else {jahr = jahr +1900;}
datum.setDate(dat[0]);
datum.setMonth(mon);
datum.setYear(jahr);
tg=datum.getDay();
return(tg);
}

function art(nr)
{
var   ver=gr[nr][2];

	if ( ver.length < 3) {

		for (var n = 0; n <= ver_anz; n++) {
			if ( gr[nr][2] == veranstaltung[n][0] ) {
				veranst = veranstaltung[n][1];
				n=9999;
			}
		}

  	}

	switch (ver) {
    case "rs":
        veranst="";
        break;
    case "st":
        veranst="";
        break;
    case "mc":
        veranst1 = " " + veranst + " - ";
        veranst = veranst1;
        break;
	case "bc":
		veranst1 = " " + veranst + " Opener: ";
		veranst = veranst1;
    	break;
	case "bs":
    // Bluesclub special
        veranst= " " + veranst + " mit: ";
        break;
	case "ds":
    // Session
		veranst1 = " " + veranst + " - ";
		veranst = veranst1;
        break;
	default:
		veranst="";
	    break;
}

return(veranst);

}
