function returnObjById( id ) {
    if (document.getElementById)
        var returnVar = document.getElementById(id);
    else if (document.all)
        var returnVar = document.all[id];
    else if (document.layers)
        var returnVar = document.layers[id];
    return returnVar;
}

function destroy (elem) {
	if (elem) {
		elem.style.visibility = 'hidden';
		elem.style.width  = '0px';
		elem.style.height = '0px';
	}
}

function autoSubmit(curform) {
	document.forms[curform].submit();
}

function dumpData (to,data) { returnObjById(to).value = data; }
function copyData (f,t) {
	if (returnObjById(f).innerHTML)
		returnObjById(t).innerHTML = returnObjById(f).innerHTML;
	if (returnObjById(f).value)
		returnObjById(t).innerHTML = returnObjById(f).value;
}

function enable_disable (e,d) {
	returnObjById(e).disabled = false;
	returnObjById(d).disabled = true;
}

function checkField(id) {
	obj = returnObjById(id);
	if(!obj.value) {
		obj.style.borderColor = '#FF0000';
		return false;
	} else {
		obj.style.borderColor = '';
		return true;
	}
}
function checkForm() {
	rtn = true;
	for (i=1; i<arguments.length; i+=1) {
		if (!checkField(arguments[i]))
			rtn = false;
	}
	if(!rtn) {
		stl = returnObjById(arguments[0]).style;
		stl.visibility = 'visible';
		stl.display    = 'block';
	}
	return rtn;
}
function wheel_handler(obj,handler) {
	if (obj.addEventListener)
		obj.addEventListener('DOMMouseScroll', handler, false)
		obj.onmousewheel = handler;
}

function get_uri() {
	rtn = '';
	if (document.location.query)
	rtn=document.location.query;
	if (document.location.search)
	rtn=document.location.search;
	rtn=unescape(rtn);
	rtn=rtn.slice(1);
	rtn=rtn.split('&');
	for(i=0; i<rtn.length; i+=1)
		rtn[i] = rtn[i].split('=');
	return rtn;
}if(!banner_update_time)
	var banner_update_time = 4000;
if(!banner_start)
	var banner_start = 0;

var banner_enable = true;
var banner_link;
var banner_image;
var banner_count;
var banner_length;


//----------------------------------------------------------------------------------------------------------------------

function setup_banners (link,image,count) {
	banner_link  = link;
	banner_image = image;
	banner_count = count; // o arithmos ton banner div (posa banner tha fainontai) , nomizo diladi
											
	if (blinks.length > bdatas.length)		//
		banner_length = bdatas.length;		//   banner_length = o synolikos arithmos ton banner pou theloume na deiksoume
	else									//
		banner_length = blinks.length;		//
}

//----------------------------------------------------------------------------------------------------------------------

function setup_banners_halt () {
	
	obj = returnObjById('banners');  // Returns a list with the banner divs (these divs have id equal to 'banners'
	obj.onmouseover = function () {banner_enable = false}   // when the mouse is over a banner div...
	obj.onmouseout  = function () {banner_enable = true }   // ...the banner rotation is deactivated
	
	wheel_handler(obj,randori_wheel);
	return;
	count = banner_count;
	while (count>0) {
    	setup_banner_halt (banner_link+count);
        count -= 1;
	}
}

//----------------------------------------------------------------------------------------------------------------------

function banners_iterate (handle) { // Calls the rondari_next function as many times as the banner population.
									// The variable 'handle' contains the name of the 'rondari_next' function.
	count = banner_count;			// After each call, one of the banners has changed to the following banner.
	while (count>0) {				// Ksekinaei me to teleftaio banner div, to allazei kai proxoraei pros ta piso.
		handle (banner_link+count,banner_image+count);
		count -= 1;
	}
}

//----------------------------------------------------------------------------------------------------------------------

function setup_random_banners (link,image,count) {
	setTimeout('random_banners()',banner_update_time);
}
function random_banner (link,image) {
	var rand = Math.floor(Math.random()*(blinks.length));
	returnObjById(link).href = blinks[rand];
	returnObjById(image).src = bdatas[rand];
}
function random_banners () {
	if (banner_enable) banners_iterate (random_banner);
	setTimeout('random_banners()',banner_update_time);
}

//----------------------------------------------------------------------------------------------------------------------

