/*
Dinaminė navigacinė juosta skirta puslapio 'banknotai ir monetos' meniu atvaizdavimui
masyvo "pav" - elementai: failo vardo šablonas, failo vardas nesutapimo atveju, nuorodos pavadinimo dalis, atskirėjas (atskirti "@")
kintamasis pav1 - išskaidyta masyvo "pav" eilutė
kintamasis re - regular expression objektas
kintamasis arr - išparsintas regular expression objektas
kintamasis tst - rodomo naršyklėje failo kelias serveryje
kintamasis fil - išskaidytas kintamasis "tst"
kintamasis vrd - ištrauktas failo vardas iš "fil"
Jei "vrd" ir "arr[0]" kintamieji lygus, tai atitinkamo failo nuoroda navigacinėje juostoje tampa neaktyvi
*/
function rasyti() {
var txt="";
var pav=new Array();
var tst=document.location.pathname;
//skirtukas "/"
var fil=tst.split("/");
var vrd=fil[fil.length-1];
//skirtukas "@"
pav[0]="(banknota(i|s)|apsauga)(.*)?\.html@banknotai.html@Banknotai@|";
pav[1]="(monetos|rinkinys9)(.*)?\.html@monetos.html@Apyvartinės monetos@|";
pav[2]="progin(es|iai)(.*)?\.html@proginiai.html@Kolekcinės (proginės) monetos@|";
pav[3]="(kurimas.html|eurai.html)@kurimas.html@Monetų kūrimas@|";
pav[4]="isigijimas.html@isigijimas.html@Banknotų ir monetų įsigijimas@<br>";
pav[5]="kasa.html@kasa.html@Lietuvos banko kasos@|";
pav[6]="platintojai.html@platintojai.html@Oficialūs lietuviškų numizmatinių vertybių platintojai@|";
pav[7]="keitimas.html@keitimas.html@Išimti iš apyvartos pinigai ir jų keitimas@<br>";
pav[8]="(sugadinti.html|dazai.html)@sugadinti.html@Susidėvėję ir sugadinti pinigai bei jų keitimas@|";
pav[9]="atvaizdas.html@atvaizdas.html@Banknotų ir monetų atvaizdų naudojimas@&nbsp;";
for (var i=0; i<pav.length; i++) {
  var pav1=pav[i].split("@");
  var re=new RegExp(pav1[0]);
  var arr=re.exec(vrd);
  if (arr) {
    if (pav1[2] != "#")
    (vrd==arr[0]) ? txt += '<b>' + pav1[2] + '</b> ' + pav1[3] + ' ' :
    txt += '<a href="' + pav1[1] + '">' + pav1[2] + '</a> ' + pav1[3] + ' ';
  }
  else {
    if (pav1[1] != "#")
    txt += '<a href="' + pav1[1] + '">' + pav1[2] + '</a> ' + pav1[3] + ' ';
  }
}
document.getElementById('n1').innerHTML=txt;
}