<!--
// CREDITS:
// Right-To-Left Scroller with smooth fade-effect
// By Urs Dudli and Peter Gehrig
// Copyright (c) 2003 Peter Gehrig and Urs Dudli. All rights reserved.
// Permission given to use the script provided that this notice remains as is.
// Additional scripts can be found at http://www.24fun.com
// info@24fun.com
// 9/16/2003

// IMPORTANT:
// If you add this script to a script-library or script-archive
// you have to add a highly visible link to
// http://www.24fun.com on the webpage
// where this script will be featured

// CONFIGURATION:
// Go to http://www.24fun.com
// and create your own text animation
// with our new Text Factory.
//
// Adaptation à l'anneau du CAD Francophone par Didier LOURDELLE Le 2004/01/01
// Add Title
//
// Your messages. Add as many as you like
var text=new Array()
//text[0]="Trucs & Astuces Sur AutoCAD www.didier-lourdelle.fr"


// Add a link for each message
var textlink=new Array()
//textlink[0]="http://www.le-cad-francophone.com/anneau/redirect.asp?link=812"


// Add a target for each link
// Possible values are "_blank", "_self", "_top", "_parent"
var texttarget=new Array()
//texttarget[0]="_blank"


// Add a title de l'url info Bulle
// 
var textTitle=new Array()
//textTitle[0]="_blank"


textlink[0]="http://www.le-cad-francophone.com/anneau/redirect.asp?link=1023"
textlink[1]="http://www.le-cad-francophone.com/anneau/redirect.asp?link=1125"
textlink[2]="http://www.le-cad-francophone.com/anneau/redirect.asp?link=1119"
textlink[3]="http://www.le-cad-francophone.com/anneau/redirect.asp?link=1118"
textlink[4]="http://www.le-cad-francophone.com/anneau/redirect.asp?link=985"
textlink[5]="http://www.le-cad-francophone.com/anneau/redirect.asp?link=939"
textlink[6]="http://www.le-cad-francophone.com/anneau/redirect.asp?link=1006"
textlink[7]="http://www.le-cad-francophone.com/anneau/redirect.asp?link=814"
text[0]="CablOA"
text[1]="LFA Consulting"
text[2]="Thalheim"
text[3]="Trucs & Astuces Sur AutoCAD  V2004"
text[4]="Kingpopo on Line"
text[5]="Le CAD Francophone"
text[6]="Astuces AutoCAD"
text[7]="@CAD+ *** Le Coin des AutoCADiens"
texttarget[0]="_blank"
texttarget[1]="_blank"
texttarget[2]="_blank"
texttarget[3]="_blank"
texttarget[4]="_blank"
texttarget[5]="_blank"
texttarget[6]="_blank"
texttarget[7]="_blank"
textTitle[0]="logiciel de cablage d'ouvrages d'art précontraints"
textTitle[1]="Dessinateur Développeur freelance CAO DAO Revendeur de produit INTELLICAD technologie AUTOCAD"
textTitle[2]="Publications papier/PDF relatives au développement d'applications VB/VBA sous AutoCAD et Inventor."
textTitle[3]="Forum(s), Tutoriaux, Boutique, Liste Diffusion, Glossaire(s)... Ce site s'adresse à tous types d'utilisateurs des logiciels de dessin industriels suivants : AutoCAD, AutoCAD LT, AutoCAD Mechanical, Autodesk Mechanical Desktop, Autodesk Map et Autodesk Architectural Desktop, du débutant à l'expert "
textTitle[4]="Arts visuels, tutorial AutoCad 2000 simplifié à destination des débutants + forum dédié à AutoCad"
textTitle[5]="le site de l'anneau du CAD Francophone. "
textTitle[6]="Astuces AutoCAD"
textTitle[7]="Vous y trouverez un savoir-faire, des tutoriaux et des outils pour améliorer  l'utilisation et la programmation en AutoLISP et VBA"
// font
var textfont="Arial"

// fontcolors
var textfontcoloraa="#FFFFFF"
var textfontcolorbb="#FFFF00"

