// Author: peter baaij / 0901 x-oc.com
// X-oc javaScript library • ©® X-oc 
// Version: 2.1 || do not use in 1.1 versions || W3C dom compliant
// Implemented: schoten.be, july-2002 || Author: Peter Baaij • mepris@dsdelft.nl

// GLOBAL VARIABLES DEFAULT
// NOTE: Global vars associated with functions are declared right above these functions (see below)
var xBV="no"; var xWV=0; var xTV = 100; var xHeight = 500 ; var xWidth = 800;


// x1A: BROWSER FILTER
function x1A(a){
	var brow = navigator.appName.toLowerCase(); var vers = parseInt(navigator.appVersion);
	if(brow.indexOf("micros") != -1){xBV = (vers < 4) ?  "no" : "ie";}
	else if(brow.indexOf("netsc") != -1){xBV = (vers < 4) ? "no" : "nn";}

	if((xBV=="ie" && vers>4) || (xBV=="nn" && vers>4)){xBV="w3";}
	if (xBV=="no"){
		var txt1="Wasn\'t aible to figure out your browser flavour...\nGoing to use "; var txt2="";
	        if(document.layers) {xBV="nn"; txt2="Netscape 4 compliant...";}
	        if(document.all) {xBV="ie"; txt2="Explorer 4 compliant...";}
	        if(document.getElementById) {xBV="w3"; txt2="W3C Dom compliant...";}
	}

	if(xBV == "no"){document.location = "help.html";}
	else if(a != ""){document.location = a;}
return
}

// x2A: PRELOAD AND MONITOR
var x2n = 0; var x2pbc = 0; var x2pIA = new Array(); var x2lIA = new Array();
// default
var x2dl = "main.html"; var x2oi = 1;
var x2p1 = "img/xpl1.gif"; var x2p2 = "img/xpl2.gif"; var x2pH = 8; var x2pW = 2; 
var x2tn = "yes"; var x2ptEsc = "no"; 
var x2pt1a = "<DIV CLASS='HH1'>One moment please...<BR>Fetching"; var x2pt1b= "images..."; var x2pt2 = "</DIV>";
function x2A(){
	if(x2oi == 1){if(screen.width < xWidth+10 || screen.height < xHeight+55){x2oi=2;}}
	x2n = xocImages.length;
	document.write(x2pt1a);
	if(x2tn == "yes"){document.write(' ' + x2n + ' ' + x2pt1b);}
	document.write('<BR><BR><TABLE BORDER=0><TR>\n');
	for(i=0; i<x2n; i++){document.write('<TD HEIGHT=' + x2pH + ' WIDTH=' + x2pW + ' ALIGN="center" VALIGN="middle"><IMG SRC=\"' + x2p1 + '\" BORDER=0 HEIGHT=' + x2pH + ' WIDTH=' + x2pW + '></TD>\n');}
	document.write('</TR></TABLE><BR>');
	if(x2ptEsc == "yes"){document.write('<BR><BR><A HREF="javascript://" onClick="x3A(x2oi,x2dl); return false"><B>' + x2pt2 + '</B></A>');}
	document.write('<BR></CENTER></BODY></HTML>\n');
	x2Aad1();
}
function x2Aad1(){
	for(i=0; i<x2n; i++){x2pIA[i] = new Image(); x2pIA[i].src = xocImages[i]; x2lIA[i] = false;}
	x2Aad2();
}
function x2Aad2(){
	if(x2pbc == x2n){x3A(x2oi,x2dl); return true}
	for(i=0; i<x2n; i++){
		if(x2lIA[i] == false && x2pIA[i].complete){
			x2lIA[i] = true; document.images[x2pbc].src = x2p2; x2pbc += 1;
		}
	}
	timer2 = setTimeout("x2Aad2()",xTV);
}

