var logowidth=20
var logoheight=20
var logoimage=new Image(logowidth,logoheight)
logoimage.src="/Assets/images/bouton_top.gif"
var logolink="#top"
var alttext="Retour au haut de la page"
var visibleduration=0
var Hoffset=0
var Voffset=200
var ie=document.all&&navigator.userAgent.indexOf("Opera")==-1
var top_pos_obj=ie? document.all.top_position : document.getElementById? document.getElementById("top_position") : document.top_position

function insertimage(){
if (ie||document.getElementById)
top_pos_obj.innerHTML='<a href="'+logolink+'"><img src="'+logoimage.src+'" width="'+logowidth+'" height="'+logoheight+'" border=0 alt="'+alttext+'"></a>'
else if (document.layers){
top_pos_obj.document.write('<a href="'+logolink+'"><img src="'+logoimage.src+'" width="'+logowidth+'" height="'+logoheight+'" border=0 alt="'+alttext+'"></a>')
top_pos_obj.document.close()
}
}

function positionit(){
var dsocleft=ie? document.body.scrollLeft : pageXOffset
var dsoctop=ie? document.body.scrollTop : pageYOffset
var window_width=ie? document.body.clientWidth : window.innerWidth-20
var window_height=ie? document.body.clientHeight : window.innerHeight

	if (ie||document.getElementById){
		top_pos_obj.style.left=parseInt(dsocleft)+parseInt(window_width)-logowidth-Hoffset
		top_pos_obj.style.top=parseInt(dsoctop)+parseInt(window_height)-logoheight-Voffset
		if (parseInt(dsoctop) < 50) {
			hide_icone();
		} else {
			show_icone();
		}
	}
	else if (document.layers){
		top_pos_obj.left=dsocleft+window_width-Hoffset-logowidth
		top_pos_obj.top=dsoctop+window_height-logoheight-Voffset
		if (dsoctop < 50) {
			hide_icone();
		} else {
			show_icone();
		}
	}
}

function hide_icone(){
if (document.layers)
top_pos_obj.visibility="hide"
else
top_pos_obj.style.visibility="hidden"
if (visibleduration!=0)
clearInterval(icone_interval)
}

function show_icone(){
if (document.layers)
top_pos_obj.visibility="show"
else
top_pos_obj.style.visibility="visible"
if (visibleduration!=0)
clearInterval(icone_interval)
}

function st_goto_top(){
icone_interval=setInterval("positionit()",50)
insertimage()
if (visibleduration!=0)
setTimeout("hide_icone()",visibleduration*1000)
}