// fontcolors on mouseover (rollover)
var textfontcolorrollover="#ff0000"

// fontsize
var textfontsize=11

// backgroundcolor
var textbgcolor="#000000"

// Type "bold" for bold text and "normal" for normal text
var textweight="bold"

// Type "italic" for italic text and ""normal" for normal text
var textitalic="normal"

// width and height of the scroller-box
var textwidth=470
var textheight=30

// color of the scroller-box border
var textbordercolor="#888888"

// width of the border
var textborder=0

// width of the transparent zones
var translayerszone=120

// Do not edit the values below this line
var textpause=0
var textitalicA=""
var textitalicB=""
var textweightA="<b>"
var textweightB="</b>"
var textdecoration="none"
var textalignonly="center"
var textfontsizeHTML=3
var i_text=0
var textcontent=""
var thisspan=""
var content=""
var contentbg=""
var toggle=1
var timer
var scrollready=true
var tablewidth
var tableheight
var textfontcolortoggle=new Array()
var toggle=1            
var step=2;          
var content
var padding=3
var textcontentheight
var textcontentwidth
var translayerswidth=4
var translayersmax=Math.floor(translayerszone/translayerswidth)
var translayersleftpos=0
var translayersopacity=100
var translayersfactor=100/translayersmax
var translayerswidthall=translayersmax*translayerswidth
var ie=document.all?1:0 
var ns6=document.getElementById&&!document.all?1:0
var ns4=document.layers?1:0
var browserinfos=navigator.userAgent 
var opera=browserinfos.match(/Opera/)  

getcontent()
function getcontent() {
	if (ie || ns6) {	
		tablewidth=textwidth-2*textborder
		tableheight=textheight-2*textborder
		content="<table width="+tablewidth+" height="+tableheight+" cellpadding=3 cellspacing=0 border=0><tr valign=middle><td><nobr>"
		for (i=0;i<text.length;i++) {
			if (toggle==1) {textfontcolortoggle[i]=textfontcoloraa}
			else if (toggle==-1) {textfontcolortoggle[i]=textfontcolorbb}
			toggle*=-1
			content+="<a title=\"" + textTitle[i] + "\"  href=\""+textlink[i]+"\" target=\""+texttarget[i]+"\" style=\"position:relative;font-family:\'"+textfont+"\';font-size:"+textfontsize+"pt;font-weight:"+textweight+";text-decoration:"+textdecoration+";color:"+textfontcolortoggle[i]+";font-style:"+textitalic+";\" onMouseOver=\"this.style.color=\'"+textfontcolorrollover+"\'\" onMouseOut=\"this.style.color=\'"+textfontcolortoggle[i]+"\'\">"
			content+=text[i]
			content+="</a><font color="+textbgcolor+">----------</font>"

		}
		content+="</nobr></td></tr></table>"
	}
	else {	
		tablewidth=textwidth-2*textborder
		tableheight=textheight-2*textborder
		contentbg="<table width="+tablewidth+"  height="+tableheight+"><tr><td><font color="+textbgcolor+">hi</font></td></tr></table>"
		content="<table height="+textheight+" cellpadding=0 cellspacing=0><tr valign=middle><td><nobr>"
		for (i=0;i<text.length;i++) {
			if (toggle==1) {textfontcolortoggle[i]=textfontcoloraa}
			else if (toggle==-1) {textfontcolortoggle[i]=textfontcolorbb}
			toggle*=-1
			content+="<a title=\"" + textTitle[i] + "\"  href=\""+textlink[i]+"\" target=\""+texttarget[i]+"\" style=\"position:relative;font-family:\'"+textfont+"\';font-size:"+textfontsize+"pt;font-weight:"+textweight+";text-decoration:"+textdecoration+";color:"+textfontcolortoggle[i]+";font-style:"+textitalic+";\" >"
			content+=text[i]
			content+="</a><font color="+textbgcolor+">----------</font>"
		}
		content+="</nobr></td></tr></table>"
	}
}