// x3A: NEW LOCATION - MAIN AFTER PRELOAD
function x3A(some,locat){
	var ran=Math.floor(10000*Math.random());
	var rand="win"+ran;
	if(some == 1){open(locat, rand, "resizable=no,status=no,toolbar=no,menubar=no,scrollbars=no,width="+screen.width+",height="+screen.height+",top=0,left=0");}
	else if(some == 2){open(locat, rand, "resizable=no,status=no,toolbar=no,menubar=no,scrollbars=yes,width="+screen.width+",height="+screen.height+",top=0,left=0");}
	else if(some == 3){open(locat, rand, "resizable=yes,status=no,toolbar=no,menubar=no,scrollbars=yes,width=600,height=400,top=20,left=20");}
	else if(some == 4){open(locat, rand, "resizable=yes,status=no,toolbar=no,menubar=no,scrollbars=yes,width=400,height=300,top=20,left=20");}
	else if(some == 5){open(locat, rand, "resizable=yes,status=yes,directories=yes,location=yes,toolbar=yes,menubar=yes,scrollbars=yes,width=600,height=400,top=20,left=20");}
	else if(some == 6){open(locat, rand, "resizable=yes,status=no,directories=no,location=no,toolbar=no,menubar=no,scrollbars=yes,width=300,height=200,top=20,left=20");}
	else{document.location = locat;}
return true
}

// x4A: HIDE / SHOW LAYER - SWITCH
function x4A(name){
	if(xBV == "nn"){document.layers[name].visibility = (document.layers[name].visibility == 'show') ? 'hide' : 'show';}
	else if(xBV == "ie"){document.all[name].style.visibility = (document.all[name].style.visibility == 'visible') ? 'hidden' : 'visible';}

	else if(xBV == "w3"){document.getElementById(name).style.visibility = (document.getElementById(name).style.visibility == 'visible') ? 'hidden' : 'visible';}


return true
}
// x4B: SHOW LAYER 
function x4B(name){
	if(xBV == "nn"){document.layers[name].visibility = 'show';}
	else if(xBV == "ie"){document.all[name].style.visibility = 'visible';}

	else if(xBV == "w3"){document.getElementById(name).style.visibility = 'visible';}

return true
}
// x4C: HIDE LAYER
function x4C(name){
	if(xBV == "nn"){document.layers[name].visibility = 'hide';}
	else if(xBV == "ie"){document.all[name].style.visibility = 'hidden';}

	else if(xBV == "w3"){document.getElementById(name).style.visibility = 'hidden';}

return true
}

// x5A: SWITCH POSITION LAYER RELATIVE
function x5A(dname,xMove,yMove){

	if(xBV == "nn"){document.layers[dname].left += xMove; document.layers[dname].top += yMove;}
	else if(xBV == "ie"){document.all[dname].style.posLeft += xMove; document.all[dname].style.posTop += yMove;}

	else if(xBV == "w3"){document.getElementById(dname).style.left = parseInt(document.getElementById(dname).style.left) + xMove + "px"; document.getElementById(dname).style.top = parseInt(document.getElementById(dname).style.top) + yMove + "px";}

return true
}
// x5B: SWITCH POSITION LAYER ABSOLUTE FROM INIT
function x5B(name,x,y){
	xWso = Math.floor((screen.width - xWidth)/2);
	if(xBV == "nn"){document.layers[name].left = x + xWso; document.layers[name].top = y;}
	else if(xBV == "ie"){document.all[name].style.posLeft = x + xWso; document.all[name].style.posTop = y;}

	else if(xBV == "w3"){document.getElementById(name).style.posLeft = x + xWso; document.getElementById(name).style.posTop = y;}

return true
}

