function ifTopFrame_old()
{

if (self==top)
   {
document.write('<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="600" id="AutoNumber1" bgcolor="#66FF33"><tr><td align="center"><br><b><font face="Arial">DE RIJNLANDSE WERELD</font></b><br>');
document.write('<font face="Arial" size="2">Klik op de pijlen om de links te volgen. Meer analyses en visies, en het menu, via site home&nbsp;');
document.write('<a href="http://www.rijnlandmodel.nl/">');
document.write('<img border="0" src="http://www.rijnlandmodel.nl/images/linkright_tr.gif"></a> . <br>&nbsp;</font></td></tr></table>');
   }
}

function ifTopFrame()
{
var u = document.URL;
var v = FindSubject();
if (self==top)
   {
document.write('<table border="0" height="70" cellpadding="0" cellspacing="0" width="600" style="border-style: solid; border-width: 2px" bordercolor="#000080" background="http://www.rijnlandmodel.nl/images/banner_noframe.jpg">');
document.write('<tr><td align="center"><font face="Arial" size="2" color="#000080">Artikel uit:</font></td></tr>');
document.write('<tr><td align="center"><b><font face="Arial" color="#000080" size="5">RIJNLANDMODEL</font></b></td></tr>');
document.write('<tr><td align="center"><font face="Arial" size="2" color="#000080">klik op de pijlen om de links te volgen; artikel + menu hier&nbsp;');
document.write('<a href="http://www.rijnlandmodel.nl/frames_hom.htm?', u, '&1&2">');
document.write('<img border="0" src="http://www.rijnlandmodel.nl/images/linkright_bl_13_banner.gif" align="absbottom" width="12" height="14"></a> , artikel + sitemap hier:&nbsp;');
document.write('<a href="http://www.rijnlandmodel.nl/frames_nav.htm?', u, '&1&', v, '"><img border="0" src="http://www.rijnlandmodel.nl/images/linkright_bl_13.gif" width="12" height="14" align="absbottom"></a> . ');
document.write('</font></td></tr></table>');
   }
}

function ifTopFrameTest()
{
var u = document.URL;
var v = FindSubject();
if (self==top)
   {
document.write('<table border="0" height="70" cellpadding="2" cellspacing="0" width="600" bgcolor="#0000FF"><tr><td align="center"><font face="Arial" size="2" color="#FFFFFF">Artikel uit:</font></td></tr>');
document.write('<tr><td align="center" valign="bottom"><b><font face="Arial" color="#FFFFFF">RIJNLANDMODEL</font></b></td></tr>');
document.write('<tr><td align="center" valign="top"><font face="Arial" size="2" color="#FFFFFF">klik op de pijlen om de links te volgen; artikel + menu hier&nbsp;');
document.write('<a href="http://www.rijnlandmodel.nl/frames_hom.htm?', u, '&1&2">');
document.write('<img border="0" src="http://www.rijnlandmodel.nl/images/linkright_tr_banner.gif"></a> , ');
document.write('artikel + sitemap hier:&nbsp\;<a href="http://www.rijnlandmodel.nl/frames_nav.htm?', u, '&1&', v, '">');
document.write('<img border="0" src="http://www.rijnlandmodel.nl/images/linkright_tr.gif"></a> . ');
document.write('</font></td></tr></table>');
setTimeout("alert('Hello')",1000);
   }
}

//  Ter vervanging van oude ifTopFrameNav(); identiek aan ifTopFrame()

function ifTopFrameNav()
{
var u = document.URL;
var v = FindSubject();
if (self==top)
   {
document.write('<table border="0" height="70" cellpadding="0" cellspacing="0" width="600" style="border-style: solid; border-width: 2px" bordercolor="#000080" background="http://www.rijnlandmodel.nl/images/banner_noframe.jpg">');
document.write('<tr><td align="center"><font face="Arial" size="2" color="#000080">Artikel uit:</font></td></tr>');
document.write('<tr><td align="center"><b><font face="Arial" color="#000080" size="5">RIJNLANDMODEL</font></b></td></tr>');
document.write('<tr><td align="center"><font face="Arial" size="2" color="#000080">klik op de pijlen om de links te volgen; artikel + menu hier&nbsp;');
document.write('<a href="http://www.rijnlandmodel.nl/frames_hom.htm?', u, '&1&2">');
document.write('<img border="0" src="http://www.rijnlandmodel.nl/images/linkright_bl_13_banner.gif" align="absbottom" width="12" height="14"></a> , artikel + sitemap hier:&nbsp;');
document.write('<a href="http://www.rijnlandmodel.nl/frames_nav.htm?', u, '&1&', v, '"><img border="0" src="http://www.rijnlandmodel.nl/images/linkright_bl_13.gif" width="12" height="14" align="absbottom"></a> . ');
document.write('</font></td></tr></table>');
   }
}

