// berekening wereldbevolking; gebruik gemaakt van: http://www.optimumpopulation.org/

vandaag 	= new Date()
tijdzoneoffset	= vandaag.getTimezoneOffset() * 60 * 1000;
startdatumpop 	= new Date("February 1, 1999")
startpop 		= 5969893085;
toename 		= 2.3907717529;
populatienu	=	0;
populatienuplus20jaar	=	0;

function populatieteller() { 
	vandaag 	= new Date()
	nu				=	vandaag.getTime();
	populatienu	=	telwaarde(nu);
	toonpopulatie(populatienu,'populatievaknu');
	if(	populatienuplus20jaar==0	&&	ditisbevolkingspagina	){
		uur	=	3600*1000;
		dag	=	uur*24;
		mnd	=	dag*31;
		jaar=	dag*365;
		aanwaskomenduur	=	telwaarde(nu+uur)	-	populatienu;
		toonpopulatie(aanwaskomenduur,'vakuur');
		aanwaskomendedag	=	telwaarde(nu+dag)	-	populatienu;
		toonpopulatie(aanwaskomendedag,'vakdag');
		aanwaskomendemnd	=	telwaarde(nu+mnd)	-	populatienu;
		toonpopulatie(aanwaskomendemnd,'vakmaand');
		aanwaskomendjaar	=	telwaarde(nu+jaar)	-	populatienu;
		toonpopulatie(aanwaskomendjaar,'vakjaar');
		
		populatienuplus10jaar	=	telwaarde(nu+jaar*10)//	-	populatienu;
		toonpopulatie(populatienuplus10jaar,'vak10jaar');
		populatienuplus20jaar	=	telwaarde(nu+jaar*20)//	-	populatienu;
		toonpopulatie(populatienuplus20jaar,'vak20jaar');
0	}
	setTimeout('populatieteller()',500);
}

function telwaarde(meetmoment){
	tijdverschil 	= (( meetmoment + tijdzoneoffset ) - startdatumpop.getTime() ) / 1000;
	return Math.ceil(startpop + (tijdverschil * toename));
}

function toonpopulatie(grootte,vak){
	groottestr	=	grootte.toString();
	Lgroottestr	=	groottestr.length;
	Nvolledrietallen	=	Math.floor(Lgroottestr/3);
	Nvoorloopcijfers	=	Lgroottestr-Nvolledrietallen*3;
	Str	=	'';
	for(	i=0;	i<=Nvolledrietallen;	i++	){
		if(	i==0	&&	Nvoorloopcijfers>0	)	{
			Str	+=	groottestr.substr(0,Nvoorloopcijfers);
			if(	grootte>999	)Str	+='.';
		}
		if(	i>0	){
			Str	+=	groottestr.substr(Nvoorloopcijfers+(i-1)*3,3);
			if(	i<Nvolledrietallen	)Str	+=	'.';
		}
	}	
	if(	Str==''	)Str	=	'0';
	DID(vak).innerHTML	= Str;
}