var moveV = 0;
var moveIt=100; 
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;
}

//gets the height or width of object
function P7_getHW(t,a) { //v2.08 by PVII
  var r,p,h=0,w=0;
  if((p=MM_findObj(a)) !=null){
	  if(document.all || document.getElementById){
	  	h=parseInt(p.offsetHeight);
		w=parseInt(p.offsetWidth);
	  	if(!h){
			h=parseInt(p.style.pixelHeight);
			w=parseInt(p.style.pixelWidth);
		}
	  }else if(document.layers){
	  	h=parseInt(p.clip.height);
		w=parseInt(p.clip.width);
  }}
  if(t=="width"){r=w;}else{r=h;}
  return r; 
}

//loooks for P7M1DWT0 & triigers menu magic if it's there
function P7_MM1dwt() { //v2.08 by PVII
  var g,lh,sw,fr = false;
  if(!document.p7mc)return;
  for(var x=0;x<p7m1.length;x++){
  	tl=p7m1[x].id;
	lh="P7CM1DWT0"+tl;
	if((g=MM_findObj(lh)) !=null){
		fr=true;
		sw=0;
		break;
	}
	lh="P7CM1DWT1"+tl;
	if((g=MM_findObj(lh)) !=null){
		fr=true;
		sw=1;
		break;
	}
  }
  if(fr){eval("P7_trigMenuMagic1('"+tl+"',"+sw+")");}			//trigger menu magic
}

function P7_setMenuMagic1() { 
//ARGS: 1=offset 2=rate 3=delay 4=bottom
  var s,d,g,g2,gg,ww,kx,th,tu,ts,nu,xx,k=0,pa=0;args=P7_setMenuMagic1.arguments; //pa = padding  th = subheight
  if((parseInt(navigator.appVersion)>4 || navigator.userAgent.indexOf("MSIE")>-1)&& navigator.userAgent.indexOf("Opera")==-1){pa="px";}
  if(navigator.userAgent.indexOf("Opera")>-1){P7OperaW=window.innerWidth;P7OperaH=window.innerHeight;}
  if(!document.p7mc) {
    p7m3=new Array();
    p7m=new Array(); //holds p7menu
    document.p7mc=true;
    p7ms=new Array();
    document.P7_imswap=new Array();
    document.P7_imswapo=new Array();
    p7m1=new Array();
    p7m2=new Array();
    p7mprop=new Object();
    p7mprop.p7offset=args[0];
    p7mprop.p7rate=args[1];
    p7mprop.p7delay=args[2];
    p7mprop.p7bottom=args[3];
   if(document.layers){p7mprop.p7pageh = document.height;}}
  for(var x=4;x<args.length;x+=3){
    if((g=MM_findObj(args[x])) !=null){
	//alert (k+" = "+x+"  "+args[x]);
      p7m[k]=args[x];					//set to p7menu[1,2,3,....]
      g.p7imname=args[x+2];				//imagename (not needed?)
      g.p7sub=args[x+1];				//submenu
      p7m3[k]=0;
      g2=MM_findObj(args[x+2]); 		//get imagename of button
      tu=g2.src;						//image source
      ts=tu.lastIndexOf(".");
      k++;
    }
  }
  var lf=0;
  for (var j=0;j<p7m.length;j++){
   if((g=MM_findObj(p7m[j])) !=null){ 	//g = p7menu[1,2,3...] object
    d=(document.layers)?g:g.style; 		//d= doc model for object
    p7m1[j]=g;
    g.p7waiting=false;
    if(j==0){ 	//first menu
		lf = parseInt(d.left);			//left
		th = parseInt(d.top);			//top
	} 
	
    if(j>0){
      d.left=(lf+pa);
	  //th+=0;
      th+=P7_getHW('height',p7m[j-1]);
      d.top=(th+pa);
    }
    if((s=MM_findObj(g.p7sub)) !=null){	//get submenu
      p7m2[j]=s;
	  
	  //place horizontaly
	  ww=P7_getHW('width',g.p7sub);
      kx=lf-ww-moveIt; 					//distance of hidden submenus from main menus horizontal
	  //kx=lf;							//reverse w/ above for vertical movement
      dd=(document.layers)?s:s.style; 	//set dd to proper submenu object
      dd.left=(kx+pa); 					// left px of submenus (kx=hidden distance; pa=padding)
      dd.top=(th+pa); 					// top of submenus (th=height + pa=padding)
      p7ms[j]=th;
	  
	  //place verticaly
	  hh=P7_getHW('height',g.p7sub)+moveV;
	  hh-=th;
	  hh*=-1;
	  //dd.top=(hh+pa); 					//set top of submenus
	  
      //dd.visibility="visible";
      s.p7open=false;
      s.p7waiting=false;
  }}}
  //this is for a bottom div?
  if((g=MM_findObj(p7mprop.p7bottom)) !=null){
    d=(document.layers)?g:g.style;
    d.left=(lf+parseInt(args[0])+pa);
	//th+=0;
    th+=P7_getHW('height',p7m[p7m.length-1]);
    d.top=(th+pa);
  }
}

