// All rights to this code including the HTML above are property of World Networking Group, 7380 N Indian Lake, Scotts Mi 49088 (269) 649.4949
// $5000.00 fine will be impose on anyone or company that uses this or any part of this code and/or HTML without further warning.
// If you use this code without written approval from World Networking Group then you agree to pay the $5000.00 within 7 days of World Networking Group contacting you.
//self.resizeTo(740,680)  // (740,355)
var t=""
var i=0;
var vRate=new Array()
var Pic=new Array()
var nPic=0
var tmp=""
var vPic=1;
var vP1="";
var vP2="";
var vP3="";
var vP4="";
var n=0;
var vShow=0;
var vDelay=5000
var vTimer=5000
var vCount=0;
var vMenuDefault="images/WWWT1.jpg"
var vFull=0;
var vMini=0;
var vBGColor="#E6E6E6"
tmp=S1.value
vTmp="";
var vTour=0;
var vR1="";

while (tmp.indexOf("\n")>-1){

	nPic=nPic+1
	
	Pic[nPic]=tmp.slice(0,tmp.indexOf("\n"))
	if (Pic[nPic].indexOf("|")==-1) {
		Pic[nPic]=Pic[nPic] + "|4|NR|"
	}
	vRate[nPic]=0
	tmp=tmp.slice(tmp.indexOf("\n")+1)
}
//alert(nPic)
dPages.innerText=nPic

function fStartTour() {
	if (vTour==0) {
		vCount=0
		vTour=1
		vMenuDefault="images/WWWTStopTour.jpg"
		iResume.src="images/0-W2W.jpg"		
		//iMenu.src=vMenuDefault
		fMenuBlank();
		dM1.style.background="#99CC00"
		dM1.style.color="Black"							
		fShow();
	} else {vTour=0
		vMenuDefault="images/WWWTResume.jpg"//"images/WWWT1.jpg"
		//iMenu.src=vMenuDefault;
		iResume.src="images/0-WResumeW.jpg"
		clearTimeout(t);
	}
}

function fPause() {
	//vMenuDefault="images/WWWTStartHL.jpg"
	//iMenu.src=vMenuDefault
	//iStart.src="images/0-W1SW.jpg"			
	//iResume.src="images/0-WResumeW.jpg"
	iResume.src="images/0-WResumeY.jpg"	
	//clearTimeout(t);
	//	fMenuBlank();	
		vTour=0
		vMenuDefault="images/WWWTResume.jpg"
		iStart.src="images/0-W1SW.jpg"		
		vMenuDefault="images/WWWTStartHL.jpg"		
		clearTimeout(t);;	
	
}

function fResume(){
	if (vTour==0) {
		vTour=1
		vMenuDefault="images/WWWTStopTour.jpg"
		//iMenu.src=vMenuDefault
		iStart.src="images/0-W1W.jpg"
		iResume.src="images/0-W2W.jpg"
		fMenuBlank();
		dM1.style.background="#99CC00"
		dM1.style.color="Black"			
		fShow();
	} else {
		iStart.src="images/0-W1SW.jpg"	
		iResume.src="images/0-WResumeW.jpg"		
		clearTimeout(t);		
		fMenuBlank();
		dM1.style.background="#99CC00"
		dM1.style.color="Black"					
		vTour=0	
	}
}

function fPrev(){
	//clearTimeout(t);
	//vMenuDefault="images/WWWTStartHL.jpg"
	//iMenu.src=vMenuDefault
	//vTour=0
	//iStart.src="images/0-W1SW.jpg"		
	
		//fMenuBlank();	
		vTour=0
		vMenuDefault="images/WWWTResume.jpg"
		iStart.src="images/0-W1SW.jpg"		
		vMenuDefault="images/WWWTStartHL.jpg"		
		clearTimeout(t);;	
	
		if (vPic>1) {
			vPic=vPic-1
		}else { vPic=nPic
		}
		vTmp=Pic[vPic]
		vP1=vTmp.slice(0,vTmp.indexOf("|"))
		vTmp=vTmp.slice(vTmp.indexOf("|")+1)
		vP2=vTmp.slice(0,vTmp.indexOf("|"))
		vTmp=vTmp.slice(vTmp.indexOf("|")+1)
		vP3=vTmp.slice(0,vTmp.indexOf("|"))
		vTmp=vTmp.slice(vTmp.indexOf("|")+1)
		dSite.innerText=vP1		
		dCaption.innerText=vP3		
		dCategory.innerText=vP4		
		dViewing.innerText=vPic				
		fMenuBlank();
		dM1.style.background="#99CC00"
		dM1.style.color="Black"							
		//fShow();		
		fGo();	
}

