
//Hauteur du clip du scroll
HduClip=50;
LduClip=160;

function fire(){
	objmask = (document.layers) ? document.mask:(document.all)?document.all.mask.style:document.getElementById("mask").style;
	objinter = (document.layers) ? document.mask.document.inter:(document.all)?document.all.inter:document.getElementById("inter");
	objinter2 = (document.layers) ? document.mask.document.inter:(document.all)?document.all.inter.style:document.getElementById("inter").style;
	objcurseur = (document.layers) ? document.curseur :(document.all)?document.all.curseur.style: document.getElementById("curseur").style;
	objinter2.top=0;

	// Etat du scroll: Trus si mouse Down sur le curseur
	etatscroll = false;
	//nom du setTimout
	cpttime=false;
	// Si le scroll est en cour
	encour = false;
	// Fscroll = true si  hauteur du layer est > que la hauteur du clip
	Fscroll=false;
	//pas du scroll auto
	pasauto=5;
	//vitesse du scroll auto
	vitauto=50;
	// Hauteur du bouton
	HduBouton=5;
	// Largeur du bouton
	LduBouton=20;
	//Position Left du curseur
	ZoneXmoins=(anchorLeft('id_up','nom_up')+5);
	//Position Left du curseur + sa largeur
	ZoneXplus=ZoneXmoins+LduBouton;
	// Au demarrage, Position Top du curseur
	ZoneYmoins=(anchorTop('id_up','nom_up')+25);
	// Au demarrage, Position Top du curseur + sa hauteur
	ZoneYplus=ZoneYmoins+HduBouton;
	// Attention : HautMin et Max décalé de 2px !!!
	HautMin=ZoneYmoins;
	HautMax=(anchorTop('id_down','nom_down')-HduBouton);
	// +4 = décalage due au 2px
	course=(HautMax-HautMin)+4;
	
	objmask.top=(anchorTop('id_up','nom_up')+6);
	objmask.left=(anchorLeft('id_down','nom_down')-LduClip-10);
	
	objmask.visibility="visible";
	objinter2.visibility="visible";
	
	objcurseur.left=ZoneXmoins;
	objcurseur.top=ZoneYmoins;
	
	HduLayer = (document.layers) ? objinter.document.height:objinter.offsetHeight;
	if (HduLayer>HduClip){
		Fscroll=true;
		objcurseur.visibility='visible';
		pasdecourse= (HduLayer-HduClip)/course;	
	}
	else{
		objcurseur.visibility='hidden';
		pasdecourse= 0;	
	}
	
	if(document.layers)
	document.captureEvents(Event.MOUSEDOWN | Event.MOUSEMOVE | Event.MOUSEUP);
	document.onmousedown = _omon;
	document.onmouseup = _omup;
	document.onmousemove = _ommove;	
}

function _omon(){
	if ( Fscroll && mposx >= ZoneXmoins && mposx <= ZoneXplus && mposy >=ZoneYmoins && mposy <= ZoneYplus){
		etatscroll = true;
	}
}

function _omup(){
	etatscroll = false;
}

function _ommove(ev){	
		mposx = (document.all) ? window.event.clientX : ev.pageX;
		mposy = (document.all) ? window.event.clientY : ev.pageY;
	
	
	if ( etatscroll && mposy <= HautMax && mposy >= HautMin){
		objcurseur.top = mposy
		objinter2.top = Math.floor((mposy-HautMin)*(pasdecourse*(-1)));
		ZoneYmoins = mposy
		ZoneYplus = mposy+HduBouton;
		if(document.all) document.all.test.focus();
	}
	else if ( etatscroll  && mposy <= HautMin) objinter2.top =0;
	else if ( etatscroll && mposy >= HautMax) objinter2.top = -(HduLayer-HduClip);	
	
}


function move(manu,dir){
		if (!dir) mposy = parseInt(objcurseur.top)+pasauto;
		else mposy = parseInt(objcurseur.top)-pasauto;	
	if ( encour && mposy <= HautMax && mposy >= HautMin){
		objcurseur.top = mposy
		objinter2.top = Math.floor((mposy-HautMin)*(pasdecourse*(-1)));
		ZoneYmoins = mposy
		ZoneYplus = mposy+HduBouton;
		if(document.all) document.all.test.focus();
	}
	else if (  encour && mposy <= HautMin) objinter2.top =0;
	else if ( encour && mposy >= HautMax) objinter2.top = -(HduLayer-HduClip);	
	if (encour) cpttime=setTimeout("move(1,"+dir+")",vitauto);
	
}

function go_up(){
	encour=true;
	move(1,1);
}

function go_down(){
	encour=true;
	move(1,0);
}


function stopit(){
	if(cpttime) clearTimeout(cpttime);
	encour=false;
}

function anchorTop(ID_Anchor,Name_Anchor)  {
	pos =(document.all)?document.all[ID_Anchor]:(document.layers)?document.anchors[Name_Anchor]:document.getElementById(ID_Anchor);
	DivTop =(document.layers)?pos.y:getTop(pos);
	return DivTop;
}

function anchorLeft(ID_Anchor,Name_Anchor)  {
	pos =(document.all)?document.all[ID_Anchor]:(document.layers)?document.anchors[Name_Anchor]:document.getElementById(ID_Anchor);
	DivLeft =(document.layers)?pos.x:getLeft(pos);
	return DivLeft;
}

function getLeft(MyObject){
    if (MyObject.offsetParent)
        return (MyObject.offsetLeft + getLeft(MyObject.offsetParent));
    else 
        return (MyObject.offsetLeft);
    } 
	
function getTop(MyObject){
    if (MyObject.offsetParent)
        return (MyObject.offsetTop + getTop(MyObject.offsetParent));
    else
        return (MyObject.offsetTop);
    }
	
window.onresize = function (e) {history.go(0);};