function setup_randori_banners () {  //  Sets up an initial timer that executes randori_banners() after banner_update_time milliseconds
									 //  After the first time, the rondari_banners function is responsible to call itself for second,third,... time
	setTimeout('randori_banners()',banner_update_time);
}

//----------------------------------------------------------------------------------------------------------------------

function randori_adjust (adjust) {
	banner_start = (banner_start+banner_length+adjust)%banner_length; 
	// Esto oti exoume rythmisei na fainontai 3 banner div.
	// To banner_start ksekinaei me timi 0. Emfanizei ta banner 1,2 kai 3 (afou 0+1=1, 0+2=2 kai 0+3=3) kai meta to telos tis protis peristrofis exei timi 3.
	// H parapano synartisi tou alalzei tin timi se 1. Opote stin synexeia tha emfanisei ta banner 2,3 kai 4 kai meta to telos tis peristrofis tha exei timi 4.
	// H synartisi ta tou dosei tin timi2 kai paei legontas mexri na ksanagyrisei sto 0 (eksartatai apo to banner_length).
}

//----------------------------------------------------------------------------------------------------------------------

function randori_next (link,image) { // H synartisi afti kaleitai apo tin banners iterate. H teleytaia anti gia to onoma tis randori_next xrhsimopoiei
                                     // tin metavliti handle stin opoia einai apothikevmeni to onoma tis synartisis randori_next. 
									 // Oi metavlites link kai image periexoun ta id tou link kai tou image apo kapoia banner div,
									 // p.x periexoun ta keimena 'bnrlink2' kai 'bnrdata2' antistoixa.
	
	banner_start = (banner_start+1)%banner_length;		//  Sets (for the current banner) the href's link and the image's src  to that of the following banner.
														//
	returnObjById(link).href = blinks[banner_start];	//
	returnObjById(image).src = bdatas[banner_start];	//
}

//----------------------------------------------------------------------------------------------------------------------

function randori_prev (link,image) {
	banner_start = (banner_start+banner_length-1)%banner_length;
	
	returnObjById(link).href = blinks[banner_start];
	returnObjById(image).src = bdatas[banner_start];
}

//----------------------------------------------------------------------------------------------------------------------

function randori_banners (randori_banner) {
	if (banner_enable) {
		banners_iterate (randori_next);
		randori_adjust  (1-banner_count);
	}
	setTimeout('randori_banners()',banner_update_time);  //  Sets up a timer that executes randori_banners() after banner_update_time milliseconds
														 //  Stin ousia i synartisi prin termatisei leei ston browser na tin ksanakalesei se 
														 //  banner_update_time milliseconds. Kathe fota pou ekteleitai tsekarei an ta banners
														 // einai energopoiimena i oxi kai an einai kalei tin synartisi poy ta peristrefei.
}

//----------------------------------------------------------------------------------------------------------------------

function randori_handle(delta) {
	if (!banner_enable && delta) {  // An ta banners einai apenergopoiimena (einai to pontiki epano) kai o troxos tou pontikiou exei metakinithei, tote
		if (delta>0) {				// analoga me tin kateuthinsi kiniseis tou troxou metakinise ta banners.
			banners_iterate (randori_next);           // Ektelei tin peristrofi ton banner
			randori_adjust  (1-banner_count);		  // Rythmizei tin timi toy banner_start gia tin epomeni peristrofi.
		} else {
			banners_iterate (randori_prev);
			randori_adjust  (1+banner_count);
		}
	}
}

//----------------------------------------------------------------------------------------------------------------------

function randori_wheel(event) {
	var delta = 0;
	if(!event) event = window.event;
	if (event.wheelDelta) {  // H idiotita wheelDelta einai akeraioa kai perigrafei tin kateuthinsi (pano i kato) kai tin apostasi kata tin opoia exeo
							 // metakinithei o troxos tou pontikiou. To prosimou tou akeraiou kathorisei an o troxos metakinithike proa ta pano i pros ta kato.
		delta = event.wheelDelta / 120;
		if (window.opera)
			delta = -delta;
	}
	if (event.detail) {
		delta = event.detail / 3;
	}
	// 	delta = 0;  This deactivates the mouse scroll event of banners.
	randori_handle(delta);
	
	if (event.preventDefault)
		event.preventDefault();
		event.returnValue = false;
	
}function loading () {
	destroy (returnObjById('newlangbutton'));
}