function ES_meni_dodajScript(Element){
/************************************************************
Ta funkcija doda script, ki simulira hover. Kličemo jo lahko 
iz dogodka onLoad

Parametri: 
- Element: table

Pričakuje standardno strukturo tabele: table->tbody->tr->td
Če je v td-ju kakůen a, potem td-ju doda dva eventa, 
onMouseOver in onMouseOut.
Oba operirata s slogi. Prvi doda imenu sloga "-hover", drugi 
pa ga vzame stran - vrne slog td-ja na staro vrednost.
Če v td-ju ni nobenega a-ja, potem eventov ne doda.

Avtor: Martin Trampuů, E-soft, 2005
*************************************************************/
	if (Element) {
		var Tbdy,Tr,Td,Ah
		if(Element.childNodes[1]){
			//mozzila
			if(Element.childNodes[1].nodeName=="TBODY") {Tbdy=Element.childNodes[1]} else {Tbdy=false};
		} else {
			//IE
			if(Element.childNodes[0].nodeName=="TBODY") {Tbdy=Element.childNodes[0]} else {Tbdy=false};
		}
		if (Tbdy) {
			for (i=0; i<Tbdy.childNodes.length; i++) {
				Tr = Tbdy.childNodes[i]; //to je zato, ker je struktura TABLE > TBODY > TR > TD
				if (Tr.nodeName=="TR"||Tr.nodeName=="tr") {
					for (j=0; j<Tr.childNodes.length; j++) {
						Td = Tr.childNodes[j]; //to je zato, ker je struktura TABLE > TBODY > TR > TD
						if (Td.nodeName=="TD"||Td.nodeName=="td") {
							OK=false
							for (k=0; k<Td.childNodes.length && !OK; k++) {
								Ah = Td.childNodes[k];
								OK=Ah.nodeName=="A"||Ah.nodeName=="a"
							}
							if(OK) {
//								Td.onmouseover=function() {ES_meni_onMouseOver(this);}
//								Td.onmouseout=function() {ES_meni_onMouseOut(this);}
								Td.onmouseover=function() {if(!this.oldClass){this.oldClass=this.className;this.className+='-hover';}}
								Td.onmouseout=function() {if(this.oldClass){this.className=this.oldClass;this.oldClass=''}}
							}
						}//if Td="td"
					}//for TD in TR
				}//if Tr="tr"
			}//for TR in TBODY
		}//if Tbdy
	} else {alert("No TBODY!")}
}
/*
// alternativni funkciji - glej komentarje v zgornji funkciji

function ES_meni_onMouseOver(Element){
	if(!Element.oldClass){Element.oldClass=Element.className;Element.className+='-hover';}
	return false;
}
function ES_meni_onMouseOut(Element){
	if(Element.oldClass){Element.className=Element.oldClass;Element.oldClass=''}
	return false;
}*/


/************************************************************
Spodnje funkcije se uporabljajo pri vrstičnem grafičnem meniju
*************************************************************/
function ImgPreload() {
	if(!document.ImgPrl) document.ImgPrl=new Array();
	var x;
	var l=document.ImgPrl.length;
	var args=ImgPreload.arguments;
	for(x=0; x<args.length; x++) {
	  document.ImgPrl[l]=new Image; 
	  document.ImgPrl[l++].src=args[x];
	}
	return true;
}

function ImgSwap(ImgName,SwapSrc) { 
  var Img;
     if ((Img=ObjFind(ImgName))!=null){
		 if(!Img.SwapSrc) Img.SwapSrc=Img.src; 
		 Img.src=SwapSrc;
	     document.SwapedImg=Img; 
	 }
	return true;
}

function ImgRestore() { 
	if(document.SwapedImg) {
	  document.SwapedImg.src=document.SwapedImg.SwapSrc
	}
	return true;
}

function ObjFind(Name, Loc) { 
  var pos;
  var i;
  var O;  
  if(!Loc) Loc=document; 
  if((pos=Name.indexOf("?"))>0 && parent.frames.length) {
    Loc=parent.frames[Name.substring(pos+1)].document; 
	Name=Name.substring(0,pos);
  }
  if(!(O=Loc[Name]) && Loc.all) O=Loc.all[Name]; 
  for(i=0; !O && i<Loc.forms.length; i++) O=Loc.forms[i][Name];
  for(i=0; !O && Loc.layers && i<Loc.layers.length; i++) O=ObjFind(Name,Loc.layers[i].document);
  if(!O && Loc.getElementById) O=Loc.getElementById(Name); 
  return O;
}
 
function NewWindow(a, w, h)
	{
    	var winl = (screen.width - w) / 2;
    	var wint = (screen.height - h) / 2;
		window.open(a,
					'',
					'toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=1,resizable=0,width='+w+',height='+h+',top='+wint+',left='+winl+'');
	};