function fNext(){
	//vTour=0
	//iStart.src="images/0-W1SW.jpg"		
	//clearTimeout(t);	
	//vMenuDefault="images/WWWTStartHL.jpg"
	
		//fMenuBlank();	
		vTour=0
		vMenuDefault="images/WWWTResume.jpg"
		iStart.src="images/0-W1SW.jpg"		
		vMenuDefault="images/WWWTStartHL.jpg"		
		clearTimeout(t);;	
	//iMenu.src=vMenuDefault
		if (vPic<nPic) {
			vPic=vPic+1
		}else { vPic=1
		}
		vTmp=Pic[vPic]
		vP1=vTmp.slice(0,vTmp.indexOf("|"))
		vTmp=vTmp.slice(vTmp.indexOf("|")+1)
		vP2=vTmp.slice(0,vTmp.indexOf("|"))
		vTmp=vTmp.slice(vTmp.indexOf("|")+1)
		vP3=vTmp.slice(0,vTmp.indexOf("|"))
		vTmp=vTmp.slice(vTmp.indexOf("|")+1)
		dSite.innerText=vP1		
		dCaption.innerText=vP3		
		dCategory.innerText=vP4		
		dViewing.innerText=vPic		
		fMenuBlank();
		dM1.style.background="#99CC00"
		dM1.style.color="Black"							
		//fShow();		
		fGo();	
}

function fHLResume(){
	//fMenuBlank();
	//dM1.style.background=vBGColor
	//dM1.style.color="Black"	
	vMenuDefault="images/WWWTStopTour.jpg"
	//iMenu.src=vMenuDefault
}

function fHLO(n) {
	if (n==1) {
			//iMenu.src=vMenuDefault			
		if (vTour==0) {
			iStart.src="images/0-W1SW.jpg"
		} else {			
			iStart.src="images/0-W1W.jpg"
		}
	} else if (n==2) {
		if (vTour==1){
			iResume.src="images/0-W2W.jpg"
		} else {
			iResume.src="images/0-WResumeW.jpg"
		}
	} else if (n==3) {
		iPrev.src="images/0-W3W.jpg"
	} else if (n==4) {
		iNext.src="images/0-W4W.jpg"
	} else if (n==5) {
		iClose.src="images/0-W5W.jpg"
	} else if (n==6) {
		iFullMinimize.src="images/0-W6W.jpg"
	}	
}


function fHL(n){

	if (n==1) {
			//iMenu.src=vMenuDefault			
		if (vTour==0) {
			iStart.src="images/0-W1SY.jpg"
		} else {			
			iStart.src="images/0-W1Y.jpg"
		}
	} else if (n==2) {
		if (vTour==1) {
			iResume.src="images/0-W2Y.jpg"
		} else {
			iResume.src="images/0-WResumeY.jpg"
		}
	} else if (n==3) {
		iPrev.src="images/0-W3Y.jpg"
	} else if (n==4) {
		iNext.src="images/0-W4Y.jpg"
	} else if (n==5) {
		iClose.src="images/0-W5Y.jpg"
	} else if (n==6) {
		iFullMinimize.src="images/0-W6Y.jpg"
	}	
}


function fTimer(){

	dTimer.innerText=(vTimer-vCount) * .001
	
	if (vCount>=vTimer){
		
		vCount=0;
		fShow();
		return
	}
	
	vCount=vCount+1000	
	
	t=setTimeout("fTimer()",1000);	
	
}

