//<!-- Funciones Ordenadas
//-------COOKIE SECTION-----------------------


function getCookie(cookieName){
	if(document.cookie.length > 0) {
		var search = cookieName + "=";
		  var offset = document.cookie.indexOf(search);
        if(offset != -1) {
        	offset += search.length;
            end = document.cookie.indexOf(";", offset);
            if(end == -1){ end = document.cookie.length;}
            mC = unescape(document.cookie.substring(offset, end));
            return mC;
        }
        else{
			var mC=""
         return mC;
        }
    }
    else{
		var mC=""
      return mC;
    }
}

function setCookie(cook){
	coN=frSt(cook, 0,",")+"="
	coV=frSt(cook, 1,",")
	coE=frSt(cook, 2,",")
	coP=frSt(cook, 3,",")
	if (coV==""){coE="";coP=""}
	else {
		coE=sDate(coE,"; expires=")
		if (coE!=""){
			coP="; path=/"+coP
		}
		else {coP=""}
	}
	document.cookie=coN+coV+coE+coP
	if (getCookie(coN)==coV){rF=true}
	else {rF=false}
	return rF
}

//----------END of COOKIE Section

//----------DATE SECTION-------
function sDate(fecha,cadena){
	if (fecha==""){return fecha}
	miF=new Date()
	var a=fecha.substring(0,1)
	if (a=="+" || a=="-"){miQ=aDate(fecha,miF)}
	else {miQ=bDate(fecha,miF)}
   var expDate = cadena+miQ.toUTCString();
	return expDate;
}
function aDate(fecha,miF){
	sC=getSuf(fecha)
	if (sC!=""){
		if (buff=="h"){sC=sC*horMili}
		else if (buff=="m"){sC=sC*minMili}
		else {sC=sC*diaMili}
		miF.setTime(miF.getTime()+sC)
		return miF
	}
	else {return sC}
}
function bDate(fecha,miF){
	var aAaa=gAnno(fecha,miF)
	var mM=gMes(fecha,miF)
	if (mM>11){mM=mM-12;aAaa=aAaa+1}
	else if (mM<0){mM=mM+12;aAaa=aAaa-1}				
	var dD=gDia(fecha,miF,mM,aAaa)
	miF = new Date(aAaa,mM,dD)   
}
function gAnno(fecha, miF){
	var aAaa=frSt(fecha,0,";")
	if (aAaa==""){aAaa=miF.getFullYear()}
	else if (aAaa.length < 4){aAaa=miF.getFullYear()+getSuf(aAaa)}
	return aAaa
}
function gMes(fecha,miF){
	var mM=frSt(fecha,1,";")
	if (mM=="" || isNaN(parseInt(mM))){mM=miF.getMonth()}
	else if(mM.substring(0,1)=="+" || mM.substring(0,1)=="-"){
		var sC=getSuf(mM)
		mM=miF.getMonth()+sC
	}
	else {mM=getSuf(mM)}
	return mM
}
function gDia(fecha,miF,mM,aAaa){
	var dD=frSt(fecha,2,";")
	if (dD=="" || isNaN(parseInt(dD))){dD=miF.getDate()}
	if (dD>31){dD=31}
	if (dD>30){
		if (mM==4 || mM==6 || mM==9 || mM==11){mM=30}
	}
	if(mM==2){
		var aT=aAaa/4
		if (aT==parseInt(aT)){dT=29}
		else {dT=28}
		if (dD>dT){dD=dT}
	}
	return dD
}

