function plugNS(){
var b=1
var o=0
var p=new Array(
"Shockwave Flash","Shockwave for Director","RealPlayer","QuickTime","VivoActive","LiveAudio","VRML","Dynamic HTML Binding","Windows Media Services")
var np=navigator.plugins
for(var x=0;x<p.length;x++){
for(var i=0;i<np.length;i++){
if(np[i].name.indexOf(p[x])>=0) {
o|=b
}
}
b*=2
}
return o
}
function plugIE(){
var o=0
var b=1
var p=new Array(
"D27CDB6E-AE6D-11CF-96B8-444553540000","2A202491-F00D-11CF-87CC-0020AFEECF20","23064720-C4F8-11D1-994D-00C04F98BBC9","","","","90A7533D-88FE-11D0-9DBE-0000C0411FC3","9381D8F2-0288-11D0-9501-00AA00B911A5","22D6F312-B0F6-11D0-94AB-0080C74C7E95")
document.write('<HTML xmlns:MSIE><style>@media all{MSIE\\:clientCaps {behavior:url(#default#clientcaps);}}</style><MSIE:CLIENTCAPS ID="basicCC" />')
for(var i=0;i<p.length;i++){
if(p[i])
if(basicCC.isComponentInstalled("{"+p[i]+"}","ComponentID"))
o|=b
b*=2
}
return o
}
function printMenu(current)

{ 
	var linkl=new Array ('index.php','archive.php','stats.php','links.php','copyright.php');
	var lnl= new Array('latest','archive','stats','links','©');
	tel=0;
	
	if (current!="^") {domain=""; }else {domain="http://www.koert.com/home/";} // hack to get good url
	document.write ('<p align=right class="smallnav"> '); 
	while (tel<(linkl.length))
	{
		if (tel>0) {	document.write( ' |  ');}
 		if (lnl[tel]!=current)
		{	
			document.write('<a class="smallnav" href="'+domain+linkl[tel]+'">'+lnl[tel]+'</a>');
		}
		else
		{
			document.write(current+' &gt;&gt;&gt;');	
		}
		tel++;
	}
  
  document.write ('<br> '); 
}

function frameMe()
{
if ((top==self)&&!(document.layers && (self.innerHeight == 0 && self.innerWidth == 0))) //on top and not printing
	{
	top.location.replace('index.html?'+window.location.pathname);
	}
}
function mensinit()
{
	document.write('<div id="mensinit" style="position:absolute; width:20px; height:115px; z-index:2; left: 160px; top: -120px"> ');
 
	nedstatbasic("ACmjLwUtpF+Yx6jbS7fmJGM2A5tQ", 0); 	 
    
	document.write('</div>');
	}


function snoutinit()
{
	document.write('<div id="snoutinit" style="position:absolute; width:20px; height:115px; z-index:2; left: -160px; top: 220px"> ');
	nedstatbasic("AAxV2AgTEmCf2EkCvU0e7mDaAj1g", 1);
	document.write('</div>');
	}
	
function koertinit1()
{
	document.write('<div id="koertinit" style="position:absolute; width:20px; height:115px; z-index:2; left:   -160px; top: 220px"> ');
	countr('1106774514'); 
	 nedstatbasic("AAuGyAWBj00hZ4tmfMVRyX+cyHXg", 1);
	 
	document.write('</div>');
}

function koertinit()
{
	document.write('<div id="koertinit" style="position:absolute; width:20px; height:115px; z-index:2; left:   -160px; top: 220px"> ');
	countr('1106774514'); 
		 nedstatbasic("AAuGyAWBj00hZ4tmfMVRyX+cyHXg", 0);
  

	document.write('</div>');
}	

// statisic counter van stimulisresponse
function countr(id) {
var trg = document.getElementById('koertinit');
var s=screen;var w=s.width;var h=s.height;var c=s.colorDepth;var d;
d = "?id=" + escape(id);
d = d + "&c=" +escape(c);
d = d + "&w=" +escape(w);
d = d + "&h=" +escape(h);
d = d + "&refererHost=" +escape(top.document.referrer);
d = d + "&entry=" +escape(top.document.location);
d = d + "&currentPage=" +escape(document.location);
var s = '<a href=http://c.stimulusresponse.org?user='+id+' target=_blank><img src=http://c.stimulusresponse.org/init.php'+d+' border="0" nosave width="20" height="20" alt="stimulusresponse site statistics" nosave></a>';
trg.innerHTML = s;
}

// poll functions
var votedx=0;
 function writePoll(newvoted){votedx=newvoted;} ;
 var didvote13=false; function ViewPoll(pollID,name,width,height){var URL='http://www.koert.com/polls/poll.cgi?L1,'+pollID; document.location=URL;}
 function SubmitPoll(pollID,name,width,height)
  {if (votedx!=0){if (didvote13==true) {alert ("You can only vote once!");}
  
 var URL='http://www.koert.com/polls/poll.cgi?E1,'+pollID+','+votedx;
 didvote13=true;
 name = window.open(URL, name,"resizable=yes,toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=no,copyhistory=0,width="+width+",height="+height);
	
 }else{alert ("Select your CHOICE before you vote.");}return true;}
//end poll 
	 
function nedstatbasic(id,redirect) {
var n=navigator
var ver=n.appVersion
var name=n.appName
var d=document
var verIE=parseInt(ver.substring(ver.indexOf("MSIE")+5,ver.indexOf("MSIE")+6))
if(verIE>0)
ver=verIE
else
ver=parseInt(ver)
var u="http://m1.nedstatbasic.net/n?id="+id
var r
if(redirect)
r=d.referrer
else
r=parent.document.referrer
if(r&&(r!=d.location))
u+="&r="+escape(r)
if((name=="Netscape"&&ver>=3))
u+="&p="+plugNS()
if(verIE>=5&&n.appVersion.indexOf('Win')>=0&&n.userAgent.indexOf('Opera')<0)
u+="&p="+plugIE()
if(ver>=4){
var s=screen
var w=s.width
var c=s.colorDepth
if(w)
u+="&w="+w
if(c)
u+="&c="+c
}
d.write(' <img src="'+u+'" border=0 width=18 height=1> ')
//d.write('<a target=_blank href="http://v1.nedstatbasic.net/stats?'+id+'"><img src="'+u+'" border=0 width=18 height=18></a>')

}

