// RECUPERACION DE VARIABLES DE LA URL
cadVariables = location.search.substring(1,location.search.length);
arrVariables = cadVariables.split("&");
for (i=0; i<arrVariables.length; i++) {
	arrVariableActual = arrVariables[i].split("=");
	if (arrVariables.length > 0) {
		if (arrVariableActual[0].indexOf(".") <= 0) {
			if (isNaN(parseFloat(arrVariableActual[1]))) eval("_" + arrVariableActual[0]+"='"+unescape(arrVariableActual[1])+"';");
			else eval("_" + arrVariableActual[0]+"="+arrVariableActual[1]+";");
		}
	}
}

function comparar_cad(cadena, patron) {
	regexp = new RegExp(patron, "i");
	return regexp.test(cadena);
}

function dividir_cad(cadena, patron) {
	regexp = new RegExp(patron, "i");
	return cadena.split(regexp);
}

function cargar_idioma(id) {
	switch (id) {
		case "es": 
			if (document.getElementById("casfix") != null) document.getElementById("casfix").checked = true;
			break;
		case "en": 
			if (document.getElementById("engfix") != null) document.getElementById("engfix").checked = true;
			break;
		case "de": 
			if (document.getElementById("deufix") != null) document.getElementById("deufix").checked = true;
			break;
		default: if (document.getElementById("catfix") != null) document.getElementById("catfix").checked = true;
	}
}

function idioma(idi) {
	var mi_url = document.location.href;
	var idiAux = "_" + idi;
	
	eval("mi_url = mi_url.replace(/_" + _idioma + "/g, idiAux)");
	idiAux = "l=" + idi;
	eval("mi_url = mi_url.replace(/l=" + _idioma + "/g, idiAux)"); 
	document.location.href = mi_url;
}

function Set_Cookie( name, value, expires, path, domain, secure )
{
// set time, it's in milliseconds
var today = new Date();
today.setTime( today.getTime() );

/*
if the expires variable is set, make the correct
expires time, the current script below will set
it for x number of days, to make it for hours,
delete * 24, for minutes, delete * 60 * 24
*/
if ( expires )
{
expires = expires * 1000 * 60 * 60 * 24;
}
var expires_date = new Date( today.getTime() + (expires) );

document.cookie = name + "=" +escape( value ) +
( ( expires ) ? ";expires=" + expires_date.toGMTString() : "" ) +
( ( path ) ? ";path=" + path : "" ) +
( ( domain ) ? ";domain=" + domain : "" ) +
( ( secure ) ? ";secure" : "" );
}

function Get_Cookie( name ) {

var start = document.cookie.indexOf( name + "=" );
var len = start + name.length + 1;
if ( ( !start ) &&
( name != document.cookie.substring( 0, name.length ) ) )
{
return null;
}
if ( start == -1 ) return null;
var end = document.cookie.indexOf( ";", len );
if ( end == -1 ) end = document.cookie.length;
return unescape( document.cookie.substring( len, end ) );
}