//Move function
function P7_BM1(el,x,y,a,b,c,s) { //v2.08 by PVII
//ARGS: el = submenu; x = left; y = top; a = rate
	var g,elo=el,f="",m=false,d="";
	x=parseInt(x);
	y=parseInt(y);
	var t = 'g.p7BM = setTimeout("P7_BM1(\''+elo+'\',';
	if ((g=MM_findObj(el))!=null) {
		d=(document.layers)?g:g.style;			//submenu object
	}else{return;}
	
	var xx=(parseInt(d.left))?parseInt(d.left):0;	//current left
	var yy=(parseInt(d.top))?parseInt(d.top):0;		//current top
	var i=parseInt(a);
	if (eval(g.moved)){clearTimeout(g.p7BM);}
	if (xx<x){xx+=i;m=true;if(xx>x){xx=x;}}
	if (xx>x){xx-=i;m=true;if(xx<x){xx=x;}}
	if (yy<y){yy+=i;m=true;if(yy>y){yy=y;}}
	if (yy>y){yy-=i;m=true;if(yy<y){yy=y;}}
	
	if (m) {
	  if((parseInt(navigator.appVersion)>4 || navigator.userAgent.indexOf("MSIE")>-1)&& navigator.userAgent.indexOf("Opera")==-1){   
	  	xx+="px";
	  	yy+="px";
	  }
	  d.left=xx;	//move left
	  d.top=yy;		//move top
	  g.moved=true;
	  eval(t+x+','+y+','+a+','+b+','+c+',0)",'+b+')');
	 }else {
	 	g.moved=false;
	P7_wait(elo);
	 }
}

function P7_wait(a) { //v2.08 by PVII
  var ma,mb;if((mb=MM_findObj(a)) !=null){
  	if(!mb.p7waiting || mb.p7waiting=="none"){return;}
	    ma=mb.p7waiting;
		mb.p7waiting=false;
		eval(ma);
	}
}

