version_js   ="2001/02/21";
lien_ajout= new Array ('Pour ajouter un ','lien</a> ou une ','rubrique</a> dans ');
haut_page="<table border=1 width=100% heigh='80%'><tr><td width=80><center><a href='index.html'><img src='fonds/tourbi.gif' border=0></a></center></td><td align=center>";
bas_page="</td></tr></table>";


function debut()
{
ouvre(1);
urldici      = top.document.location.href;
if (urldici.lastIndexOf("?")>7) ouvre(urldici.substring(urldici.lastIndexOf("?")+1,urldici.length));
else  ouvre(0);
}


function ouvre(rubrique)
{
nombre_liens=0;
a_ecrire="";
n=0;
for (j=0; j<liens_fr_total; j++)
if (rubrique==fr[j][1])
   {
    a_ecrire=a_ecrire+"<sub>" + fr[j][0] +"</td></tr><tr><td><b>Liens propos&eacute;s ("+liens_fr_total+")</b></td><td>";
    texte_lien_ajout='' +lien_ajout[0] +'<b><a href="links/index.html?'+fr[j][1] +'"></b>'+lien_ajout[1]+'<b><a href="links/documentation_titre.html?'+fr[j][1] +'"></b>'+lien_ajout[2] +'</a><b>' +fr[j][0] +'</b>';
   }
a_ecrire=a_ecrire+"<table border=0><tr valign=top align=left><td><ul>";
n=1;
for (j=0; j<liens_fr_total; j++)
    {
    if ((Math.round(n/10)-n/10)==0) a_ecrire=a_ecrire+"</ul></td><td><ul>";
    if (rubrique==fr[j][2] && !isNaN(fr[j][1]))
           {
             a_ecrire=a_ecrire+'<li><a href="javascript:ouvre(' + fr[j][1]+');">' + fr[j][0] +'</a><br></li>';
             n=n+1;
           }
    }
a_ecrire=a_ecrire+"</ul></td></tr></table><hr>";
n=0;
a_ecrire=a_ecrire+"<table><tr valign=top><td><ul>";
for (j=0; j<liens_fr_total; j++)
          {
           if (rubrique==fr[j][2] && isNaN(fr[j][1]))
              {
    if ((Math.round(n/10)-n/10)==0) a_ecrire=a_ecrire+"</ul></td><td><ul>";
              a_ecrire=a_ecrire+'<li><a href="' + fr[j][1]+'">' + fr[j][0] +'</a></li>';
              n=n+1;
              }
          }
a_ecrire=a_ecrire+"</ul></td></tr></table>";
//recherche du père
for (j=0; j<liens_fr_total; j++)
if (fr[j][1]==rubrique) no_papa=j;

for (j=0; j<liens_fr_total; j++)
if (fr[no_papa][2]==fr[j][1]) papa=j;
a_ecrire=haut_page+'<h3><a href="javascript:ouvre(' +fr[papa][1]+')">' +fr[papa][0]+'</a><sub> ==== >' +a_ecrire +bas_page;

if (document.layers)
  {
document.layers.textebis.document.write(a_ecrire)
document.layers.textebis.document.close();  }
  else if (document.all)
          {
          textebis.innerHTML=a_ecrire;
          }
if(rubrique==0)  texte_lien_ajout="";
if (document.layers)
  {
  document.layers.ajout.document.write(texte_lien_ajout)
  document.layers.ajout.document.close();
  }
  else if (document.all)
          {
          ajout.innerHTML=texte_lien_ajout;
          }
}


function ecrit()
{
urldici= window.location.href;
posx = urldici.indexOf("?");
if (posx<4) adressetarget="";
       else adressetarget=urldici.substring(posx+1,urldici.length);
ok=true;
  if (posx>4)
            {
             if (adressetarget=="askname")
                                {
                                 qui=prompt("Indiquez votre nom (entreprise), Merci !","");
                                 document.sendsms.Message.value='Lu par: ' +qui;
                                 if (qui.lenght<3) 
                                       {
                                        parent.location.href="http://www.suisu.com/doxarve/fond.html";
                                        ok=false;
                                       }
                                 }
                           else   document.sendsms.Message.value=adressetarget;
             if (ok) document.sendsms.submit();
             }
}
var supportsKeys = false
function tick() {
		calcCharLeft(document.forms[0])
		if (!supportsKeys) timerID = setTimeout("tick()",500)
}

function favChange(rnum) {
	f = document.newMsg;
	
	if (f.favs.selectedIndex >=0) {
		f.msgTo.value = f.favs.options[f.favs.selectedIndex].value
	}

	if (f.favs.selectedIndex > 0 && f.favs.selectedIndex <= rnum + 1) {
		f.TEXT.focus();
	} else {
		f.msgTo.focus();
	}
}
function calcCharLeft(f) {
		lenUSig = f.lenSSig.value
		maxLength = 160 - f.lenSysSig.value - lenUSig
        if (f.TEXT.value.length > maxLength) {
	        f.TEXT.value = f.TEXT.value.substring(0,maxLength)
		    charleft = 0
        } else {
			charleft = maxLength - f.TEXT.value.length
		}

        f.msgCL.value = charleft
}

function textKey(f) {
	supportsKeys = true
	calcCharLeft(f)
}

function getStatus() {
	f = document.newMsg
	window.location = 'sms.asp'
}


function numEscape(num) {
	newnum = ''
	for (i=0; i < num.length; i++) {
		if (num.charAt(i) == ' ') continue;
		newnum = newnum + num.charAt(i)
	}
	num = escape(newnum);
	newnum = ''
	for (i=0; i < num.length; i++) {
		if (num.charAt(i) == '+') {
			newnum = newnum + '%2B'
			continue
		}
		newnum = newnum + num.charAt(i)
	}
	return newnum
}
function signature(niveau) 
//Dessine une barre avec le logo Pexam-vide !
{
if (niveau==0)
  document.write(haut_page+'<HR WIDTH="100%" color="orange"><DIV ALIGN=right>' +document.lastModified+'<A HREF="pexam/index.html"><IMG SRC="fonds/rien.gif" name="pexam" ALT="Production : PEXAM image-informatique"  BORDER=0 HEIGHT=40 WIDTH=175></A>');
else document.write(document.lastModified+'&nbsp;<HR WIDTH="100%" color="orange"><DIV ALIGN=right><A HREF="../pexam/index.html"><IMG SRC="../fonds/rien.gif" name="pexam" ALT="Production : PEXAM image-informatique"  BORDER=0 HEIGHT=40 WIDTH=175></A>');
}

function test() 
//
{
alert("test");
}

function showpexam() 
//remplace l'image.pexam en logo pexam
{
if (document.images) document["pexam"].src= "../fonds/atpexam.gif";
}


function changeima(racine,imactuelle,imatotale)
//imactuelle et  imatotale doivent être définies à la source
{

if (document.images)
   {
   imaname=racine+imactuelle+".jpg"
   document['ima'].src =imaname;


   }
//
}