//----------END of DATE Section
//----------STRING DECODE SECTION----
function frSt(paraValue,paraType,sep){
	var a=paraValue
	var x=0
	while(a!=""){
		sC=a.indexOf(sep,0)
		if (sC==-1){sC=a.length}
		rF=a.substring(0,sC)
		a=a.substring(sC+1,a.length)
		if (rF==sep){rF=""}
		if (x==paraType){return rF}
		x=x+1
	}
	rF=""
	return rF
}
function qaSt(paraValue,sep){
	var a=paraValue
	var x=-1
	while(a!=""){
		sC=a.indexOf(sep,0)
		if (sC==-1){sC=a.length}
		rF=a.substring(0,sC)
		a=a.substring(sC+1,a.length)
		x=x+1
	}
	return x
}
//----------SPECIAL SECTION-----------
function adC(cadena){
	return c+cadena+c
}
function adCp(cadena){
	return c9+cadena+c9
}
function nr(miNum) {
	rF=miNum.toString(10)
	return rF
}
function getSuf(cdn){
	var sC=parseInt(cdn)
	if (!isNaN(sC)){buff=cdn.substring(nr(sC).length,cdn.length)}
	else {sC="";buff=""}
	return sC
}
function sD(vN,vC){
	var rF=""
	vT=parseFloat(vN)
	if (isNaN(vT)){rF=vC+": "+vN+"; "}
	else {
		if (vN<0){vN=Math.abs(vN)}
		if (vC=="font-size"){var cola="pt; "}
		else {var cola="px; "}
		rF=vC+": "+nr(vN)+cola 
	}
	return rF
}
function iK(cdn,para){
	rF=imD+cdn+imE[para]
	return rF
}
function sDS(vN,vC){
	var rF=""
	var vK="style."+vC
	vT=parseFloat(vN)
	if (isNaN(vT)){rF=vK+"="+c+vN+c+"; "}
	else {
		rF=vK+"="+c+nr(vN)+"px"+c+";" 
	}
	return rF
}

//----------END of Special Section----
//----------TAG GENERATION SECTION----
function marS(cad, tip){
	if (cad == ""){return "</frameset>"}
	if (tip == "1"){var clave = "rows="}
	else{var clave ="cols="}
	clave  = clave + adC(cad)
return "<frameset border=0 frameborder=0 framespacing=0 " + clave +">" + CR
}
function marF(cad,para){
	var rF=""
	var miSrc = frSt(cad,0,",")
	var miNam = frSt(cad,1,",")
	if (miSrc == "") {return ""}
	miSrc= " src=" + adC(miSrc)
	if (miNam != ""){miNam = " name=" +adC(miNam)}
	rF = adT("FM",0) + miSrc + miNam
	var miSb = frSt(para,0,",")
	if (miSb == "0" || miSb =="no"){rF=rF + " scrolling=" + adC("no")}
	else if (miSb == "1" || miSb =="yes"){rF=rF + " scrolling=" + adC("yes")}
	else if (miSb == "2" || miSb =="auto"){rF=rF + " scrolling=" + adC("auto")}
	miSb = frSt(para,1,",")
	if (miSb !="" && miSb != "-"){rF=rF + " frameborder=" + adC(miSb)}
	miSb = frSt(para,2,",")
	if (miSb == "" || miSb == "0" ){rF=rF + " noresize"}
	miSb = frSt(para,3,",")
	if (miSb == "" || miSb == "0"){rF=rF+" marginwidth=" + adC("0")}
	else{rF=rF+" marginwidth=" + adC(miSb)}
	miSb = frSt(para,4,",")
	if (miSb == "" || miSb == "0"){rF=rF+" marginheight=" + adC("0")}
	else{rF=rF+" marginheight=" + adC(miSb)}
	rF = rF + ">" + CR
return rF
}
function adE(evNum,evFun){
	var rF
	if (evNum==0){rF=" onmouseover="}
	else if (evNum==1){rF=" onmouseout="}
	else if (evNum==2){rF=" onclick="}
	else if (evNum==3){rF=" onmousedown="}
	else if (evNum==4){rF=" onmouseup="}
	else if (evNum==5){rF=" onmousemove="}
	else {rF=""}
	if (rF!=""){rF=rF+c+evFun+c}
	return rF
}

