/*****************************************************************

 Fichier de variables de Yelmini
 Générer automatiquemant par Agestis (http://www.agestis.com)
 Le 19/06/2009 par Aricia - damien

******************************************************************/


var NoOffFirstLineMenus=5;
var largeurcell=170;
var t="";
var isDHTML=0;var isID=0;var isAll=0;var isLayers=0;
if(document.getElementById){
	isID=1;isDHTML=1;
}else{
	if(document.all){
		isAll=1;isDHTML=1;
	}else{
		browserVersion = parseInt(navigator.appVersion);
		if((navigator.appName.indexOf('Netscape') != -1) && (browserVersion == 4)){
			isLayers=1;isDHTML=1;
		}
	}
}

function findDOM(objectID, withStyle){
	if (withStyle == 1){
		if (isID){
			return (document.getElementById(objectID).style);
		}else{
			if (isAll){
				return (document.all[objectID].style);
			}else{
				if (isLayers){
					return (document.layers[objectID]);
				}
			}
		}
	}else{
		if (isID){
			return (document.getElementById(objectID));
		}else{
			if (isAll){
				return (document.all[objectID]);
			}else{
				if (isLayers){
					return (document.layers[objectID]);
				}
			}
		}
	}
} 

var exist=false;var Tble_Display=false;var ms = navigator.appVersion.indexOf("MSIE");var ie=document.all && (ms>0) && (parseInt(navigator.appVersion.substring(ms+5, ms+6)) >4);var ns6=document.getElementById&&!document.all;

var IsCompatible;

// permet de tester le navigateur en compatibilité du calcul de largeur
if(ns6||ie){
	document.write("<table id='tableTest' border='0' style='visibility:hidden' cellpadding='0' cellspacing='0' bgcolor='yellow'>"
		+"<tr><td>"
		+"<img id='Imgtest' name='Imgtest' src='/images/t1px.gif' width='100%' height='1' border='0'>"
		+"</td></tr>"
		+"<tr><td id='TdTest'>texte de test - ne rien changer ici</td></tr>"
		+"</table>");
	var MyTestTble = findDOM('tableTest',0);
	var MyTestImg = findDOM('Imgtest',0);
	var Img = parseInt(MyTestImg.width+0);
	MyTestTble.style.visibility=''; MyTestTble.style.display='none';
	IsCompatible=true;
}
// fin du test

function calc_larg(tab_menu) {
	if (IsCompatible) {
		if(exist && Tble_Display==false){
			Tble_Display=true;Tble_Calc.style.display='';
		}
		var lmax=0;
		if (!exist) {
			document.write("<table id='TbleCalc' border='1' style='visibility:hidden' cellpadding='0' cellspacing='0' bgcolor='yellow'>"
				+"<tr><td id='TdCalc'><img id='ImgCalc' src='/images/t1px.gif' width='100%;' height='1'></td></tr>"
				+"<tr><td id='TdFt'></td></tr>"
				+"</table>");
			exist=true; Tble_Display=true;
		}
		Img_Calc=findDOM('ImgCalc', 0);Td_Calc=findDOM('TdCalc', 0);Td_Ft=findDOM('TdFt', 0);Tble_Calc=findDOM('TbleCalc', 0);
		for (var i=0 ; i<tab_menu.length ; i++){
			str_txt="<font style='font-family:"+FontFamily+";font-size:"+FontSize+"pt;";
			if (FontBold!=0){str_txt=str_txt+"font-weight: bold ;";}
			if (FontItalic!=0){str_txt=str_txt+" font-style: italic;";}
			str_txt+="'>"+tab_menu[i]+"</font>";
			Td_Ft.innerHTML=str_txt;
			if(Td_Calc.offsetWidth>0){
				if (Td_Calc.offsetWidth>lmax){lmax=Td_Calc.offsetWidth;}
			}else{
				if (Img_Calc.width>lmax){lmax=Img_Calc.width;}
			}
		}
		Tble_Calc.style.display='none'; Tble_Display=false;
		return (lmax+(LeftPaddng*2)+20);
	}else {
		return DftLrgCell2;
	}
}

var LSBC = "#E2EBEA";
var HSBC = "#085F8F";
var FSLC = "#000000";
var FSHC = "#E2EBEA";
var BSC = "#085F8F";
var MTCt = "left";



Intitules="Chronology";
t=Intitules.split("|");
LgCelSsN=calc_larg(t);
Menu1_1_1=new Array(t[0],"/affiche.asp?arbo=6&num=83","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Chronology of geological periods or eras");