// x6A: MOVING LAYER
var countSteps=0; var lname = ""; var steps = 0; var tstep = 0; var hor = 0; var ver = 0; var movecon = 0;
function x6A(a,b,c,d,e){
	lname = a; steps = b; tstep = c; hor = d; ver = e; countSteps = 0;
	x6Aad1();
return true
}
function x6Aad1(){
	if(countSteps == (steps)){
		xocPlay(0);
	}
	else{
		countSteps += 1;
		x5A(lname,hor,ver);
		timer6 = setTimeout("x6Aad1()",tstep);
	}
return true
}

// x7A: PRELOADING & LOADING HTML-DOCUMENT
var x7Aln = ""; var x7Adl = "";
function x7A(){
	x4A("xocPreload");
	if(xBV == "nn"){
		document.layers["xocBufLayer"].src = x7Adl + ".html";
		document.layers["xocBufLayer"].onload = 
		function x7Aad1(evt){
		document.layers[x7Aln].src = x7Adl + ".html"; x4A("xocPreload"); x4A(x7Aln); xocPlay(0);};
	}
	else if(xBV == "ie"){
//alert("x7Aie");
		document.frames["xocBufIframe"].document.body.innerHTML = "";
		document.frames["xocBufIframe"].document.location = x7Adl + ".html";
		x7Aad2();
	}
	else if(xBV == "w3"){
		window.frames["xocBufIframe"].document.getElementsByTagName("body").item(0).innerHTML="";
		document.getElementById("xocBufIframe").src = x7Adl + ".html";
		x7Aad3();
	}
return
}

function x7Aad2(){
	if(document.frames["xocBufIframe"].document.body.innerHTML.indexOf("endXocPoint") != -1){	
	document.all[x7Aln].innerHTML=document.frames["xocBufIframe"].document.body.innerHTML;
		x4A("xocPreload"); x4A(x7Aln); xocPlay(0);
	}
	else{timer7 = setTimeout("x7Aad2()",xTV);}
}


function x7Aad3(){
	if(window.frames["xocBufIframe"].document.getElementsByTagName("body").item(0).innerHTML.indexOf("XocPoint") != -1){	
	document.getElementById(x7Aln).innerHTML=window.frames["xocBufIframe"].document.getElementsByTagName("body").item(0).innerHTML;
		x4A("xocPreload"); x4A(x7Aln); xocPlay(0);
	}
	else{timer8 = setTimeout("x7Aad3()",xTV);}
}

// x8A: PRELOADING IMAGE
var x8Aib = "";
function x8A(){
	x4A("xocPreload");
	x8A_preImg = new Image();
	x8A_preImg.src = x8Aib;
	x8Aad1();
}
function x8Aad1(){
	if(x8A_preImg.complete){x4A("xocPreload"); xocPlay(0);}
	else{timer8 = setTimeout("x8Aad1()",xTV);}
}

// x9A: SET AND CENTER BLOCKS
function x9A(){
	xWso = Math.floor((screen.width - xWidth)/2);
	for(i=0; i<xBL; i++){
		buf = "bl" + i;
		x5A(buf,xWso,0);
	}
	x5A("xocPreload",xWso,0);
	xocPlay(0);
return true
}

// x10A: WAIT
function x10A(x){timer10 = setTimeout("x10Aad1()",x);}
function x10Aad1(){xocPlay(0);}