function ifTopFrameEng()
{
var u = document.URL;
var v = FindSubject();
if (self==top)
   {
document.write('<table border="0" height="70" cellpadding="0" cellspacing="0" width="600" style="border-style: solid; border-width: 2px" bordercolor="#000080" background="http://www.rijnlandmodel.nl/images/banner_noframe.jpg">');
document.write('<tr><td align="center"><font face="Arial" size="2" color="#000080">Article from:</font></td></tr>');
document.write('<tr><td align="center"><b><font face="Arial" color="#000080" size="5">GENERAL SEMANTICS & RHINELAND MODEL</font></b></td></tr>');
document.write('<tr><td align="center"><font face="Arial" size="2" color="#000080">Click on the arrows to follow the links; article + menu here&nbsp;');
document.write('<a href="http://www.rijnlandmodel.nl/english/frames_hom.htm?', u, '&1&2">');
document.write('<img border="0" src="http://www.rijnlandmodel.nl/images/linkright_bl_13_banner.gif" align="absbottom" width="12" height="14"></a> , article + sitemap here:&nbsp;');
document.write('<a href="http://www.rijnlandmodel.nl/english/frames_nav.htm?', u, '&1&', v, '"><img border="0" src="http://www.rijnlandmodel.nl/images/linkright_bl_13.gif" width="12" height="14" align="absbottom"></a> . ');
document.write('</font></td></tr></table>');
   }
}

function ifTopFrameBy()
{
var u = document.URL;
var v = FindSubject();
if (self==top)
   {
document.write('<table border="0" height="70" cellpadding="2" cellspacing="0" width="600" bgcolor="#0000FF"><tr><td align="center"><font face="Arial" size="2" color="#FFFFFF">Artikel van:</font></td></tr>');
document.write('<tr><td align="center" valign="bottom"><b><font face="Arial" color="#FFFFFF">RATIONELE &nbsp;POLITIEK &nbsp;/ &nbsp;RIJNLANDSE &nbsp;WERELD</font></b></td></tr>');
document.write('<tr><td align="center" valign="top"><font face="Arial" size="2" color="#FFFFFF">klik op de pijlen om de links te volgen; artikel + menu hier&nbsp;');
document.write('<a href="http://www.rijnlandmodel.nl/frames_menu.htm?', u, '&1&2">');
document.write('<img border="0" src="http://www.rijnlandmodel.nl/images/linkup_tr.gif" width="11" height="9"></a> , ');
document.write('artikel + sitemap hier:&nbsp\;<a href="http://www.rijnlandmodel.nl/frames_nav.htm?', u, '&1&', v, '">');
document.write('<img border="0" src="http://www.rijnlandmodel.nl/images/linkup_tr.gif" width="11" height="9"></a> . ');
document.write('</font></td></tr></table>');
   }
}


function ifTopFrameNav_old()
{
var v = FindSubject();
var u = document.URL;
// document.write(u);
// document.write(v);

if (self==top)
   {
document.write('<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="600" id="AutoNumber1" bgcolor="#0000FF"><tr><td align="center"><br><b><font face="Arial">DE RIJNLANDSE WERELD</font></b><br>');
document.write('<font face="Arial" size="2">Klik op de pijlen om de links te volgen;  Menu en site home hier&nbsp\;');
document.write('<a href="http://www.rijnlandmodel.nl/">');
document.write('<img border="0" src="http://www.rijnlandmodel.nl/images/linkup.gif" width="11" height="9"></a> , ');
document.write('artikel + sitemap hier:&nbsp\;<a href="http://www.rijnlandmodel.nl/frames_nav.htm?', u, '&1&', v, '">');
document.write('<img border="0" src="http://www.rijnlandmodel.nl/images/linkup.gif" width="11" height="9"></a> . ');
document.write('<br>&nbsp\;</font></td></tr></table>');
   }
}

function PopupNews()
{
// setTimeout("window.open('/actueel/lucia-de-b-vrij.htm','popup','width=620,height=840,status=no,location=no,titlebar=no,toolbar=no,menubar=no,screenX=0,screenY=0'); return false",1000);
setTimeout("window.open('/actueel/marcouch-orthodoxie.htm','popup','width=630,height=840,status=no,location=no,titlebar=no,toolbar=no,menubar=no,scrollbars=yes,screenX=0,screenY=0'); return false",1000);
}

//  FindSubject vindt het onderwerp van het artikel door in de hele location string van 
//  de naam van de verschillende folders te zoeken. De location string heeft de, lange, vorm
//  http://www.rat ...  frames_nav.htm?http://www.rat ... <pagina>&<framenummmer>&<navnummer>


