// Il faut appeler vieillesse_a.js avant ce script

var decalage = 0 ;
var nb_positions = 15 ; // Ne variera pas

var nombre = japon ;
var no_cour = egypte2005 ;


var le_drapeau = new Array(nombre) ;
le_drapeau[atlas] = 'atlas' ;
le_drapeau[islande] = 'islande' ; // Islande 1995
le_drapeau[perou] = 'perou' ; // Pérou 1996
le_drapeau[tchad] = 'tchad' ;
le_drapeau[nepal] = 'nepal' ; /* Annapurnas*/
le_drapeau[pakistan] = 'pakistan' ;  // Pakistan 1999
le_drapeau[mauritanie] = 'mauritanie' ; /* Mauritanie */
le_drapeau[atacama] = 'atacama' ;
le_drapeau[libye] = 'libye' ; /* Akakkus */
le_drapeau[groenland] = 'groenland' ;
le_drapeau[khumbu] = 'khumbu' ;
le_drapeau[niger] = 'niger' ;
le_drapeau[asie_centrale] = 'asie_centrale' ; /* Asie centrale */
le_drapeau[hoggar] = 'hoggar' ;
le_drapeau[egypte2005] = 'egypte2005' ;/* désert blanc */
le_drapeau[chine] = 'chine' ;
le_drapeau[tassili]= 'tassili' ; /* tassili */
le_drapeau[kamtchatka]= 'kamtchatka' ; 
le_drapeau[afrique_a]= null ; /* afrique_a */
le_drapeau[indonesie] = 'indonesie' ;
le_drapeau[tanzanie] = 'tanzanie' ; /* tanzanie */
le_drapeau[bolivie] = null ; /* Bolivie */
le_drapeau[soudan] = null ; /* Soudan */
le_drapeau[monts_celestes] = null ; /* Monts Célestes */
le_drapeau[algerie] = null ; /* Algérie (tassili du Hoggar) */


var intitule = new Array(nombre) ;
intitule[atlas] = "1994 : Maroc (Atlas)" ;
intitule[islande] = "1995 : Islande" ; // Islande 1995
intitule[perou] = "1996 : Pérou (Vilcanota)" ; // Pérou 1996
intitule[tchad] = "1998 : Tchad (Tibesti)" ;
intitule[nepal] = "1998 : Népal (Annapurnas)" ; /* Annapurnas*/
intitule[pakistan] = "1999 : Pakistan" ;  // Pakistan 1999
intitule[mauritanie] = "2000 : Mauritanie" ; /* Mauritanie */
intitule[atacama] = "2000 : Chili/Bolivie" ;
intitule[libye] = "2002 : Libye (Akakus)" ; /* Akakus */
intitule[groenland] = "2002 : Groenland (Disko)" ;
intitule[khumbu] = "2003 : Népal (CB Everest)" ;
intitule[niger] = "2004 : Niger (est de l'Aïr)" ;
intitule[asie_centrale] = "2004 : Asie centrale" ; /* Asie centrale */
intitule[hoggar] = "2004 : Algérie (Hoggar)" ;
intitule[egypte2005] = "2005 : Égypte (désert blanc)" ;/* désert blanc */
intitule[chine] = "2005 : Chine, Sin-kiang" ;
intitule[tassili]= "2006 : Algérie (Tassili n'Ajjer)" ; /* tassili */
intitule[kamtchatka]= "2006 : Russie (Kamtchatka)" ; /* kamtchatka */
intitule[afrique_a] = "2006 : Afrique australe" ;
intitule[indonesie] = "2007 : Indonésie" ;
intitule[tanzanie] = "2008 : Tanzanie" ;
intitule[bolivie] = "2008 : Bolivie" ;
intitule[soudan] = "2008 : Soudan" ;
intitule[monts_celestes] = "2009 : monts Célestes" ;
intitule[algerie] = "2010 : Algérie, tassili du Hoggar" ;


var marron = "(102, 51, 0)" ;
var noir = "(0, 0, 0)" ;

// Couleur d'écriture du texte
var couleur = new Array(npub) ;
couleur[atlas]= "noir" ;
couleur[islande]= "noir" ;
couleur[perou]= "marron" ;
couleur[tchad]= "marron" ;
couleur[nepal]= "marron" ;
couleur[pakistan]= "noir" ;
couleur[mauritanie]= "marron" ;
couleur[atacama]= "marron" ;
couleur[libye]= "marron" ;
couleur[groenland]= "marron" ;
couleur[khumbu]= "noir" ;
couleur[niger]= "marron" ;
couleur[asie_centrale]= "marron" ;
couleur[hoggar]= "marron" ;
couleur[egypte2005]= "marron" ;
couleur[chine]= "marron" ;
couleur[tassili]= "noir" ;
couleur[kamtchatka]= "noir" ;
couleur[afrique_a]= "marron" ;
couleur[indonesie]= "marron" ;
couleur[tanzanie]= "noir" ;
couleur[bolivie]= "marron" ;
couleur[soudan]= "marron" ;
couleur[monts_celestes]= "marron" ;
couleur[algerie]= "marron" ;



var cliquage = new Array(nombre) ;
for (i=0 ; i<nombre ; i++) {
  if (le_drapeau[i] != null)
    cliquage[i] = new Function("charger_page('"+le_drapeau[i]+"');") ;
}
// Utilisation d'un objet fonction : voir http://www.devguru.com/Technologies/ecmascript/quickref/function_object.html