if (ns4) {
toggle=1
	document.write('<table cellpadding=0 cellspacing=0 border=0 height='+textheight+' width='+textwidth+'><tr><td>');
	document.write('<ilayer name="marker" bgcolor="'+textbordercolor+'" width='+textwidth+' height='+textheight+'></ilayer>');
	document.write('</td></tr></table>')
		document.write('<layer name="tickerbg" left='+textborder+' top='+textborder+' width='+(textwidth-4*textborder)+' height='+(textheight-2*textborder)+' bgcolor='+textbgcolor+' visibility=hide>'+contentbg+'</layer>')
		document.write('<layer left=-50000 name="ticker"  onMouseOver="setscrollready(0)" onMouseOut="setscrollready(1)">loading</layer>');

}

if (ie || ns6) {
	document.write('<table cellpadding=0 cellspacing=0 border=0 height='+textheight+' width='+textwidth+'><tr><td>');
	document.write('<div id="marker" style="position:relative; width:'+textwidth+'; height:'+textheight+'" ></div>');
	document.write('</td></tr></table>')
	if (ns6) {
		var tablewidth=textwidth-2*textborder
		var tableheight=textheight-2*textborder
	}
	else {
		var tablewidth=textwidth
		var tableheight=textheight
	}
	document.write('<div ID="roof" style="position:absolute;width:'+tablewidth+'px;height:'+tableheight+'px;border-style:solid;border-width:'+textborder+'px;border-color:'+textbordercolor+';background-color:'+textbgcolor+';visibility:hidden;overflow:hidden" onMouseOver="setscrollready(0)" onMouseOut="setscrollready(1)">')
	document.write('<span ID="ticker" style="position:absolute;top:0px;left:0px;visibility:hidden">'+content+'</span>')
	
	if (ie && !opera) {
		for (i=0;i<=translayersmax;i++) {
		document.write('<span ID="trans'+i+'" style="position:absolute;top:0px;left:'+translayersleftpos+'px;width:'+translayerswidth+'px;height:'+tableheight+'px;background-color:'+textbgcolor+';filter:alpha(opacity='+translayersopacity+');overflow:hidden"> </span>')
		translayersleftpos+=translayerswidth
		translayersopacity-=translayersfactor
		}
		translayersleftpos=tablewidth-translayersleftpos
		for (ii=0;ii<=translayersmax;ii++) {
		document.write('<span ID="trans'+ii+'" style="position:absolute;top:0px;left:'+translayersleftpos+'px;width:'+translayerswidth+'px;height:'+tableheight+'px;background-color:'+textbgcolor+';filter:alpha(opacity='+translayersopacity+');overflow:hidden"> </span>')
		translayersleftpos+=translayerswidth
		translayersopacity+=translayersfactor
		}
	}
	
	if (ns6 && !opera) {
		for (i=0;i<=translayersmax-1;i++) {
		document.write('<span ID="transleft'+i+'" style="position:absolute;top:0px;left:'+translayersleftpos+'px;width:'+translayerswidth+'px;height:'+tableheight+'px;background-color:'+textbgcolor+';-moz-opacity:'+translayersopacity/100+';overflow:hidden"> </span>')
		translayersleftpos+=translayerswidth
		translayersopacity-=translayersfactor
		if (translayersopacity<0) {translayersopacity=0.001}
		}
		translayersleftpos=tablewidth-translayersleftpos
		translayersopacity=0.001
		for (i=0;i<=translayersmax-1;i++) {
		document.write('<span ID="transright'+i+'" style="position:absolute;top:0px;left:'+translayersleftpos+'px;width:'+translayerswidth+'px;height:'+tableheight+'px;background-color:'+textbgcolor+';-moz-opacity:'+translayersopacity/100+';"> </span>')
		translayersleftpos+=translayerswidth
		translayersopacity+=translayersfactor
		}
	}
	
	
	document.write('</div>')
	if (ns6) {
		document.write('<span ID="tickersize" style="position:absolute;top:0px;left:-5000px;visibility:hidden">'+content+'</span>')
	}
}

