//   Bonjour,
//
//   si vous pouvez lire ce texte, c'est que vous utilisez le navigateur 
//   Netscape 3 qui pose problème avec mon hébergeur www.home.ch.
//   
//   Dans ce cas, visitez plutôt le miroir du site à l'adresse
//   ---------------------------
//   http://d2denis.citeweb.net/
//   ---------------------------
//   
//   Hello,
//   
//   if you can see this text, you are using Netscape 3,
//   to surf my french site use 
//   ---------------------------
//   http://d2denis.citeweb.net/
//   ---------------------------
//   





// procédures générales de gestion de mes frames/pages
// DD 24.4.99
//alert ("macro1");
var papa=(parent.frames.length>2)

// détermine la location des pages à charger
// pour toujours avoir la chaîne complète

function lastof(chaine)
{
  var s = chaine.lastIndexOf('/');
  var t = chaine.lastIndexOf('\\');
  if (s>t) t=s;
  return t;
}

function entier(num)
{
  var i = 0
  var n = num / 1 + .001
// nb n = num + 0.001 multiplie num par 10 !!!
  while (i < n)
  {
     i++
  }
  return i-1;
}

//alert ("macro2");
function testpage (nompage, frame1, frame2)
{
//alert ("testpage " + nompage)
  var op1 = "parent.list1.location.href='" + parent.base_url + "l-" + frame1 +".html';";
  var op2 = "parent.list2.location.href='" + parent.base_url + "l2-" + frame2 +".html';";
//alert("papa=" + papa);
  if (papa)
  {
    setTimeout(op1, 1500);
    // sans l'appel setTimeout Netscape3 plante joliement !!!
    setTimeout(op2, 3000);
//alert("op2="+op2)
//alert("location="+document.location)
	var xxx = "" + document.location;
//alert ("test4= " + xxx )
	var idx = xxx.indexOf("denisdumoulin")
//alert("indexOf="+idx)
	if (idx < 0)
	{
	      var my_url = "" + document.location + "index.html" ;
	      var pos = my_url.indexOf(nompage);
//alert ("Cherche " + nompage + " dans " + my_url + " = " + pos);
	      if (pos>0)
      	{
        	  var base_url= "http://www.DenisDumoulin.net/" + "index.html?" + nompage;
//alert ("NEWLOCATION2= " + base_url);
        	  parent.location.href = base_url ;
      	}
	}
    parent.addpage(nompage);
    self.focus();
  }
  else
  {
//alert ("actif= " + parent.actif)
var test = (parent.actif == null);
//alert ("test="+test)
    if (parent.actif == null || parent.actif != 3)
    {
      // trouve les sous dossiers
      var my_url = "" + document.location + "index.html" ;
      var pos = my_url.indexOf(nompage);
//alert ("Cherche " + nompage + " dans " + my_url + " = " + pos);
      if (pos>0)
      {
        var base_url= "http://www.DenisDumoulin.net/" + "index.html?" + nompage;
//alert ("NEWLOCATION2= " + base_url);
        location.href = base_url ;
      }
      else
      {
         alert("page inconnue");
      }
    }
    if (parent.actif != null && parent.actif == 3)
    {
      var ima = '<a href="' + parent.base_url + 'index.html?3' + nompage +'" target="_top">';
      ima += '<img src="' + parent.base_url + 'frames.gif" alt="Frames" border="0" width="48" height="17"></a>';
      document.write(ima);
    }
  }
}

//alert ("macro3");
function getCookieVal (offset) {
  var endstr = document.cookie.indexOf (";", offset);
  if (endstr == -1) endstr = document.cookie.length;
  return unescape(document.cookie.substring(offset, endstr));
}

function GetCookie (name) 
{
  var arg = name + "=";
  var alen = arg.length;
  var clen = document.cookie.length;
  var i = 0;

  while (i < clen) 
  {
    var j = i + alen;
    if (document.cookie.substring(i, j) == arg)
       return getCookieVal (j);
    i = document.cookie.indexOf(" ", i) + 1;
    if (i == 0) break;
  }
  return 0;
}

function SetCookie (name, value) 
{
  var argv = SetCookie.arguments;
  var argc = SetCookie.arguments.length;
  var expires = (argc > 2) ? argv[2] : null;
  var path = (argc > 3) ? argv[3] : null;
  var domain = (argc > 4) ? argv[4] : null;
  var secure = (argc > 5) ? argv[5] : false;
  var c = name + "=" + escape (value) +
          ((expires == null) ? "" : ("; expires=" +
          expires.toGMTString())) +
          ((path == null) ? "" : ("; path=" + path)) +
          ((domain == null) ? "" : ("; domain=" + domain)) +
          ((secure == true) ? "; secure" : "");
  document.cookie = c;
}

function nopermis(ram)
{
  alert ("En attente de l'autorisation d'EMI");
}

var ok = true;
//alert ("macro.js chargé " + ok);