function
reafficher() {
  for (i=0 ; i<nb_positions ; i++) {
//   alert(document.getElementById("entrees"+(i+1)).href) ;
   var objet = document.getElementById("entrees"+(i+1)) ;
   objet.innerHTML=intitule[i+decalage] ;
   if (le_drapeau[i+decalage] != null) {
     objet.href = le_drapeau[i+decalage] + ".html" ;
     objet.target="contenu" ;
     objet.onclick = cliquage[i+decalage] ;
   } else {
     objet.href='#' ;
     objet.target="menu" ;
     objet.onclick = null ;
   }
  }
}


function maj_fleches() {
  if (decalage<=0) 
    document.img_moins.src="images/maquette/fleche_rien.png" ;
  else
    document.img_moins.src="images/maquette/fleche_h_"+couleur[no_cour]+".png" ;
 if (decalage >= nombre-nb_positions) 
   document.img_plus.src="images/maquette/fleche_rien.png" ;
  else
   document.img_plus.src="images/maquette/fleche_b_"+couleur[no_cour]+".png" ;
}

function monter() {
  if (decalage<=0) 
    return ;
  
  decalage-- ;
  maj_fleches() ;
  reafficher() ;
}


function descendre() {
 if (decalage >= nombre-nb_positions) 
   return ;
 
 decalage++ ;
 maj_fleches() ;
 reafficher() ;
}

function charger_page(drapeau) {
    try {    
	  parent.temoin.remplacer('vieillesse') ;
	}
    catch (err) {
    }
	var no = eval(drapeau) ;
//  parent.parent.titre.location.replace('titre_' + drapeau +'.html') ;
    try {    
  	  parent.parent.titre.remplacer_titre(titre[no], taille[no]) ;
	}
    catch (err) {
    }
	haut_debit = determiner_debit() ;
	if (haut_debit)
		changer_fond(no) ;
} ;



function changer_fond(no) {
var MSIE=navigator.userAgent.indexOf("MSIE");

try {
no_cour = no ;
var le_fond = "images/maquette/ssmenu"+le_drapeau[no]+".png" ;
var le_fond_ie = "images/maquette/ssmenu"+le_drapeau[no]+"-ie.png" ;
var la_couleur = "rgb"+eval(couleur[no]) ;

document.getElementById("img_cache").src = le_fond ;

document.getElementById("menu").style.color = la_couleur ;
document.getElementById("liste_menu").style.color = la_couleur ;


document.getElementById("entrees").style.background
  = "transparent url("+le_fond+") top left no-repeat" ;


if (typeof document.body.style.maxHeight != "undefined") {
  // IE 7, mozilla, safari, opera 9
document.getElementById("triangle").style.background
  = "transparent url("+le_fond+") top left no-repeat" ;
} else {
//document.getElementById("triangle").style.background = "transparent" ;
document.getElementById("triangle").style.filter = 
  "progid:DXImageTransform.Microsoft.AlphaImageLoader(src='"+le_fond_ie+"', sizingMethod='crop')" ;    
}
document.getElementById("triangle").style.backgroundPosition="0% -380px" ;

for (i=0 ; i<15 ; i++) {
  etiq = "entrees"+(i+1) ;
// Ceci perd du temps au chargement poru pas grand chose, semble-t-il  
//  document.getElementById(etiq).style.background
//    = "transparent url("+le_fond+") top left no-repeat" ;
  document.getElementById(etiq).style.backgroundImage = "none" ;
  document.getElementById(etiq).style.backgroundPosition
   ="0% -" + (30 + 20*i) + "px" ;

  au_dessus = 'document.getElementById("'+etiq+'").style.background \
    = "transparent url('+le_fond+') top left no-repeat" ; \
  document.getElementById("'+etiq+'").style.backgroundPosition\
    ="0% -' + (530 + 20*i) + 'px" ;' ;
  partir = 'document.getElementById("'+etiq+'").style.backgroundPosition\
    ="0% -' + (30 + 20*i) + 'px" ;' ;
  document.getElementById(etiq).onmouseover=new Function(au_dessus) ;
  document.getElementById(etiq).onmouseout=new Function(partir) ;

  document.getElementById(etiq).style.color = la_couleur ;
  
}

// Appel aux photos relief dans le site complet
if (document.getElementById("retour") != null) {
  document.getElementById("retour").style.background
    = "transparent url("+le_fond+") top left no-repeat" ;
  document.getElementById("retour").style.backgroundPosition="0% -360px  " ;
  
  au_dessus = 'document.getElementById("retour").style.background \
    = "transparent url('+le_fond+') top left no-repeat" ; \
  document.getElementById("retour").style.backgroundPosition\
    ="0% -860px  " ;' ;
  partir = 'document.getElementById("retour").style.backgroundPosition\
    ="0% -360px  " ;' ;
  document.getElementById("retour").onmouseover=new Function(au_dessus) ;
  document.getElementById("retour").onmouseout=new Function(partir) ;

  document.getElementById("retour").style.color = la_couleur ;
}


// Changement (éventuel) des couleurs des flèches
maj_fleches() ;
}
catch (err) {
alert(err) ;
}
return ;
}