Intitules="Geology|Marbles|Marble stones|Other stones";
t=Intitules.split("|");
LgCelSsN=calc_larg(t);
Menu1_1=new Array(t[0],"/affiche.asp?arbo=6&num=10","",1,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Geology");
Menu1_2=new Array(t[1],"/affiche.asp?arbo=6&num=11","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Marbles");
Menu1_3=new Array(t[2],"/affiche.asp?arbo=6&num=12","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Marble stones");
Menu1_4=new Array(t[3],"/affiche.asp?arbo=6&num=13","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Other stones");

Menu1=new Array("Generalities","/affiche.asp?arbo=6&num=1","/skins/Commun/images/menu_background.gif",4,20,largeurcell,"","","","","","",-1,-1,-1,"","");
Menu2=new Array("Characteristics","/affiche.asp?arbo=6&num=16","/skins/Commun/images/menu_background.gif",0,20,largeurcell,"","","","","","",-1,-1,-1,"","Technical characteristics of marbles and stones");

Intitules="Noir des Alpes|'Bleu de Savoie'|Gris de Villette|Sarrancolin|Rouge Alicante|'Rosa Zarzi'|Blanc de Carrare|Jaune de Valence";
t=Intitules.split("|");
LgCelSsN=calc_larg(t);
Menu3_2_1=new Array(t[0],"/affiche.asp?arbo=6&num=20","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"The marble factory Yelmini presents a darker marble than the Bleu de Savoie : The 'Noir des Alpes'");
Menu3_2_2=new Array(t[1],"/affiche.asp?arbo=6&num=26","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"The marble factory Yelmini presents his exclusive marble : the 'Bleu de Savoie'");
Menu3_2_3=new Array(t[2],"/affiche.asp?arbo=6&num=73","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Yelmini presents his exclusive marble : the 'Gris de Villette', Villette Grey");
Menu3_2_4=new Array(t[3],"/affiche.asp?arbo=6&num=19","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"The marble factory Yelmini presents the marble : Sarrancolin");
Menu3_2_5=new Array(t[4],"/affiche.asp?arbo=6&num=74","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"The marble factory Yelmini presents the marble : Rouge Alicante");
Menu3_2_6=new Array(t[5],"/affiche.asp?arbo=6&num=75","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"The marble factory Yelmini presents the marble : 'Rosa Zarzi'");
Menu3_2_7=new Array(t[6],"/affiche.asp?arbo=6&num=76","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"The marble factory Yelmini presents the marble : ‘Blanc de Carrare’");
Menu3_2_8=new Array(t[7],"/affiche.asp?arbo=6&num=77","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"The marble factory Yelmini presents the marble : ‘Jaune de Valence’ ");


Intitules="Chandoré|'Pierre de Villebois'";
t=Intitules.split("|");
LgCelSsN=calc_larg(t);
Menu3_3_1=new Array(t[0],"/affiche.asp?arbo=6&num=78","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"The marble factory Yelmini presents the marble stone : ‘Chandoré’");
Menu3_3_2=new Array(t[1],"/affiche.asp?arbo=6&num=79","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"The marble factory Yelmini presents the marble stone : ‘Pierre de Villebois’");


Intitules="Bleu de Savoie|Marbles|Marble stones|Other stones|Granites";
t=Intitules.split("|");
LgCelSsN=calc_larg(t);
Menu3_1=new Array(t[0],"/affiche.asp?arbo=6&num=7","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"The marble Bleu de Savoie (Blue Savoy), an exclusive marble of Yelmini");
Menu3_2=new Array(t[1],"/affiche.asp?arbo=6&num=18","",8,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Some of the Marbles worked by the Marble Work Yelmini");
Menu3_3=new Array(t[2],"/affiche.asp?arbo=6&num=21","",2,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Marble stones");
Menu3_4=new Array(t[3],"/affiche.asp?arbo=6&num=90","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Other stones worked by the marble factory Yelmini");
Menu3_5=new Array(t[4],"/affiche.asp?arbo=6&num=84","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Exemples of granites worked by the marble factory Yelmini");

Menu3=new Array("Stones palette","","/skins/Commun/images/menu_background.gif",5,20,largeurcell,"","","","","","",-1,-1,-1,"","Stone, marble, marble stone, Blue Savoy");

Intitules="Mouldings";
t=Intitules.split("|");
LgCelSsN=calc_larg(t);
Menu4_2_1=new Array(t[0],"/affiche.asp?arbo=6&num=59","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Exemples of mouldings worked by the marble factory Yelmini");


Intitules="Other finishes";
t=Intitules.split("|");
LgCelSsN=calc_larg(t);
Menu4_3_1=new Array(t[0],"/affiche.asp?arbo=6&num=71","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Other finishes worked by the marble factoryYelmini");


Intitules="Preparation|Shaping|Finishes";
t=Intitules.split("|");
LgCelSsN=calc_larg(t);
Menu4_1=new Array(t[0],"/affiche.asp?arbo=6&num=28","",0,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Quarryed bloks, Sawing and cutting out slabs");
Menu4_2=new Array(t[1],"/affiche.asp?arbo=6&num=29","",1,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"Shaping, trenching, carving, moulding, turnery");
Menu4_3=new Array(t[2],"/affiche.asp?arbo=6&num=30","",1,20,LgCelSsN,LSBC,HSBC,FSLC,FSHC,BSC,"",-1,-1,-1,MTCt,"");

Menu4=new Array("Marble work, tools","","/skins/Commun/images/menu_background.gif",3,20,largeurcell,"","","","","","",-1,-1,-1,"","Sawing, cutting out, trenching, carving, moulding, differents finishes : Polished, bush hammered, line textured, flammed");
Menu5=new Array("Care and cleaning","/affiche.asp?arbo=6&num=38","/skins/Commun/images/menu_background.gif",0,20,largeurcell,"","","","","","",-1,-1,-1,"","Care and cleaning advises");