///////////// BGN RASTI NARSYKLES TIPA 1 /////////////
// ../si_funkcija_t.p._yra_faile: h i s t o r y / m e n u b a r . j s

function narsyklestipas() {
	brow_kitas=true;
	agt=navigator.userAgent.toLowerCase();
	brow_ie=false;
	brow_ie4=false;
	brow_ie5=false;
	brow_op5=false;
	brow_konq=false;
	if (typeof document.all!="undefined"&&(agt.indexOf('msie')!=-1)) {
		brow_ie=true; brow_ie4=true; brow_kitas=false;
		if (agt.indexOf('msie 4')==-1) { brow_ie5=true; brow_ie4=false; }
		if (agt.indexOf('opera')!=-1) { brow_ie=false; brow_ie4=false; brow_ie5=false; brow_op5=true; }
		}
	brow_ns6=false;
	brow_mz7=false;
	if (typeof document.getElementById!="undefined"&&!brow_ie) {
		brow_ns6=true; brow_kitas=false;
		if (agt.indexOf('netscape6')==-1) { brow_ns6=false; brow_mz7=true; }
		if (typeof window.opera!="undefined") { brow_mz7=false; brow_op5=true;}
			else if (agt.indexOf('gecko')==-1) { brow_mz7=false; brow_kitas=true; }
			}
	if (agt.indexOf('opera 4')!=-1) { brow_op5=false; brow_mz7=false; brow_kitas=true; }
	brow_ns4=false;
	if ((agt.indexOf('mozilla')!=-1)&&(parseInt(navigator.appVersion)>=4)&&!brow_ie&&!brow_op5&&!brow_ns6&&!brow_mz7) {
		brow_ns4=true; brow_kitas=false;
		}
	if (agt.indexOf('webtv')!=-1) { brow_ie=false; brow_ie4=false; brow_kitas=true; }
	win=false;
	mac=false;
	lin=false;
	if (agt.indexOf('win')!=-1) { win=true; mac=false; lin=false; }
		else if (agt.indexOf('mac')!=-1) { win=false; mac=true; lin=false; }
		else { win=false; mac=false; lin=true; }

	//djochange - added the following code to find Konqueror
	if (typeof navigator.vendor!="undefined"){
		if (navigator.vendor =="KDE") {
			brow_ie=false;
			brow_ie4=false;
			brow_ie5=false;
			brow_konq = true;
			brow_ns6=true;
			brow_ns4 = false;
			brow_kitas = false;
			// exclude earlier than kde2.2
			thisKDE=agt;
			splitKDE=thisKDE.split("konqueror/");
			aKDE=splitKDE[1].split("; ");
			KDEn=parseFloat(aKDE[0]);
			oldKde=false;
			if(KDEn<2.2){oldKde=true;brow_kitas=true;brow_ns6=false;brow_konq=false;}
			}
		}
	//end djochange

	// differentiate between opera 5 and 6
	brow_op6=false;
	if(brow_op5){
		if((agt.indexOf("opera 6")!=-1)||(agt.indexOf("opera/6")!=-1)){brow_op6=true;brow_op5=false;}
		}

	// find brow_ie6
	brow_ie6=false;
	if(brow_ie5&&agt.indexOf("msie 6")!=-1) { brow_ie6=true; }
	}

///////////// END RASTI NARSYKLES TIPA 1 /////////////


///////////// BGN RASTI NARSYKLES TIPA 2 /////////////