function adP(paraName,paraValue){
		var tN=paraName.toUpperCase()
		cP=c + paraValue + c
		if (tN=="B"){tN="BORDER"}
		else if (tN=="FB"){tN="frameborder"}
		else if (tN=="FS"){tN="framespacing"}
		else if (tN=="H"){tN="height"}
		else if (tN=="MW"){tN="marginwidth"}
		else if (tN=="MH"){tN="marginheigh"}
		else if (tN=="N"){tN="name"}
		else if (tN=="S"){tN="src"}
		else if (tN=="W"){tN="width"}
		else if (tN=="BG"){tN="bgcolor"}
		else if (tN=="B-"){tN="backgroung"}
		else if (tN=="A"){tN="align"}
		else if (tN=="HR"){tN="href"}
		else if (tN=="SC"){tN="scrolling"}
		else if (tN=="CS"){tN="colspan"}
		else if (tN=="T-"){
			tN="cellpadding="+cP+" cellspacing="+cP+" border"
		}
		else if (tN=="allmar"){
			tN="topmargin=" + cP+ " marginheight=" + cP + " marginwidth=" +cP + " leftmargin=" +cP+ " rightmargin=" + cP + " bottommargin"
		}
	rF=" "+tN + "=" + cP
	return rF.toLowerCase()
}
function adS(stCode){
	var sC=stCode
	var rF=""
	while (sC!=""){
		var vN=parseFloat(sC)
		if (isNaN(vN)){
			if (sC.substring(0,1)=="#"){
				vN=sC.substring(0,7)
				var vC=sC.substring(7,8)
				if (vC=="C"){vC=sD(vN,"color")}
				else if (vC=="B"){vC=sD(vN,"background-color")}
				rF=rF+vC
				if (sC.length > 8){sC=sC.substring(8,sC.length)}
				else {sC=""}
			}
			else{sC=""}
		}
		else{
			var vL=nr(vN).length
			var vC=sC.substring(vL,vL+1)
			vC=vC.toLowerCase()
			if (vC=="l"){vC=sD(-vN,"left")}
			else if (vC=="t"){vC=sD(vN,"top")}
			else if (vC=="w"){vC=sD(vN,"width"); wI=vN}
			else if (vC=="h"){vC=sD(vN,"height"); hE=vN}
			else if (vC=="p"){vC=sD(miPos[vN],"position")}
			else if (vC=="v"){vC=sD(miVis[vN],"visibility")}
			else if (vC=="a"){vC=sD(miAlgn[vN],"align")}
			else if (vC=="x"){
				hE=(screen.height - hE)/2 - cabeza
				wI=(screen.width - wI)/2
				vC=sD(hE,"top")
				vC=vC+sD(wI,"left")}
			else if (vC=="f"){vC=sD(miFf[vN],"font-family")}
			else if (vC=="q"){vC=sD(vN,"font-size")}
			else if (vC=="i"){vC=sD(miFs[vN],"font-style")}
			else if (vC=="b"){vC=sD(miFw[vN],"font-weight")}
			else if (vC=="s"){vC=sD(miFv[vN],"font-variant")}
			else if (vC=="d"){vC=sD(miTd[vN],"text-decoration")}
			else if (vC=="g"){vC=sD(miTa[vN],"text-align")}
			else{vC=""}
			rF=rF+vC
			if (sC.length > (vL+1)){sC=sC.substring(vL+1,sC.length)}
			else {sC=""}
		} 
	}
	if (rF!=""){rF=" style="+c+rF+c}
	return rF
}
		
function adT(tN,tC){
	if (tN==""){rF="<>"}
	else {
		tN=tN.toUpperCase()
		if (tN=="FS"){tN="FRAMESET"}
		else if (tN=="FM"){tN="FRAME"}
		else if (tN=="AR"){tN="AREA"}
		else if (tN=="I") {tN="IMG"}
		else if (tN=="M") {tN="MAP"}
		else if (tN=="T") {tN="TABLE"}
		if (tC==1){
			rF="</"+tN+">"
		}
		else{rF="<" + tN
		if (tC==2){rF=rF+">"}
		}
	} 
		
	return rF.toLowerCase()
}