function fClose(){
	clearTimeout(t)
	//var newwindow="newwindow"
	window.newwindow.close();
}

function fDelay(){

	vCount=0;
	vTimer=D1.value.slice(0,D1.value.indexOf(" ")) * 1000
	dTimer.innerText=vTimer * .001

}

function fMenuBlank(){
	dM1.style.background="#F4F4F4"
	dM2.style.background="#F4F4F4"
	dM3.style.background="#F4F4F4"
	dM4.style.background="#F4F4F4"
	dM5.style.background="#F4F4F4"
	dM6.style.background="#F4F4F4"
	dM7.style.background="#F4F4F4"
	dM8.style.background="#F4F4F4"
	dM9.style.background="#F4F4F4"
	dM10.style.background="#F4F4F4"
	dM11.style.background="#F4F4F4"
	dM12.style.background="#F4F4F4"
	dM13.style.background="#F4F4F4"
	dM14.style.background="#F4F4F4"
	dM15.style.background="#F4F4F4"
	dM16.style.background="#F4F4F4"
	dM17.style.background="#F4F4F4"
	dM18.style.background="#F4F4F4"
	dM19.style.background="#F4F4F4"
	dM20.style.background="#F4F4F4"
	
}


function fMenu(n) {



		//vBGColor="#99CC00"
		
		fMenuBlank();	
		vTour=0
		vMenuDefault="images/WWWTResume.jpg"
		iStart.src="images/0-W1SW.jpg"		
		vMenuDefault="images/WWWTStartHL.jpg"		
		clearTimeout(t);;
	
	if (n==1) {
		vTmp=dM1.innerText
		dM1.style.background=vBGColor
		dM1.style.color="white"
	} else if (n==2) {
		vTmp=dM2.innerText
		dM2.style.background=vBGColor
		dM2.style.color="white"		
	} else if (n==3) {
		vTmp=dM3.innerText
		dM3.style.background=vBGColor
		dM3.style.color="white"		
	} else if (n==4) {
		vTmp=dM4.innerText
		dM4.style.background=vBGColor
		dM4.style.color="white"		
	} else if (n==5) {
		vTmp=dM5.innerText
		dM5.style.background=vBGColor
		dM5.style.color="white"		
	} else if (n==6) {
		vTmp=dM6.innerText
		dM6.style.background=vBGColor
		dM6.style.color="white"		
	} else if (n==7) {
		vTmp=dM7.innerText
		dM7.style.background=vBGColor
		dM7.style.color="white"		
	} else if (n==8) {
		vTmp=dM8.innerText
		dM8.style.background=vBGColor
		dM8.style.color="white"		
	} else if (n==9) {
		vTmp=dM9.innerText
		dM9.style.background=vBGColor
		dM9.style.color="white"		
	} else if (n==10) {
		vTmp=dM10.innerText
		dM10.style.background=vBGColor
		dM10.style.color="white"		
	} else if (n==11) {
		vTmp=dM11.innerText
		dM11.style.background=vBGColor
		dM11.style.color="white"		
	} else if (n==12) {
		vTmp=dM12.innerText
		dM12.style.background=vBGColor
		dM12.style.color="white"		
	} else if (n==13) {
		vTmp=dM13.innerText
		dM13.style.background=vBGColor
		dM13.style.color="white"		
	} else if (n==14) {
		vTmp=dM14.innerText
		dM14.style.background=vBGColor
		dM14.style.color="white"		
	} else if (n==15) {
		vTmp=dM15.innerText
		dM15.style.background=vBGColor
		dM15.style.color="white"		
	} else if (n==16) {
		vTmp=dM16.innerText
		dM16.style.background=vBGColor
		dM16.style.color="white"		
	} else if (n==17) {
		vTmp=dM17.innerText
		dM17.style.background=vBGColor
		dM17.style.color="white"		
	} else if (n==18) {
		vTmp=dM18.innerText
		dM18.style.background=vBGColor
		dM18.style.color="white"		
	} else if (n==19) {
		vTmp=dM19.innerText
		dM19.style.background=vBGColor
		dM19.style.color="white"		
	} else if (n==20) {
		vTmp=dM20.innerText
		dM20.style.background=vBGColor
		dM20.style.color="white"		
	}

//alert ("Looking for : " + vTmp)
var vF=0
var i=0;
for (i=1;i<=nPic;i=i+1) {

	//if (Pic[i].toUpperCase().slice(0,Pic[i].indexOf("|"))==vTmp.toUpperCase()) {
	
	var vv=" " + Pic[i].toUpperCase()
	
	vv=vv.slice(0,Pic[i].indexOf("|"))
	vTmp=vTmp

	/*
	if (i<4) {
		//alert(vv + "  " + vTmp.toUpperCase() + "  " + vv.indexOf(vTmp.toUpperCase()))
		alert(vv + " = " + vv.length + "\n" + vTmp.toUpperCase() + " = " + vTmp.length + "\n  " + vv.indexOf(vTmp.toUpperCase()))		
	}
	*/
	
	//if (vv==vTmp.toUpperCase()) {
	//if (Pic[i].toUpperCase().slice(0,Pic[i].indexOf("|"))==vTmp.toUpperCase()) {	
	if (vv.indexOf(vTmp.toUpperCase())>-1) {
		vF=1;
		vTmp=Pic[i].slice(0,Pic[i].indexOf("|"))
		alert("Found it: " + vTmp)
		i=nPic

	 try {


	if (dFullMinimize.innerText=="Full Screen") {	
  	
  		if (vFull<1) {
	  		vFull=1
			OpenWindow=window.open(vTmp,"newwindow","fullscreen=yes,resizable=yes,scrollbar=yes,toolbar=no,menubar=no,location=no,directories=no,status=no,copyhistory=no;");
			OpenWindow.document.close();
			}else {
				OpenWindow=window.open(vTmp,"newwindow","fullscreen=yes,resizable=yes,scrollbar=yes,toolbar=no,menubar=no,location=no,directories=no,status=no,copyhistory=no;");
				OpenWindow.document.close();		
			}
	
	}else {
	
		if (vMini<1) {
			vMini=1
			OpenWindow=window.open(vTmp,"newwindow","width=780,height=600,resizable=yes,toolbar=yes,scrollbars=yes,menubar=yes,location=yes,directories=yes,status=yes,copyhistory=yes;");
			OpenWindow.document.close();					
		} else {
			OpenWindow=window.open(vTmp,"newwindow") // ,"toolbar=yes,scrollbars=yes,menubar=yes,location=yes,directories=yes,status=yes,copyhistory=yes;");
			OpenWindow.document.close();							
		}
		}
	
	
	
	} catch (err) {
	
	}	
		//i=vPic
	}	
		if (vF==0) {
			OpenWindow=window.open(vTmp,"newwindow") // ,"toolbar=yes,scrollbars=yes,menubar=yes,location=yes,directories=yes,status=yes,copyhistory=yes;");
			OpenWindow.document.close();										
		}	
	}	
}