function doscroll(){
	if (scrollready) {
		if(ns4){
			document.ticker.left+=-step;
			if (document.ticker.left<document.marker.pageX+1*textborder) {
				document.ticker.clip.left+=step;
			}
		
			document.ticker.clip.right+=step;
			if(document.ticker.left<-textcontentwidth+document.marker.pageX) {
				document.ticker.left=textwidth+document.marker.pageX-1*textborder;
				document.ticker.clip.left=0
				document.ticker.clip.right=0
			}
		}
		if (ie) {
			document.all.ticker.style.posLeft+=-step
			if (document.all.ticker.style.posLeft<-textcontentwidth) {
				document.all.ticker.style.posLeft=textwidth
			}
		}
		if (ns6) {
		document.getElementById('ticker').style.left=parseInt(document.getElementById('ticker').style.left)-step
			if (parseInt(document.getElementById('ticker').style.left)<-textcontentwidth) {
				document.getElementById('ticker').style.left=textwidth
			}
		}
		timer=setTimeout("doscroll()",50)
	}
	else {
		clearTimeout(timer)
	}
}

function DL_GetElementLeft(eElement) {
    var nLeftPos = eElement.offsetLeft;          
    var eParElement = eElement.offsetParent;     
    while (eParElement != null) {                                            
        nLeftPos += eParElement.offsetLeft;      
        eParElement = eParElement.offsetParent;  
    }
    return nLeftPos;                            
}

function DL_GetElementTop(eElement) {
    var nTopPos = eElement.offsetTop;            
    var eParElement = eElement.offsetParent;     
    while (eParElement != null) {                                            
        nTopPos += eParElement.offsetTop;        
        eParElement = eParElement.offsetParent;  
    }
    return nTopPos;                              
}

function initscroller(){
	if (ns4) {
		getcontent()
		var thisspan=eval("document.ticker")
		thisspan.document.clear()
		thisspan.document.write(content)
		thisspan.document.close()
		textcontentwidth=thisspan.clip.right
		document.tickerbg.left=document.marker.pageX+1*textborder
		document.tickerbg.top=document.marker.pageY+1*textborder
		thisspan.left=document.marker.pageX-1*textborder+textwidth
		thisspan.top=document.marker.pageY
		thisspan.clip.width=textcontentwidth;
		thisspan.clip.height=textheight;
		thisspan.clip.left=0
		thisspan.clip.right=0
		document.tickerbg.visibility="show";
		thisspan.visibility="show";
	}
	if (ie) {
		textcontentwidth=document.all.ticker.clientWidth
		document.all.roof.style.posLeft=DL_GetElementLeft(document.all.marker);
		document.all.roof.style.posTop=DL_GetElementTop(document.all.marker);
		document.all.ticker.style.posLeft=textwidth
		document.all.ticker.style.clip='rect(0px, '+textcontentwidth+'px, '+(textheight)+'px, 0px)';
		document.all.roof.style.visibility="visible";
		document.all.ticker.style.visibility="visible";
	}
	if (ns6) {
		textcontentwidth=document.getElementById('tickersize').offsetWidth
		document.getElementById('roof').style.left=DL_GetElementLeft(document.getElementById('marker'));
		document.getElementById('roof').style.top=DL_GetElementTop(document.getElementById('marker'));
		document.getElementById('ticker').style.left=textwidth
		document.getElementById('ticker').clip='rect(0px, '+textcontentwidth+'px, '+(textheight)+'px, 0px)';
		document.getElementById('roof').style.visibility="visible";
		document.getElementById('ticker').style.visibility="visible";
	}
	doscroll()
}

function setscrollready(whatanswer) {
	if (whatanswer==1) {
		scrollready=true
		checkscroll()
	}
	else {
		scrollready=false
	}
}

function checkscroll() {
	clearTimeout(timer)
	if (scrollready) {
		doscroll()
	}
}
function reopenpage() {
	history.go(0)
}
window.onresize=reopenpage
window.onload=initscroller
-->