function gup( name )
{

  name = name.replace(/[\[]/,"\\\[").replace(/[\]]/,"\\\]");
  var regexS = "[\\?&]"+name+"=([^&#]*)";
  var regex = new RegExp( regexS );
  var results = regex.exec( window.location.href );
  if( results == null )
    return "";
  else
    return results[1];
}

function createCookie(name,value,days) {
	if (days) {
		var date = new Date();
		date.setTime(date.getTime()+(days*24*60*60*1000));
		var expires = "; expires="+date.toGMTString();
	}
	else var expires = "";
	document.cookie = name+"="+value+expires+"; path=/";
}

function readCookie(name) {	
	var nameEQ = name + "=";
	var ca = document.cookie.split(';');
	for(var i=0;i < ca.length;i++) {
		var c = ca[i];
		while (c.charAt(0)==' ') c = c.substring(1,c.length);
		if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length);
	}
	return null;
}

function eraseCookie(name) {
	createCookie(name,"",-1);
}

function MM_findObj(n, d) { //v4.01
var p,i,x;if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function P7_setScroller(a,b,x,y) { //v2.9 by PVII
	var g,d,dd,w,ww,pa="";
	if((parseInt(navigator.appVersion)>4 || navigator.userAgent.indexOf("MSIE")>-1)&& navigator.userAgent.indexOf("Opera")==-1){
		pa="px";
	}
	if((g=MM_findObj(a))!=null && (d=MM_findObj(b))!=null){
		if(g.p7Scroll){
			if((w=MM_findObj(g.p7Scroll))!=null){
				ww=(document.layers)?w:w.style;ww.visibility="hidden";
			}
		}
		
		
		
		g.p7Scroll=b; //p7s1content1
		dd=(document.layers)?d:d.style;
		
		var cat_no = gup('c');
		var scrollpos = 'scrollpos_' + cat_no;
		//alert(cat_no);
		prev_scrollpos = readCookie(scrollpos);
	
		dd.left=parseInt(x)+pa;
		
		if(prev_scrollpos){
				dd.top = prev_scrollpos;
			}else{
				dd.top=parseInt(y)+pa;
			}			
			
			
			/*
		var cat_no = gup('c');
		var scrollpos = 'scrollpos_' + cat_no;
		
		prev_scrollpos = readCookie(scrollpos);
			if(prev_scrollpos){
				dd.left = prev_scrollpos;
			}else{
				dd.left=parseInt(x)+pa;
			}			
		*/
		//dd.top=parseInt(y)+pa;
		dd.visibility="visible";
		g.p7sCycle=0;
		
		
		
		if(document.layers){
			g.p7sTop=g.clip.top;
			g.p7sBot=g.clip.bottom;
			g.p7sRight=g.clip.right;
			g.p7sLeft=g.clip.left;
			g.p7sStartTop=parseInt(y);
			g.p7sStartLeft=parseInt(x);
		}else if(g.style.clip){			
			var tc=g.style.clip;
			var j=tc.indexOf("(");
			tc=tc.substring(j+1,tc.length-1);
			var tr=tc.split(" ");
			if(tc.length < 1){
				tr[0]=0;
				tr[3]=0;
				tr[2]=g.style.pixelHeight;
				tr[1]=g.style.pixelWidth;
			}
			g.p7sTop=parseInt(tr[0]);
			g.p7sRight=parseInt(tr[1]);
			g.p7sBot=parseInt(tr[2]);
			g.p7sLeft=parseInt(tr[3]);
			g.p7sStartTop=parseInt(y);
			g.p7sStartLeft=parseInt(x);
		}else{
	//	alert(x);
			g.p7sTop=0; //was undef
			g.p7sRight=g.offsetWidth; //760
			g.p7sBot=g.offsetHeight; //50
			g.p7sLeft=0;
			g.p7sStartTop=parseInt(y); //0
			g.p7sStartLeft=parseInt(x); //0
			
			
			//dd.left = -150;
		}
	}
	g.toMove=true;
}

function P7_moveScroll(co,md,op,dy,cy) { //v2.9 by PVII
	var g,d,dd,x,y,h,w,tt,ff,m=false,pa="";
	op=parseInt(op);
	cy=parseInt(cy);
	dy=parseInt(dy);
	if((parseInt(navigator.appVersion)>4 || navigator.userAgent.indexOf("MSIE")>-1)&& navigator.userAgent.indexOf("Opera")==-1){
		pa="px";
	}
	if((g=MM_findObj(co))==null){
		return;
	}
	if((d=MM_findObj(g.p7Scroll))==null){
		return;
	}
	var sp=parseInt(sp=g.P7Ssp),fr=parseInt(g.P7Sfr),ff=fr;
	if(op==2){
		g.p7sCycle=0;
		g.p7sCycDy=(dy>0)?dy:g.p7sCycDy;
		dy=0;
		op=3;
	}
	if(op==3){
		g.p7sCycle+=sp;
		ff=fr;
		if(parseInt(g.p7sCycle)>cy){
			op=2;
			g.p7sCycle=0;
			ff=g.p7sCycDy;
		}
	}
	g.P7Sop=op;
	if(dy>0){
		ff=dy;
	}
	var ti="g.p7Magic=setTimeout(\"P7_moveScroll('"+co+"','"+md+"',"+op+",0,"+cy+")\","+ff+")";
	if(op==2 || dy>0){
		clearTimeout(g.p7Magic);
		eval(ti);
		return;
	}
	dd=(document.layers)?d:d.style;
	x=parseInt(dd.left);
	y=parseInt(dd.top);
	if(document.all || document.getElementById){
		h=parseInt(d.offsetHeight);
		w=parseInt(d.offsetWidth);
		if(!h){
			h=parseInt(d.style.pixelHeight);
			w=parseInt(d.style.pixelWidth);
		}
	}else if(document.layers){
		h=parseInt(d.clip.height);
		w=parseInt(d.clip.width);
	}
	var st=0,rStart=parseInt(g.p7sStartLeft),tStart=parseInt(g.p7sStartTop);
	g.p7sH=h;
	g.p7sW=w;
	if(md=="Down"){
		tt=y-sp;
		st=parseInt(g.p7sBot)-h-tStart;
		if(tStart<0 && tt<tStart){
		dd.top=tStart+pa;
		}else if(tStart>=0 && tt<st){
			dd.top=st+pa;
		}else{
			dd.top=tt+pa;
			m=true;
		}
	}
	if(md=="Up"){
		tt=sp+y;
		var rEnd=tStart+h;
		if(tStart<0 && tt>rEnd){
			dd.top=rEnd+pa;
		}else if(tStart>=0 && tt>tStart){
			dd.top=tStart+pa;
		}else{
			dd.top=tt+pa;
			m=true;
		}
	}
	if(md=="Right"){
		tt=x-sp;
		st=parseInt(g.p7sRight)-w-rStart;
		if(rStart<0 && tt<rStart){
			dd.left=rStart+pa;
		}else if (rStart>=0 && tt<st){
			dd.left=st+pa;
		}else{
			dd.left=tt+pa;
			m=true;
		}
	}
	if(md=="Left"){
		tt=x+sp;
		var rEnd=rStart+w;
		if(rStart<0 && tt>rEnd){
			dd.left=rEnd+pa;
		}else if (rStart>=0 && tt>rStart){
			dd.left=rStart+pa;
		}else{
			dd.left=tt+pa;
			m=true;
		}
	}
	if(m && g.toMove){
		eval(ti);
	}else{
		if(g.P7Sflip==1){
			clearTimeout(g.p7Magic);
			var tj=0;
			eval("g.p7Magic=setTimeout(\"P7_runScroller('"+co+"','Reverse','Medium',0,0,0,1)\","+tj+")");
		}else{
			if(op>0 && g.toMove){
				g.p7sCycle=0;
				dd.top=g.p7sStartTop+pa;
				dd.left=g.p7sStartLeft+pa;
				eval(ti);
			}
		}
	}
}

function P7_runScroller(co,md,spd,op,dy,cy,flp) { //v2.9 by PVII
	var g,d,dd,rl=0; rt=0;pa='',sp=2,fr=10,slw=true,kl=true;
	if((parseInt(navigator.appVersion)>4 || navigator.userAgent.indexOf("MSIE")>-1)&& navigator.userAgent.indexOf("Opera")==-1){
		pa="px";
	}
	if(navigator.userAgent.indexOf("NT")>-1 || navigator.userAgent.indexOf("Windows 2000")>-1 ){
		slw=false;
	}
	if((g=MM_findObj(co))!=null){
		if(g.p7Scroll){
			if((d=MM_findObj(g.p7Scroll))!=null){
				dd=(document.layers)?d:d.style;
				if(md=="Resume" && g.P7Sspd){
					spd=g.P7Sspd;
					md=g.P7Smd;
					op=g.P7Sop;
					dy=0;
					cy=g.P7Scy;
					flp=g.P7Sflip;
					kl=false;
				}
				if(md=="Reverse" && g.P7Sspd){
					spd=g.P7Sspd;
					md=g.P7Smd;
					op=g.P7Sop;
					flp=g.P7Sflip;
					dy=0;
					cy=g.P7Scy;
					kl=false;
					g.p7sCycle=0;
					if(g.P7Smd == "Down"){
						md="Up";
						if(g.P7Sop>0){
							g.p7sStartTop=g.p7sStartTop-g.p7sH;
						}
					}
					if(g.P7Smd == "Up"){
						md="Down";
						if(g.P7Sop>0){
							g.p7sStartTop=g.p7sStartTop+g.p7sH;
						}
					}
					if(g.P7Smd == "Left"){
						md="Right";
						if(g.P7Sop>0){
							g.p7sStartLeft=g.p7sStartLeft+g.p7sW;
						}
					}
					if(g.P7Smd == "Right"){
						md="Left";
						if(g.P7Sop>0){
							g.p7sStartLeft=g.p7sStartLeft-g.p7sW;
						}
					}
				}
				if(spd=="Slow"){
					sp=(slw)?2:1;fr=(slw)?40:30;
				}else if(spd=="Medium"){
					sp=(slw)?4:1;fr=(slw)?40:10;
				}else if(spd=="Fast"){
					sp=(slw)?10:5;fr=(slw)?20:10;
				}else{
					sp=(slw)?8:4;fr=(slw)?40:10;
				}
				if(md=="Stop"){
					g.toMove=false;
					clearTimeout(g.p7Magic);
				}else if(md=="Reset"){
					g.toMove=false;
					dd.top=g.p7sStartTop+pa;
					dd.left=g.p7sStartLeft+pa;
				}else{if(kl){
					g.P7Ssp=sp;g.P7Sfr=fr;
				}
				if(md=="Speed"){
					return;
				}
				g.toMove=true;
				clearTimeout(g.p7Magic);
				g.P7Smd=md;
				g.P7Sspd=spd;
				g.P7Sop=op;
				g.P7Sdy=dy;
				g.P7Scy=cy;
				g.P7Sflip=flp;
				eval("P7_moveScroll('"+co+"','"+md+"',"+op+","+dy+","+cy+")");
				}
			}
		}
	}
	var cat_no = gup('c');
	var scrollpos = 'scrollpos_' + cat_no;
	
	createCookie(scrollpos,dd.top,1);
}