function whichBrs() {
var agt=navigator.userAgent.toLowerCase();
if (agt.indexOf("opera") != -1) return 'Opera';
if (agt.indexOf("staroffice") != -1) return 'Star Office';
if (agt.indexOf("beonex") != -1) return 'Beonex';
if (agt.indexOf("chimera") != -1) return 'Chimera';
if (agt.indexOf("netpositive") != -1) return 'NetPositive';
if (agt.indexOf("phoenix") != -1) return 'Phoenix';
if (agt.indexOf("firefox/1.5") != -1) return 'Firefox 1.5';
if (agt.indexOf("firefox/2.0") != -1) return 'Firefox 2.0';
if (agt.indexOf("firefox") != -1) return 'Firefox';
if (agt.indexOf("safari") != -1) return 'Safari';
if (agt.indexOf("skipstone") != -1) return 'SkipStone';
if (agt.indexOf("msie") != -1) return 'Internet Explorer';
if (agt.indexOf("netscape") != -1) return 'Netscape';
if (agt.indexOf("mozilla/5.0") != -1) return 'Mozilla';
if (agt.indexOf('\/') != -1) {
if (agt.substr(0,agt.indexOf('\/')) != 'mozilla') {
return navigator.userAgent.substr(0,agt.indexOf('\/'));}
else return 'Netscape';} else if (agt.indexOf(' ') != -1)
return navigator.userAgent.substr(0,agt.indexOf(' '));
else return navigator.userAgent;
}

///////////// END RASTI NARSYKLES TIPA 2 /////////////



function buttonAtgal() {
	brwsr=whichBrs();
	if (brwsr.indexOf("Firefox") != -1) { var histolength=history.length-1; } else { var histolength=history.length; }
	if ( histolength > 0 ) {
		document.write('<form name="form1" class=noprint><input type="button" value="');
		leo('ATGAL','BACK','REEN');
		document.write('" onmouseup="history.back()"></form>');
		} else {
		document.write('<form name="form1" class=noprint><input type="button" value="');
		leo('U&#381;DARYTI','CLOSE','FERMI');
		document.write('" onmouseup="window.close()"></form>');
		};
	};

function buttonAtgalLEO() {
	if ( history.length > 0 ) {
		document.write('<form name="form1" class=noprint><input type="button" value="ATGAL \\ BACK \\ REEN" onmousedown="history.back()" onmouseup=""></form>');
		};
	};

// Dokumento kalbos radimas:
function lashon() {
	klb='l';
	if (document.location.toString().indexOf("-e.htm") > 0)  klb='e';
	if (document.location.toString().indexOf("-o.htm") > 0)  klb='o';
	if (document.location.search=='?e') klb='e';
	if (document.location.search=='?o') klb='o';
	if (document.location.search=='?p') klb='p';
	if (document.location.search=='?r') klb='r';
	if (document.location.search.indexOf("?e") > -1)  klb='e';
	if (document.location.search.indexOf("?o") > -1)  klb='o';
	if (document.location.search.indexOf("?p") > -1)  klb='p';
	if (document.location.search.indexOf("?r") > -1)  klb='r';
	if (document.referrer.indexOf("htm?e") > 0)  klb='e';
	if (document.referrer.indexOf("htm?o") > 0)  klb='o';
	if (document.referrer.indexOf("htm?p") > 0)  klb='p';
	if (document.referrer.indexOf("htm?r") > 0)  klb='r';
	};