function fShow(){
		vTmp=Pic[vPic]
		//Pic[vPic].slice(0,Pic[vPic].indexOf("|"))
		vP1=vTmp.slice(0,vTmp.indexOf("|"))
		vTmp=vTmp.slice(vTmp.indexOf("|")+1)
		vP2=vTmp.slice(0,vTmp.indexOf("|"))
		vTmp=vTmp.slice(vTmp.indexOf("|")+1)
		vP3=vTmp.slice(0,vTmp.indexOf("|"))
		vTmp=vTmp.slice(vTmp.indexOf("|")+1)
		if (vRate[vPic].length>0) {
			dR1.innerText=vRate[vPic]			
		}
		/*
		if (vTmp.length>0) {
			vR1.innerText=vTmp
			alert("vRate[" + vPic + "]")
		}
		*/
		dSite.innerText=vP1		
		dCaption.innerText=vP3		
		dCategory.innerText=vP4		
		dViewing.innerText=vPic
		
		if (vPic<nPic) {
			vPic=vPic+1
		}else { vPic=1
		}		

		fGo();
		t=setTimeout("fTimer()",1000);

	}
	
function fGo(){
	fStore();
	try {
          //window.onload=fSetTimeout()
		
  if (dFullMinimize.innerText=="Full Screen") {	
  	if (vFull<1) {
	  	vFull=1
		OpenWindow=window.open(vP1,"newwindow","fullscreen=yes,resizable=yes,scrollbar=yes,toolbar=no,menubar=no,location=no,directories=no,status=no,copyhistory=no;");
		OpenWindow.document.close();
		}else {
			OpenWindow=window.open(vP1,"newwindow","fullscreen=yes,resizable=yes,scrollbar=yes,toolbar=no,menubar=no,location=no,directories=no,status=no,copyhistory=no;");
			OpenWindow.document.close();		
		}
	}else {
		if (vMini<1) {
			vMini=1
			OpenWindow=window.open(vP1,"newwindow","width=780,height=600,resizable=yes,toolbar=yes,scrollbars=yes,menubar=yes,location=yes,directories=yes,status=yes,copyhistory=yes;");
			OpenWindow.document.close();					
		} else {
			OpenWindow=window.open(vP1,"newwindow") // ,"toolbar=yes,scrollbars=yes,menubar=yes,location=yes,directories=yes,status=yes,copyhistory=yes;");
			OpenWindow.document.close();							
		}
		}
	} catch (err) {
	}
}