//----------End of Tag generation-----
//----------ANIMATION SECTION --------
function toggle(fnType,fnStr){
	var miRe=""
	vN=parseFloat(fnType)
	if (!isNaN(vN)){
		var sC=fnType.substring(nr(vN).length,fnType.length)
		if (vN==0){
			miRe="document.images["+c+sC+c+"]."
		}
		else if (vN==1){
			miRe="document.images["+c+sC+c+"].src="+fnStr+".src"
			eval(miRe)
			return 
		}
		else if (vN==2){
			miRe="document.images["+c+sC+c+"].src="+fnStr
			eval(miRe)
			return 
		}
		else if (vN==8){
			if (document.all && !document.getElementById) {
			miRe=sC+"."
			}
			else if (document.getElementById && document.body.style) {
			miRe="document.getElementById("+c+sC+c+")." 
			}
			else { 
				miRe=""
			}
		}
	}
	else {//Por ahora no inventé nada uso igual que 0
		miRe="document.images["+c+sC+c+"]." 
	}
	if (miRe==""){return false}
	var sC=fnStr
	var rF=""
	while (sC!=""){
		var vN=parseFloat(sC)
		if (isNaN(vN)){
			if (sC.substring(0,1)=="#"){
				vN=sC.substring(0,7)
				var vC=sC.substring(7,8)
				if (vC=="C"){vC=sDS(vN,"color")}
				else if (vC=="B"){vC=sDS(vN,"backgroundColor")}
				rF=rF+vC
				if (sC.length > 8){sC=sC.substring(8,sC.length)}
				else {sC=""}
				eval(miRe + vC)				
			}
			else{
				p1=frSt(sC,0,",")
				p2=frSt(sC,1,",")
				if (p1!="" && p2!=""){
					vC=miRe+p1+"="+c+p2+c
					eval(vC)
				}
			sC=""
			}
		}
		else{
			var vL=nr(vN).length
			var vC=sC.substring(vL,vL+1)
			if (vC=="l"){vC=sDS(vN,"left")}
			else if (vC=="t"){vC=sDS(vN,"top")}
			else if (vC=="w"){vC=sDS(vN,"width"); wI=vN}
			else if (vC=="h"){vC=sDS(vN,"height"); hE=vN}
			else if (vC=="p"){vC=sDS(miPos[vN],"position")}
			else if (vC=="v"){vC=sDS(miVis[vN],"visibility")}
			else if (vC=="a"){vC=sDS(miAlgn[vN],"align")}
			else if (vC=="x"){
				hE=(screen.height - hE)/2 - cabeza
				wI=(screen.width - wI)/2
				vC=sDD(hE,"top")
				if (vC!=""){eval(miRe+vC)}
				vC=sDD(wI,"left")}
			else{vC=""}
			rF=rF+vC
			if (sC.length > (vL+1)){sC=sC.substring(vL+1,sC.length)}
			else {sC=""}
			if (vC!=""){eval(miRe+vC)}
		} 
	}
	
}
function gSE(sC,fnS){
	if (document.all && !document.getElementById) {miRe=sC+"."}
	else if (document.getElementById && document.body.style) {miRe="document.getElementById("+c+sC+c+")."}
	else {return false}
	vC=fnS
	if (vC=="l"){vC="left"}
	else if (vC=="t"){vC="top"}
	else if (vC=="w"){vC="width"}
	else if (vC=="h"){vC="height"}
	else if (vC=="p"){vC="position"}
	else if (vC=="v"){vC="visibility"}
	else if (vC=="a"){vC="align"}
	rF=eval(miRe+"style."+vC)
	return rF 
}


//-------------End of animation section ------- 
//-------------Sincronisation section----------
function decPage(cadena,res,trigger){
	var mi=window.top.mi
	window.top.actPage = res
	window.top.actPP = trigger
	var lt = res + "?" + trigger
	var oldIdi = window.top.idioma.miParam
	if (oldIdi=="es" || oldIdi=="en" || oldIdi=="ru" || oldIdi=="uk"){
		if (mi != oldIdi){window.top.idioma.meMato(mi)}
	}
	if (window.top.miMainPage=="main.htm"){window.parent.menu.sincro(cadena,res,trigger)}
}
function sPag(res,trigger){
    window.open(res + "?" + trigger + "&e=" + mi, "main")
}
function chIdi(idi){
window.top.idioma.chIdi(idi)
}
//-------------End of sincronisation section---
//-->