function taarich(metai,menuo,diena,forma) {  //forma:kacar-trumpas,aroch-ilgas
	// jei metai=0, tai rodys sio momento data
	if ( metai==0 ) {
		a=new Date();
		metai=a.getFullYear();
		menuo=a.getMonth()+1;
		if ( diena!=0 ) { diena=a.getDate(); };
		};
	// jei metai=-1, tai rodys lapo paskut. redagavimo data
	if ( metai==-1 ) {
		a=new Date(document.lastModified);
		metai=a.getFullYear();
		menuo=a.getMonth()+1;
		if ( diena!=0 ) { diena=a.getDate(); };
		};

	if (forma=='ISO') {
		if (menuo<10) { menuo='0'+menuo; };
		if (diena<10) { diena='0'+diena; };
		document.write('<nobr>',metai,'-',menuo,'-',diena,'</nobr>');
		};
	if (klb=='l') {
		if (forma=='kacar') {
			if (menuo<10) { menuo='0'+menuo; };
			if (diena<10) { diena='0'+diena; };
			document.write(metai,'.',menuo,'.',diena);
			};
		if (forma=='aroch') {
			if (diena!=0) {
				menuoName = new Array('','sausio','vasario','kovo','baland&#382;io','gegu&#382;&#279;s','bir&#382;elio','liepos','rugpj&#363;&#269;io','rugs&#279;jo','spalio','lapkri&#269;io','gruod&#382;io');
				document.write(metai,'&nbsp;m. ',menuoName[menuo],' ',diena,'&nbsp;d.');
				};
			if (diena==0) {
				menuoName = new Array('','sausis','vasaris','kovas','balandis','gegu&#382;&#279;','bir&#382;elis','liepa','rugpj&#363;tis','rugs&#279;jis','spalis','lapkritis','gruodis');
				document.write(metai,'&nbsp;',menuoName[menuo]);
				};
			};
		};
	if (klb=='e') {
		if (forma=='kacar') {
			menuoName = new Array('','Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');
			//US-skaiciais:
			//document.write(menuo,'/',diena,'/',metai);
			//US-razborchivo:
			document.write(menuoName[menuo],'.',diena,', ',metai);
			};
		if (forma=='aroch') {
			menuoName = new Array('','January','February','March','April','May','June','July','August','September','October','November','December');
			if (diena!=0) {
				dienosGalune='th';
				if (diena==1 || diena==21 || diena==31) { dienosGalune='st'; };
				if (diena==2 || diena==22) { dienosGalune='nd'; };
				if (diena==3 || diena==23) { dienosGalune='rd'; };
				//european:
				//document.write(diena,dienosGalune,' of ',menuoName[menuo],', ',metai);
				//american:
				document.write(menuoName[menuo],' ',diena,', ',metai);
				};
			if (diena==0) {
				document.write(menuoName[menuo],'&nbsp;',metai);
				};
			};
		};
	if (klb=='o') {
		if (forma=='kacar') {
			if (menuo<10) { menuo='0'+menuo; };
			if (diena<10) { diena='0'+diena; };
			document.write(diena,'.',menuo,'.',metai);
			};
		if (forma=='aroch') {
			if (diena!=0) {
				menuoName = new Array('','januaro','februaro','marto','aprilo','majo','junio','julio','a&#365;gusto','septembro','oktobro','novembro','decembro');
				document.write('<nobr>la ',diena,'-an de</nobr> ',menuoName[menuo],'&nbsp;',metai);
				};
			if (diena==0) {
				menuoName = new Array('','Januaro','Februaro','Marto','Aprilo','Majo','Junio','Julio','A&#365;gusto','Septembro','Oktobro','Novembro','Decembro');
				document.write(menuoName[menuo],'&nbsp;',metai);
				};
			};
		};
	if (klb=='p') {
		if (forma=='kacar') {
			if (menuo<10) { menuo='0'+menuo; };
			if (diena<10) { diena='0'+diena; };
			document.write(diena,'.',menuo,'.',metai);
			};
		if (forma=='aroch') {
			if (diena!=0) {
				menuoName = new Array('','stycznia','lutego','marca','kwietnia','maja','czerwca','lipca','sierpnia','wrze&#347;nia','pa&#378;dziernika','listopada','grudnia');
				document.write('<nobr>',diena,'&nbsp;',menuoName[menuo],'&nbsp;',metai,' r.');
				};
			if (diena==0) {
				menuoName = new Array('','Stycze&#324;','Luty','Marzec','Kwiecie&#324;','Maj','Czerwiec','Lipiec','Sierpie&#324;','Wrzesie&#324;','Pa&#378;dziernik','Listopad','Grudzie&#324;');
				document.write(menuoName[menuo],'&nbsp;',metai);
				};
			};
		};
	};

function lastmodifiedL1() {
	a=new Date(document.lastModified);
	metai=a.getFullYear();
	menuo=a.getMonth()+1;
	if (menuo<10) { menuo='0'+menuo; }
	menuoName = new Array ("sausis","vasaris","kovas","balandis","gegu&#382;&#279;","bir&#382;elis","liepa","rugpj&#363;tis","rugs&#279;jis","spalis","lapkritis","gruodis")
	diena=a.getDate();
	if (diena<10) { diena='0'+diena; }
	document.write(metai+' '+menuoName[a.getMonth()]);
	};