function fStore(){

	dR20.innerHTML=dR19.innerHTML	
	dR19.innerHTML=dR18.innerHTML	
	dR18.innerHTML=dR17.innerHTML	
	dR17.innerHTML=dR16.innerHTML	
	dR16.innerHTML=dR15.innerHTML	
	dR15.innerHTML=dR14.innerHTML	
	dR14.innerHTML=dR13.innerHTML	
	dR13.innerHTML=dR12.innerHTML	
	dR12.innerHTML=dR11.innerHTML	
	dR11.innerHTML=dR10.innerHTML	
	dR10.innerHTML=dR9.innerHTML		
	dR9.innerHTML=dR8.innerHTML	
	dR8.innerHTML=dR7.innerHTML	
	dR7.innerHTML=dR6.innerHTML	
	dR6.innerHTML=dR5.innerHTML	
	dR5.innerHTML=dR4.innerHTML	
	dR4.innerHTML=dR3.innerHTML	
	dR3.innerHTML=dR2.innerHTML	
	dR2.innerHTML=dR1.innerHTML	
	dR1.innerHTML=" "
	
	dM20.innerHTML=dM19.innerHTML	
	dM19.innerHTML=dM18.innerHTML	
	dM18.innerHTML=dM17.innerHTML	
	dM17.innerHTML=dM16.innerHTML	
	dM16.innerHTML=dM15.innerHTML	
	dM15.innerHTML=dM14.innerHTML	
	dM14.innerHTML=dM13.innerHTML	
	dM13.innerHTML=dM12.innerHTML	
	dM12.innerHTML=dM11.innerHTML	
	dM11.innerHTML=dM10.innerHTML	
	dM10.innerHTML=dM9.innerHTML		
	dM9.innerHTML=dM8.innerHTML	
	dM8.innerHTML=dM7.innerHTML	
	dM7.innerHTML=dM6.innerHTML	
	dM6.innerHTML=dM5.innerHTML	
	dM5.innerHTML=dM4.innerHTML	
	dM4.innerHTML=dM3.innerHTML	
	dM3.innerHTML=dM2.innerHTML	
	dM2.innerHTML=dM1.innerHTML	
	dM1.innerHTML=vP1
	
}