// x11A: FAKE-SCROLL
function x11A(a,b){
	x5A(a,0,b);
}
// x11B: SCROLL - MOVE AND CLIP
var x11Bln=""; var x11Bmethod=""; var x11BclipT=0; var x11BclipH=0; var x11BclipQ=0; var x11BclipJ=120; var x11BclipM=7; var x11Bmove=0; x11Bblock='no'; x11Bmarge=10;
function x11B(){
	bf = new Array();
	clipIEarray = new Array();
	if(x11Bmethod=="jumpup") x11Bmove=x11BclipJ*(-1);
	else if(x11Bmethod=="jumpdown") x11Bmove=x11BclipJ;
	else if(x11Bmethod=="scrollup") x11Bmove=x11BclipM*(-1);
	else if(x11Bmethod=="scrolldown") x11Bmove=x11BclipM;
	else if(x11Bmethod!="reset") alert("Error in x11B - 2nd arg not right");

	if(xBV == "nn"){
		x11BclipH = document.layers[x11Bln].clip.height;
		x11BclipQ = document.layers[x11Bln].clip.top;
		x11BclipT = document.layers[x11Bln].document.height;
	}
	else if(xBV=="ie"){
		var clipIE = document.all[x11Bln].style.clip;
		for(i=5; i<clipIE.length-3; i++) bf[i-5]=clipIE.charAt(i);
		bf = bf.join(""); clipIEarray = bf.split("px ");
		x11BclipH = parseInt(clipIEarray[2]) - parseInt(clipIEarray[0]);
		x11BclipQ = parseInt(clipIEarray[0]);
		x11BclipT = document.all[x11Bln].offsetHeight;
	}

	else if(xBV=="w3"){
		var clipIE = document.getElementById(x11Bln).style.clip;
		var clipIEarray = clipIE.split("rect(")[1].split(" ");
		for (var i=0;i<clipIEarray.length;i++){
			clipIEarray[i] = parseInt(clipIEarray[i]);
		}
		x11BclipH = clipIEarray[2] - clipIEarray[0];
		x11BclipQ = clipIEarray[0];
		x11BclipT = document.getElementById(x11Bln).offsetHeight;
	}

	if(x11Bmethod=="jumpup" && (x11BclipQ+x11Bmove)<0){x11Bmethod="reset";}
	if(x11Bmethod=="reset"){
		if(xBV=="nn"){document.layers[x11Bln].clip.top = 0; document.layers[x11Bln].clip.bottom = x11BclipH;}
		else if(xBV == "ie"){document.all[x11Bln].style.clip = "rect("+0+","+parseInt(clipIEarray[1])+"," +x11BclipH+ "," + parseInt(clipIEarray[3])+")";}

		else if(xBV == "w3"){document.getElementById(x11Bln).style.clip = "rect("+0+","+parseInt(clipIEarray[1])+"," +x11BclipH+ "," + parseInt(clipIEarray[3])+")";}


		x11Bblock=="yes"; x5A(x11Bln,0,x11BclipQ);
	}
	else if((x11BclipQ+x11Bmove+x11BclipH-x11Bmarge)>x11BclipT || x11BclipQ+x11Bmove<0){x11Bblock="yes"; return false}
	else{
		if(xBV=="nn"){document.layers[x11Bln].clip.top = x11BclipQ+x11Bmove; document.layers[x11Bln].clip.bottom = x11BclipQ+x11Bmove+x11BclipH;}
		else if(xBV == "ie"){var ie1=x11BclipQ+x11Bmove; var ie2=x11BclipQ+x11BclipH+x11Bmove; document.all[x11Bln].style.clip = "rect("+ie1+","+parseInt(clipIEarray[1])+"," +ie2+ "," + parseInt(clipIEarray[3])+")";}

		else if(xBV == "w3"){
var ie1=x11BclipQ+x11Bmove; var ie2=x11BclipQ+x11BclipH+x11Bmove; document.getElementById(x11Bln).style.clip = "rect("+ie1+","+parseInt(clipIEarray[1])+"," +ie2+ "," + parseInt(clipIEarray[3])+")";}

		x5A(x11Bln,0,x11Bmove*(-1));
	}
	if((x11Bmethod=="scrollup" || x11Bmethod=="scrolldown") && x11Bblock=="no") setTimeout("x11B()",xTV);
	return
}

// x12A: CHANGE IMG SRC
function x12A(blckn,imgn,nwsrc){
	if(xBV == "nn"){document.layers[blckn].document.images[imgn].src = nwsrc;}
	else if(xBV == "ie"){document.all[imgn].src = nwsrc;}
	else if(xBV == "w3"){document.images[imgn].src = nwsrc;}
return true
}