function lastmodifiedL2() {
	a=new Date(document.lastModified);
	metai=a.getFullYear();
	menuo=a.getMonth()+1;
	if (menuo<10) { menuo='0'+menuo; }
	menuoName = new Array ("SAUSIS","VASARIS","KOVAS","BALANDIS","GEGU&#381;&#278;","BIR&#381;ELIS","LIEPA","RUGPJ&#362;TIS","RUGS&#278;JIS","SPALIS","LAPKRITIS","GRUODIS")
	diena=a.getDate();
	if (diena<10) { diena='0'+diena; }
	document.write(metai+' '+menuoName[a.getMonth()]);
	};

function lastmodifiedE() {
	a=new Date(document.lastModified);
	metai=a.getFullYear();
	menuo=a.getMonth()+1;
	if (menuo<10) { menuo='0'+menuo; }
	menuoName = new Array ("January","February","March","April","May","June","July","August","September","Oktober","November","December")
	diena=a.getDate();
	if (diena<10) { diena='0'+diena; }
	document.write(menuoName[a.getMonth()]+' '+metai);
	};

function lastmodifiedO() {
	a=new Date(document.lastModified);
	metai=a.getFullYear();
	menuo=a.getMonth()+1;
	if (menuo<10) { menuo='0'+menuo; }
	menuoName = new Array ("Januaro","Februaro","Marto","Aprilo","Majo","Junio","Julio","A&#365;gusto","Septembro","Oktobro","Novembro","Decembro")
	diena=a.getDate();
	if (diena<10) { diena='0'+diena; }
	document.write(menuoName[a.getMonth()]+' '+metai);
	};

function leo(lt,en,eo) {
	if (klb=='l') { document.write(lt) };
	if (klb=='e') { document.write(en) };
	if (klb=='o') { document.write(eo) };
	};

function leopr(lt,en,eo,pl,ru) {
	if (klb=='l') { document.write(lt) };
	if (klb=='e') { document.write(en) };
	if (klb=='o') { document.write(eo) };
	if (klb=='p') { document.write(pl) };
	if (klb=='r') { document.write(ru) };
	};

function meilas(juzer,server,vardas) {
	if ( vardas =='' ) {
		document.write('<a href="mai'+'lto:'+juzer+'&#064;'+server+'">'+juzer+'&#064;'+server+'</a>');
		} else {
		document.write('<a href="&#109;ai'+'lto:'+juzer+'&#064;'+server+'">'+vardas+'</a>');
		};
	};


// Siuos funkcijos, kuriose naudojamos kitos funkcijos, turi buti gale sio failo:

function bevakasha_lehodia() {
	document.write('<p style="text-align:center; margin:0 0 0 0; "><span style="font-size:smaller">');
	leo(	'LABAI PRA&#352;OME APIE PASIKEITIMUS IR NAUJIENAS PRANE&#352;TI ADRESU',
		'PLEASE REPORT CHANGES AND NEWS TO',
		'BONVOLU SKRIBI PRI &#348;AN&#284;OJ KAJ NOVA&#308;OJ AL');
	document.write('</span> <b>');
	meilas('Sigitas','gmx.net','');
	document.write('</b>. <span style="font-size:smaller">');
	leo('A&#268;I&#362;!','THANK YOU!','DANKON!');
	document.write('</span></p>');
	};

function kopirajt(kopirajt_bgn) {
	//nuo 1997 iki einamuju metu
	if (kopirajt_bgn==0) { kopirajt_bgn=1997; };
	a=new Date();
	metai=a.getFullYear();
	document.write('<span style="font-size:70%">&copy; Sigitas &#381;ilionis, ');
	if (kopirajt_bgn!=metai) { document.write(kopirajt_bgn+'-'); };
	document.write(metai+'</span>');
	};