function fRate(n){
var vFR=0

	if (dM1.style.background.toUpperCase()==vBGColor) {
		vTmp=dM1.innerHTML		
		vFR=1
		dR1.innerHTML=n;
	}else if (dM2.style.background.toUpperCase()==vBGColor) {
		vTmp=dM2.innerHTML
		vFR=2		
		dR2.innerHTML=n;		
	}else if (dM3.style.background.toUpperCase()==vBGColor) {
		vTmp=dM3.innerHTML
		vFR=3		
		dR3.innerHTML=n;		
	}else if (dM4.style.background.toUpperCase()==vBGColor) {
		vTmp=dM4.innerHTML
		vFR=4		
		dR4.innerHTML=n;		
	}else if (dM5.style.background.toUpperCase()==vBGColor) {
		vTmp=dM5.innerHTML
		vFR=5		
		dR5.innerHTML=n;		
	}else if (dM6.style.background.toUpperCase()==vBGColor) {
		vTmp=dM6.innerHTML
		vFR=6		
		dR6.innerHTML=n;		
	}else if (dM7.style.background.toUpperCase()==vBGColor) {
		vTmp=dM7.innerHTML
		vFR=7		
		dR7.innerHTML=n;		
	}else if (dM8.style.background.toUpperCase()==vBGColor) {
		vTmp=dM8.innerHTML
		vFR=8		
		dR8.innerHTML=n;		
	}else if (dM9.style.background.toUpperCase()==vBGColor) {
		vTmp=dM9.innerHTML
		vFR=9		
		dR9.innerHTML=n;		
	}else if (dM10.style.background.toUpperCase()==vBGColor) {
		vTmp=dM10.innerHTML
		vFR=10		
		dR10.innerHTML=n;		
	}else if (dM11.style.background.toUpperCase()==vBGColor) {
		vTmp=dM11.innerHTML
		vFR=11		
		dR11.innerHTML=n;		
	}else if (dM12.style.background.toUpperCase()==vBGColor) {
		vTmp=dM12.innerHTML
		vFR=12		
		dR12.innerHTML=n;		
	}else if (dM13.style.background.toUpperCase()==vBGColor) {
		vTmp=dM13.innerHTML
		vFR=13		
		dR13.innerHTML=n;		
	}else if (dM14.style.background.toUpperCase()==vBGColor) {
		vTmp=dM14.innerHTML
		vFR=14		
		dR14.innerHTML=n;		
	}else if (dM15.style.background.toUpperCase()==vBGColor) {
		vTmp=dM15.innerHTML
		vFR=15		
		dR15.innerHTML=n;		
	}else if (dM16.style.background.toUpperCase()==vBGColor) {
		vTmp=dM16.innerHTML
		vFR=16		
		dR16.innerHTML=n;		
	}else if (dM17.style.background.toUpperCase()==vBGColor) {
		vTmp=dM17.innerHTML
		vFR=17		
		dR17.innerHTML=n;		
	}else if (dM18.style.background.toUpperCase()==vBGColor) {
		vTmp=dM18.innerHTML
		vFR=18		
		dR18.innerHTML=n;		
	}else if (dM19.style.background.toUpperCase()==vBGColor) {
		vTmp=dM19.innerHTML
		vFR=19		
		dR19.innerHTML=n;		
	}else if (dM20.style.background.toUpperCase()==vBGColor) {
		vTmp=dM20.innerHTML		
		vFR=20		
		dR20.innerHTML=n;		
	}

var i=0;
for (i=1;i<=nPic;i=i+1) {

	if (Pic[i].toUpperCase().slice(0,Pic[i].indexOf("|"))==vTmp.toUpperCase()) {
		//vRate[i]=Pic[i] + n + "|"
		vRate[i]=n
		//alert(vRate[i])
	}
}
	
}

function fFullMinimized(){
	if (dFullMinimize.innerText=="Full Screen") {
		dFullMinimize.innerText="Minimized"
	} else {
		dFullMinimize.innerText="Full Screen"
	}
}


		vBGColor
		vTimer=D1.value.slice(0,D1.value.indexOf(" ")) * 1000	

		vBGColor="#99CC00"
		dM1.style.background="#99CC00"
		dM1.style.color="Black"	
		dViewing.innerText="0"
		dTimer.innerText="10"

		dCategory.style.background="#EDEFF4" // "#FFFFFF"
		dCaption.style.background="#EDEFF4"
		dSite.style.background="#EDEFF4" //vBGColor
		iStart.src="images/0-W1SW.jpg"