function FindSubject()
{

var navi = "1";

if (self==top)
   {
    var str = document.URL;
}
else
   {
    var str = parent.frames.main.document.URL;
}

var testname = str.search("algemeen/");
if (testname > -1){
       navi = "1";
    }

testname = str.search("/psychologie");
 if (testname > -1){
    var testnamesub = str.search("_b_");
    if (testnamesub > -1){
       navi = "6";
       }
    else {
       navi = "2";
       }
    }
   
testname = str.search("sociologie");
   if (testname > -1){
      navi = "3";
   }

testname = str.search("economie");
   if (testname > -1){
      navi = "4";
   }

testname = str.search("allochtonen");
   if (testname > -1){
      navi = "5";
   }

testname = str.search("politiek/");
   if (testname > -1){
      navi = "7";
   }

testname = str.search("media/");
   if (testname > -1){
      navi = "8";
   }

testname = str.search("alternatieven/rijnland");
   if (testname > -1){
      navi = "9";
   }
testname = str.search("modellen/rijnland");
   if (testname > -1){
      navi = "9";
   }
testname = str.search("programma/");
   if (testname > -1){
      navi = "9";
   }
     
testname = str.search("wetenschap/");
   if (testname > -1){
      navi = "10";
   }

testname = str.search("alternatieven/anglicisme");
   if (testname > -1){
      navi = "11";
   }
testname = str.search("modellen/anglicisme");
   if (testname > -1){
      navi = "11";
   }
   
testname = str.search("algemene_semantiek/");
   if (testname > -1){
      navi = "12";
   }
      

return navi;
}

function FindSubjectEng()
{

var navi = "1";

if (self==top)
   {
    var str = document.URL;
}
else
   {
    var str = parent.frames.main.document.URL;
}

var testname = str.search("algemeen/");
if (testname > -1){
       navi = "1";
    }

testname = str.search("psychology/");
 if (testname > -1){
    var testnamesub = str.search("_b_");
    if (testnamesub > -1){
       navi = "6";
       }
    else {
       navi = "2";
       }
    }
   
testname = str.search("sociology/");
   if (testname > -1){
      navi = "3";
   }

testname = str.search("economy/");
   if (testname > -1){
      navi = "4";
   }

testname = str.search("allochtonen");
   if (testname > -1){
      navi = "5";
   }

testname = str.search("politics/");
   if (testname > -1){
      navi = "7";
   }

testname = str.search("media/");
   if (testname > -1){
      navi = "8";
   }

testname = str.search("models/rhineland");
   if (testname > -1){
      navi = "9";
   }

testname = str.search("program/");
   if (testname > -1){
      navi = "9";
   }
     
testname = str.search("science/");
   if (testname > -1){
      navi = "10";
   }

testname = str.search("models/anglicism");
   if (testname > -1){
      navi = "11";
   }

testname = str.search("general_semantics/");
   if (testname > -1){
      navi = "12";
   }
return navi;
}

//  CellBorder omringt de cell met een border afhankelijk van 
//  de pagina waarvan gelinkt wordt, de referrer. De functie krijgt 
//  de naam via name doorgegeven van de oproep door de cell, en 
//  zoekt de naam in de referrer pagina.


function CellBorder(name)
{
var htm = "<td width=\"70\" align=\"center\" bgcolor=\"#FFFF00\">";

var ref = document.referrer;
var posslash = 0
do 
  {
   posslash = ref.indexOf("/");
   ref = ref.substring(posslash + 1);
  }
while(posslash > -1)
  
var posdot = ref.indexOf(".");
ref = ref.substring(0, posdot);

if (ref == name){
   htm = "<td style=\"border: 2px solid #00FF00\" width=\"70\" align=\"center\" bgcolor=\"#FFFF00\">";
   }
else
   {
   var testname = ref.search(name);
   if (testname > -1){
      htm = "<td style=\"border: 2px dashed #00FF00\" width=\"70\" align=\"center\" bgcolor=\"#FFFF00\">";
   }
}      

return htm;
}


//  Idem als cellBorder; niet gebruikt

function CellFont(name)
{

var htm2 = "<font size=\"1\" face=\"Arial\">";
var ref = document.referrer;

do 
  {
   var posslash = ref.indexOf("/");
   ref = ref.substring(posslash + 1);
  }
while(posslash > -1)
  
var posdot = ref.indexOf(".");
ref = ref.substring(0, posdot);

if (ref == name){
   htm2 = "<font size=\"1\" face=\"Arial\" color=\"#00FF00\">";
   }

return htm2;
}


//  Samenvatting van script van XXX in een enkele functie, met toevoeging dat 
//  de keuze van de navigatiepagina doorgegeven kan worden in plaats van 
//  uit de location gezocht. Versie voor los document (self == top; na Google) en in frameset. 

function GoNav(subj)
{

if (subj > 0 && subj < 11){
    var v = subj;
    }
else{
    var v = FindSubject();
    }

if (self==top)
   {
    var doc = document.URL;
    void(window.location='http://www.rijnlandmodel.nl/frames_nav.htm?' + doc + '&1&' + v);
   }
else
   {
    var doc = parent.frames.main.document.URL;
    void(parent.location.href='http://www.rijnlandmodel.nl/frames_nav.htm?' + doc + '&1&' + v);
   }

}