function chatima_ve_chodesh3(jahr,monat,rootdir,kopirajtbgn) {
	// jei jahr=0, tai rodys sio momento data
	// jei jahr=-1, tai rodys lapo paskut. redagavimo data
	document.write('<TABLE border=0 width="100%">');
	document.write('<tr><td class=l width="33%">');
	kopirajt(kopirajtbgn);
	document.write('</td>');
	if (rootdir!='') { 
	leo('<td align=center valign=top width="34%" style="font-size:70%"><a href="'+rootdir+'hi/chichi.htm" target="_blank"><img src="'+rootdir+'_icons/smaids.gif" width=31 height=26 class=noprint alt="Nusi&#353;ypsok!" border=0></a></td>','','');
	};
	document.write('<td class=r width="33%" style="font-size:70%">');
	taarich(jahr,monat,0,'aroch');
	document.write('</td></tr></TABLE>');
	};

function chatima_ve_chodesh4(jahr,monat,rootdir,kopirajt_ekde_jaro) {
	// jei jahr=0, tai rodys sio momento data
	// jei jahr=-1, tai rodys lapo paskut. redagavimo data
	document.write('<TABLE border=0 width="100%">');
	document.write('<tr><td class=l width="33%">');
	kopirajt(kopirajt_ekde_jaro);
	document.write('</td>');
	if (rootdir!='') { 
	leo('<td align=center valign=top width="34%" style="font-size:70%"><a href="'+rootdir+'hi/chichi.htm" target="_blank"><img src="'+rootdir+'_icons/smaids.gif" width=31 height=26 class=noprint alt="Nusi&#353;ypsok!" border=0></a></td>','','');
	};
	document.write('<td class=r width="33%" style="font-size:70%">');
	taarich(jahr,monat,0,'aroch');
	document.write('</td></tr></TABLE>');
	};

function lituanicafooter2(rushis,metai,menuo) {
	document.write('<DIV class=c>');
	document.write('<hr noshade size=5>');
	if ( rushis =='uzsienyje' ) document.write('<a href="../index.htm"><font size="-1">KITOS LIETUVI&#352;KOS RADIJO IR TV VALAND&#278;L&#278;S U&#381;SIENYJE</font></a>');
	if ( rushis =='Lietuvai' ) document.write('<a href="../Lietuvai.htm"><font size="-1">KITOS LAIDOS LIETUVAI I&#352; U&#381;SIENIO</font></a>');
	document.write('<hr noshade size=5>');
	document.write('<TABLE border=0 width="100%">');
	document.write('<tr><td align=left valign=top width="50%"><font size="-1">&copy; ');
	// is sekanciu 2 eiluciu naudoti viena: su email adresu arba be jo:
		//meilas('Sigitas','gmx.net','Sigitas &#381;ilionis');
		document.write('Sigitas &#381;ilionis');
	document.write('</font></td>');
	document.write('<td align=right valign=top width="50%"><font size="-1">');
	taarich(metai,menuo,0,'aroch');
	document.write('</font></td></tr></TABLE>');
	document.write('</DIV>');
	};

function histofooter(lt,en,eo,pl,ru,parentdir) {
	document.write('<div class=c style="padding-top:1em"><span class=noprint><hr noshade size=5>');
	document.write('<a href="'+parentdir+'index.php');
	leopr('','?e','?o','?p','?r');
	document.write('" title="');
	leopr('Lietuvos radijo ir TV istorija','Lithuanian Radio History','Historio de litova radio','Historia radio na Litwie','');
	document.write('"><font size="-1">');
	leopr('RADIJAS LIETUVOJE - ISTORIJA','LITHUANIAN BROADCASTING HISTORY','HISTORIO DE RADIO EN LITOVIO','HISTORIA RADIOFONII LITEWSKIEJ','');
	document.write('</font></a>');
	document.write('</span><hr noshade size=5>');
	document.write('<TABLE border=0 width="100%">');
	document.write('<tr><td align=left><font size="-1">&copy; ');
	meilas('Sigitas','gmx.net','Sigitas &#381;ilionis');
	document.write('</font></td>');
	document.write('<td align=right><font size="-1">');
	leopr(lt,en,eo,pl,ru);
	document.write('</font></td></tr></TABLE></div>');
	};

