window.start=starten();
var DB,MODE,AUTO,AUSWAHL,T_timer,D,PAGE,BUTTONS,CLOCK;

function d(url,titel,prog) {
	this.url=url;
	this.titel=titel;
	this.prog=prog;
}

function commandline() {
	var url=window.location.href,a=url.indexOf('?');
	if(a>0) {
		url=url.substring(a+1);
		while((a=url.indexOf('&'))>=0) url=url.substring(0,a)+";"+url.substring(a+1);
		eval(url+";");
		}
}

/*-----------------------------------*/
var RRND1,ARND1;

function random(n)	/* Zufallszahl in [0,n) */
	{  RRND1=Math.pow(RRND1+1.0*ARND1,8);
	   RRND1-=Math.floor(RRND1);
	   return Math.floor(n*RRND1);
	}
/*-----------------------------------*/
function starten() {
	D=new Date();
	RRND1=0.01*D.getMinutes()+0.1*D.getSeconds();
	ARND1=3.123456789;

	DB=new makedbase();
	MODE=0;
	AUTO=0;
	PAGE=true;
	BUTTONS=true;
	CLOCK=true;
	RESTZEIT=0;
	AUSWAHL=tagesnr(D)%DB.length;
	commandline();
}

function unterezeile() {
	var u=window.unten.document,r="<html>";
	r=r+"<body text=yellow bgcolor=black link=yellow vlink=yellow><form name=st>";
	r=r+"<table COLS=5 BORDER=0 WIDTH=100%><tr><td ALIGN=LEFT>";
	if(BEENDENTXT!="") r=r+"<a href="+BEENDEN+" target=_top>"+BEENDENTXT+"</a></td>";
	else r+="&nbsp;</td>";

	
	r=r+"<td align=left>";
	if(PAGE) r+="Seite <input type=text name=nr size=3 onchange=window.parent.nrchange()> von "+DB.length+"</td>";
	else r+="&nbsp;</td>";

	r=r+"<td align=center>";
	if(BUTTONS) r=r+"<a href=javascript:window.parent.nnext(-1)><img src="+LINKS+" border=0></a> <a href=javascript:window.parent.aut()><img src="+AUTOM+" border=0></a> <a href=javascript:window.parent.nnext(1)><img src="+RECHTS+" border=0></a></td>";
	else r=r+"<td>&nbsp;</td>";

	r=r+"<td align=right>";
	if(CLOCK) r=r+"Wechsel in <input type=text name=dt value='' size=3 onchange=window.parent.autochange()> s</td>";
	else r=r+"&nbsp;</td>";

	r=r+"<td ALIGN=RIGHT><font size=-1>&copy; <a href=mailto:tgebhardt@gmx.de>tgebhardt@gmx.de";
	r=r+"</a></font></td></tr></table></form></body></html>";
	u.open();
	u.write(r);
	u.close();
}

function ausfuellen() {
	if(MODE==0) {	/* Hinweis auf Tages-Datei */
		BUTTONS=false;
		CLOCK=false;
		PAGE=false;
		unterezeile();
		var t=DB[AUSWAHL].titel,l=DB[AUSWAHL].url;
		oben.location=DEFAULT+"?"+escape("TITEL='"+t+"'&LINK='"+l+"'");
		return;
		}
	if(MODE==1) {	/* Sprung zu Tages-Datei */
		window.location=DB[AUSWAHL].url;
		return;
		}

	if(MODE==2) { 	  /* Sprung zu random-Datei */
		AUSWAHL=random(DB.length);       /*random*/
		window.location=DB[AUSWAHL].url;  /*volle Anzeige */
		return;
		}

	if(MODE==3) {      /* Automatik  Start bei Tagesseite */
		unterezeile();
		next(0); 
		return;
		}

	if(MODE==4) {	  /* keine Auswahl, autom Ablauf Start bei 0*/
		unterezeile();
		AUSWAHL=0;
		if(AUTO<=0) AUTO=20;
		next(0);
		 }
}

function tagesnr(d) {
	var t=d.getDate(),m=d.getMonth(),j=d.getYear(),i=m-1;
	while(i>=0) {
		if(i==1) {t+=28; if(j%4==0) t++;}
		else if((i==3)||(i==5)||(i==8)||(i==103)) t+=30;
		else t+=31;
		i--;
		}
	return t;
	}


/*----------------------MODE=3, 4------------------------------------*/
function autochange() {
	AUTO=unten.document.st.dt.value;
	if(!(AUTO>=0) && !(AUTO<=0)) {
		AUTO=0;
		unten.document.st.dt.value="";
		}
	if(AUTO>0) {
		RESTZEIT=1*AUTO+1; 
		timer();
		}
}

function nrchange() {
	var n=unten.document.st.nr.value;
	if(!(n>=0) && !(n<=0)) {
		unten.document.st.nr.value=1*AUSWAHL+1;
		return;
		}
	AUSWAHL=n-1;
	nnext(0);
}

function nnext(i) {
	if(AUTO>0) {
		if(T_timer) clearTimeout(T_timer);
		if(MODE>=3) if(CLOCK) unten.document.st.dt.value="";
		AUTO=0;
		alert("automatisches Laden abgeschaltet");
		}
	next(i);
}


function timer() {
	if(T_timer) clearTimeout(T_timer);
	RESTZEIT--;
	if(CLOCK) unten.document.st.dt.value=RESTZEIT;
	if(RESTZEIT<=0) next(1);
	else T_timer=setTimeout("timer();",1000);
}

function next(i) {
	if((MODE>=3)&&(i!=0)) {
		eval(DB[AUSWAHL].prog+";");
		if(DB[AUSWAHL].prog!="") unterezeile();
		}
	AUSWAHL+=i;
	if(AUSWAHL<0) AUSWAHL=DB.length-1;
	if(AUSWAHL>=DB.length) AUSWAHL=0;
	oben.location=DB[AUSWAHL].url;
	if(MODE>=3) if(PAGE) unten.document.st.nr.value=(1*AUSWAHL+1);
	if(AUTO>0) { 
		if(MODE>=3) RESTZEIT=1*AUTO+1;
		timer();
		}
}

function aut() {
	clearTimeout(T_timer);
	if(AUTO<=0) { z=prompt("Automatisch neue Seite Laden nach .... Sekunden",20);
			if(!(z<=0) && !(z>=0)) z=0;
			AUTO=z;
			next(1);
			}
	else { 
		alert("Automatisches Laden\nnach "+AUTO+"s abgeschaltet !");
		AUTO=0;
		if(CLOCK) unten.document.st.dt.value="";
		}
}

