/*
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]="(banknote(s)?|security)(.*)?\.html@banknotes.html@Banknotes@|";
pav[1]="ccoins(.*)?\.html@ccoins.html@Circulations Coins@|";
pav[2]="(coins(.*)?|commemorative)\.html@commemorative.html@Collector (commemorative) Coins@|";
pav[3]="purchase.html@purchase.html@How to Obtain Banknotes and Coins@<br>";
pav[4]="casch.html@casch.html@Cash Offices of the Bank of Lithuania@|";
pav[5]="distributor.html@distributor.html@Official distributors of Lithuanian numismatic valuables@<br>";
pav[6]="exchange.html@exchange.html@Currency Withdrawn from Circulation and Its Exchange@|";
pav[7]="(unfit|damage|rules)\.html@unfit.html@Worn Out and Unfit Banknotes and Coins and Their Exchange@<br>";
pav[8]="(use_images|resolution_41)\.html@use_images.html@Use of images of banknotes and coins@&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;
}