function prwfooter(metai,menuo) {
	document.write('<TABLE border=0 width="100%">');
	document.write('<tr><td><font size="-1">&copy; ');
	meilas('Sigitas','gmx.net','Sigitas &#381;ilionis');
	document.write('</font></td>');
	document.write('<td align=right><font size="-1">');
	taarich(metai,menuo,0,'aroch');
	document.write('</font></td></tr></TABLE>');
	};

// ISEINANT I KITA DOMENA:
function leave_zilionis(ispejimas,URLifYes) {
	var answer = confirm(ispejimas);
	if (answer) { window.open(URLifYes) }
	};


// REKLAMOS:

function reklama_oanda() {
	leo('<TABLE border=0 align=center class=noprint>','','');
	leo('<tr><td align=right>REKLAMA</td><td align=center width=500>','','');
	leo('<a href="http://fxtrade.oanda.com/" target="oanda">','','');
	leo('<img src="../_icons/banner-Oanda.gif" width=468 height=60 border=0','','');
	leo(' alt="Jei turite supratim&#261; kas yra valiutos, ir numanote, kaip gal&#279;tum&#279;te','','');
	leo(' u&#382;dirbti i&#353; j&#371; kurs&#371; svyravim&#371;, tai &#269;ia yra geriausia vieta,','','');
	leo(' j&#363;s&#371; sugeb&#279;jimams realizuoti."></a>','','');
	leo('</td><td align=left>','','');
	leo('REKLAMA','','');
	leo('</td></tr></TABLE>','','');
	};

function reklama_radiomuseum_org() {
	a1="Radio catalogue: more than 105.000 radios with more than 217.000 pictures and 86.000 schematics plus radio forum.";
	if (klb=='l') { a1="Radijo imtuv&#371; katalogas (&#352;veicarija): >105.000 modeli&#371;, >217.000 nuotrauk&#371; ir 86.000 schem&#371; + forumas" };
	if (klb=='o') { a1="Katalogo de radio-aparatoj (Svisio): >105.000 modeloj, >217.000 fotoj kaj 86.000 skemoj; + forumo" };
	document.write('<TABLE border=0 align=center class=noprint><tr><td align=right>');
	leopr('REKLAMA','ADVERTISING','REKLAMO','REKLAMA','&#1056;&#1045;&#1050;&#1051;&#1040;&#1052;&#1040;');
	document.write('</td><td align=center width=500>');
	document.write('<a href="http://www.radiomuseum.org/" target="_blank"><img src="http://www.radiomuseum.org/lin/radiomuseum_org_468x60_en.gif" ');
	document.write('border=0 alt="'+a1+'" title="'+a1+'" width=468 height=60></a>');
	//document.write('<br><a href="http://www.radiomuseum.org/" target="_blank">www.Radiomuseum.org</a>');
	document.write('</td><td align=left>');
	leopr('REKLAMA','ADVERTISING','REKLAMO','REKLAMA','&#1056;&#1045;&#1050;&#1051;&#1040;&#1052;&#1040;');
	document.write('</td></tr></TABLE>');
	};

function reklama_lyngsat() {
	leo('<TABLE border=0 align=center class=noprint>','','');
	leo('<tr><td align=right>REKLAMA</td><td align=center width=500>','','');
	leo('<a href="http://www.lyngsat.com/" target="lyngsat">','','');
	leo('<img src="../_icons/banner-LyngSat.gif" width=468 height=60 border=0','','');
	leo(' alt="M&#363;s&#371; manymu - geriausias palydovini&#371; RTV','','');
	leo(' kanal&#371; katalogas."></a>','','');
	leo('</td><td align=left>','','');
	leo('REKLAMA','','');
	leo('</td></tr></TABLE>','','');
	};