function P7_trigMenuMagic1(a,sw) { //v2.08 by PVII
//ARGS a=menu.id sw=1
	 var x,g,gg,d,dd,w,lp,tp,im,im2,ts,nu,e,pa=0;
	 if(!document.p7mc)return;
	 if((parseInt(navigator.appVersion)>4 || navigator.userAgent.indexOf("MSIE")>-1)&& navigator.userAgent.indexOf("Opera")==-1){pa="px";}
	 if(navigator.userAgent.indexOf("Opera")>-1){if( P7OperaW!=window.innerWidth || P7OperaH!=window.innerHeight)P7_setMenuMagic1();}
	 var ofs=parseInt(p7mprop.p7offset),trt = parseInt(p7mprop.p7rate);
	 var tdy=parseInt(p7mprop.p7delay),tsb,tlf,tst;
	 
	 for(x=0;x<p7m.length;x++){
		if(p7m[x]==a){
			d=p7m1[x];
			dd=(document.layers)?d:d.style;
			g=p7m2[x];
			gg=(document.layers)?g:g.style;
			e=MM_findObj(d.p7imname);
			im='';
			ts='';
			ts='';
			if(!g.p7open){
				tst="closed";
				im2=ts.lastIndexOf(".");
				nu=ts.substring(0,im2)+""+ts.substring(im2,ts.length);
				ts = nu;
			}else{
				tst="open"
			}
			break;
		}
	}
	
	for(j=0;j<p7m.length;j++){
		d=p7m1[j];							
		dd=(document.layers)?d:d.style;		// Menu object
		g=p7m2[j];
		gg=(document.layers)?g:g.style;		// SubMenu object
		
		//first menu
		if(j==0){
			ttp=parseInt(dd.top); //top for vertical
			tlf=parseInt(dd.left);
		}
		if(g.p7open){							//CLOSE IT
			w=P7_getHW('width',d.p7sub)+moveIt; //submenu direction
			//w=0;	//keep in line verticaly
			w-=parseInt(dd.left);
			w*=-1;
			d.p7waiting=false;
			//h=P7_getHW('height',d.p7sub);//+moveV; //submenu direction
			h=parseInt(dd.top);
			h+=P7_getHW('height',d.p7sub);
			//h*=-1;
			
			eval("P7_BM1('"+d.p7sub+"',"+w+","+h+","+trt+","+tdy+",0,0)"); //put it back to hidden place
            gg.visibility="hidden";
		}
		
		//if(g.p7open){							//CLOSE IT
			//w=P7_getHW('width',d.p7sub)+moveIt; //submenu direction
			//w-=parseInt(dd.left);
			//w*=-1;
			//d.p7waiting=false;
			//eval("P7_BM1('"+d.p7sub+"',"+w+","+parseInt(gg.top)+","+trt+","+tdy+",0,0)"); //put it back to hidden place
		//}
		
		
		d.p7waiting=false;
		g.p7open=false;
	}
	
	 var tnt=new Array();
	 var df=0,tcd=0,tdl=p7m[0];
	 
	 for(j=0;j<p7m.length;j++){
		d=p7m1[j];
		dd=(document.layers)?d:d.style;			// Menu object
		g=p7m2[j];
		gg=(document.layers)?g:g.style;			// SubMenu object
		//first menu
		if(j==0){
			th=parseInt(dd.top);
		}
		tnt[j]=th;
		df=Math.abs(parseInt(dd.top)-th);		//Top of menu - Height of menu
		//if bottom of menu is > 0
		if(df>tcd){
			tdl=p7m[j];							//Next menu down
			tcd=df;
		}
		//th+=0;
		th+=P7_getHW('height',p7m[j]);
		if(x==j && tst=="closed"){
			tsb=th;
			//tsb-=P7_getHW('height',p7m[j]); // tweak to line up submenu with button vertically
			if(p7m3[j]!=1){
				th+=P7_getHW('height',d.p7sub);
			}
		}
		p7ms[j]=th;
	}
	if(tst=="closed"){
		d=p7m1[x];
		dd=(document.layers)?d:d.style;			// Menu object
		g=p7m2[x];
		gg=(document.layers)?g:g.style;			// SubMenu object
		lp=tlf+ofs;
		gg.top=(tsb+pa);
		p7ms[x]=tsb;
		e=MM_findObj(d.p7imname);
		g.p7open=true;
		if(p7m3[x]!=1){
			gg.visibility="visible";
			var r;
			r=MM_findObj(tdl);		
			r.p7waiting="P7_BM1('"+d.p7sub+"',"+lp+","+tsb+","+trt+","+tdy+",0,0)" ;
			//d.p7sub = submenu; lp = left; tsb = top; trt = ? (20); tdy = ? (10)
			//alert("P7_BM1('"+d.p7sub+"',"+lp+","+tsb+","+trt+","+tdy+",0,0)");
		}
	}else{
		d=p7m1[p7m1.length-1];
		d.p7waiting="none";
	}
	for(j=0;j<p7m.length;j++ ){
		eval("P7_BM1('"+p7m[j]+"',"+tlf+","+tnt[j]+","+trt+","+tdy+",0,0)");
	}
	if((g=MM_findObj(p7mprop.p7bottom)) !=null){
		d=(document.layers)?g:g.style;
		g.p7waiting=false;
		eval("P7_BM1('"+p7mprop.p7bottom+"',"+(tlf+ofs)+","+th+","+trt+","+tdy+",0,0)");
		th+=(document.layers)?P7_getHW('height',p7mprop.p7bottom):0;
	}
	if(document.layers){
		var tw2=document.width;
		if(document.height<th) {
			document.height=th;document.width=tw2;
		}
	}
}
