function redirect(link){
    window.location.href=link;
}
function calcular_valor_moneda() {
  if(document.monedas.convval.value!='') {
    if(!validarNumeroDoble(document.monedas.convval)) {
      document.monedas.resultado.value='0';
    }
    else {
      var res=document.monedas.convval.value;
      res=res*formatCurrencyVal(document.monedas.monedauno.value);
      res=res/formatCurrencyVal(document.monedas.monedados.value);
	  //document.monedas.resultado.value=res;
      document.monedas.resultado.value=formatCurrency(res);
	  //document.monedas.resultado.value = document.monedas.monedauno.value + " - "  + document.monedas.monedados.value;
    }
  }
  else {
    document.monedas.resultado.value='0';
  }
}
function formatCurrencyVal(num) {
 num = num.toString().replace(/COP |\,/g,'');
// num = num.toString().replace(/ /g,'');
/* num = num.substring(2);
 //document.monedas.resultado.value=document.monedas.resultado.value " - " + num;
 if(isNaN(num))
  num = "0";
  sign = (num == (num = Math.abs(num)));
  num = Math.floor(num*100+0.50000000001);
  cents = num%100;
  num = Math.floor(num/100).toString();
  if(cents<10)
    cents = "0" + cents;
    num.substring(num.length-(4*i+3));
  return num + '.' + cents;*/
  return num;
}
function formatCurrency(num) {
 num = num.toString().replace(/$|\,/g,'');
 if(isNaN(num))
  num = "0";
  sign = (num == (num = Math.abs(num)));
  num = Math.floor(num*100+0.50000000001);
  cents = num%100;
  num = Math.floor(num/100).toString();
  if(cents<10)
    cents = "0" + cents;
  for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
    num = num.substring(0,num.length-(4*i+3))+','+
    num.substring(num.length-(4*i+3));
  return (((sign)?'':'-') + '$' + num + '.' + cents);
}
function validarNumeroDoble(element)  {
  var punto=0;
  for(i=0;i<element.value.length;i++) {
    if(element.value.charAt(i)=='.') {
      if(punto==1)
        return false;
      else
        punto=punto+1;
    } else if(element.value.charAt(i)<'0' || element.value.charAt(i)>'9')
      return (false);
  }
  return (true);
}
function cambiar_medidas() {
    document.medidas.medidauno.options.length = 0;
    document.medidas.medidados.options.length = 0;
    document.medidas.medidauno.options[0]=new Option("De...","0");
    document.medidas.medidados.options[0]=new Option("A...","0");
    if(document.medidas.medida.value=='1') {
      document.medidas.medidauno.options[1]=new Option("Milimetros","0.1");
      document.medidas.medidauno.options[2]=new Option("Centimetros","1");
      document.medidas.medidauno.options[3]=new Option("Pulgadas","2.54");
      document.medidas.medidauno.options[4]=new Option("Pies","30.48");
      document.medidas.medidauno.options[5]=new Option("Yardas","91.4");
      document.medidas.medidauno.options[6]=new Option("Metros","100");
      document.medidas.medidauno.options[7]=new Option("Kilometros","100000");
      document.medidas.medidauno.options[8]=new Option("Millas","161000");
      document.medidas.medidados.options[1]=new Option("Milimetros","0.1");
      document.medidas.medidados.options[2]=new Option("Centimetros","1");
      document.medidas.medidados.options[3]=new Option("Pulgadas","2.54");
      document.medidas.medidados.options[4]=new Option("Pies","30.48");
      document.medidas.medidados.options[5]=new Option("Yardas","91.4");
      document.medidas.medidados.options[6]=new Option("Metros","100");
      document.medidas.medidados.options[7]=new Option("Kilometros","1000");
      document.medidas.medidados.options[8]=new Option("Millas","161000");
    }else if(document.medidas.medida.value=='2') {
      document.medidas.medidauno.options[1]=new Option("Centímetros Cuadrados","1");
      document.medidas.medidauno.options[2]=new Option("Pulgadas Cuadradas","6.45161");
      document.medidas.medidauno.options[3]=new Option("Pies Cuadrados","929.03");
      document.medidas.medidauno.options[4]=new Option("Yardas Cuadradas","8361.273");
      document.medidas.medidauno.options[5]=new Option("Metros Cuadrados","10000");
      document.medidas.medidauno.options[6]=new Option("Acres","40468564.224");
      document.medidas.medidauno.options[7]=new Option("Hectáreas","100000000");
      document.medidas.medidauno.options[8]=new Option("Kilometros Cuadrados","10000000000");
      document.medidas.medidauno.options[9]=new Option("Millas Cuadradas","25899881103.399");
      document.medidas.medidados.options[1]=new Option("Centímetros Cuadrados","1");
      document.medidas.medidados.options[2]=new Option("Pulgadas Cuadradas","6.45161");
      document.medidas.medidados.options[3]=new Option("Pies Cuadrados","929.03");
      document.medidas.medidados.options[4]=new Option("Yardas Cuadradas","8361.273");
      document.medidas.medidados.options[5]=new Option("Metros Cuadrados","10000");
      document.medidas.medidados.options[6]=new Option("Acres","40468564.224");
      document.medidas.medidados.options[7]=new Option("Hectáreas","100000000");
      document.medidas.medidados.options[8]=new Option("Kilometros Cuadrados","10000000000");
      document.medidas.medidados.options[9]=new Option("Millas Cuadradas","25899881103.399");
    } else if(document.medidas.medida.value=='3') {
      document.medidas.medidauno.options[1]=new Option("Centímetros Cúbicos (Mililitro)","1");
      document.medidas.medidauno.options[2]=new Option("Pulgadas Cúbicas","16.387");
      document.medidas.medidauno.options[3]=new Option("Onzas Líquidas","29.573");
      document.medidas.medidauno.options[4]=new Option("Litros","1000");
      document.medidas.medidauno.options[5]=new Option("Galones Americanos","3785.411");
      document.medidas.medidauno.options[6]=new Option("Galones","4546.092");
      document.medidas.medidauno.options[7]=new Option("Pies Cúbicos","28316.846");
      document.medidas.medidauno.options[8]=new Option("Yardas Cúbicas","764554.857");
      document.medidas.medidauno.options[9]=new Option("Metros Cúbicos","1000000");
      document.medidas.medidados.options[1]=new Option("Centímetros Cúbicos (Mililitro)","1");
      document.medidas.medidados.options[2]=new Option("Pulgadas Cúbicas","16.387");
      document.medidas.medidados.options[3]=new Option("Onzas Líquidas","29.573");
      document.medidas.medidados.options[4]=new Option("Litros","1000");
      document.medidas.medidados.options[5]=new Option("Galones Americanos","3785.411");
      document.medidas.medidados.options[6]=new Option("Galones","4546.092");
      document.medidas.medidados.options[7]=new Option("Pies Cúbicos","28316.846");
      document.medidas.medidados.options[8]=new Option("Yardas Cúbicas","764554.857");
      document.medidas.medidados.options[9]=new Option("Metros Cúbicos","1000000");
    }
    else if(document.medidas.medida.value=='4') {
      document.medidas.medidauno.options[1]=new Option("Miligramos","0.001");
      document.medidas.medidauno.options[2]=new Option("Onzas","28.349");
      document.medidas.medidauno.options[3]=new Option("Gramos","1");
      document.medidas.medidauno.options[4]=new Option("Libras","453.592");
      document.medidas.medidauno.options[5]=new Option("Kilogramos","1000");
      document.medidas.medidauno.options[6]=new Option("CWT","45359.236");
      document.medidas.medidauno.options[7]=new Option("Toneladas","907184.739");
      document.medidas.medidauno.options[8]=new Option("Toneladas Métricas","1000000");
      document.medidas.medidados.options[1]=new Option("Miligramos","0.001");
      document.medidas.medidados.options[2]=new Option("Onzas","28.349");
      document.medidas.medidados.options[3]=new Option("Gramos","1");
      document.medidas.medidados.options[4]=new Option("Libras","453.592");
      document.medidas.medidados.options[5]=new Option("Kilogramos","1000");
      document.medidas.medidados.options[6]=new Option("CWT","45359.236");
      document.medidas.medidados.options[7]=new Option("Toneladas","907184.739");
      document.medidas.medidados.options[8]=new Option("Toneladas Métricas","1000000");
    }
    document.medidas.medidauno.options.selectedIndex=0;
    document.medidas.medidados.options.selectedIndex=0;
}
function calcular_valor() {
  if(document.medidas.convval.value!='' && document.medidas.medidauno.value!='0' && document.medidas.medidados.value!='0') {
    if(!validarNumeroDoble(document.medidas.convval)) {
      document.medidas.resultado.value='0';
    }
    else {
      var res=document.medidas.convval.value;
      res=res*document.medidas.medidauno.value;
      res=res/document.medidas.medidados.value;
      document.medidas.resultado.value=RoundTo2dp(res);
    }
  }
  else {
    document.medidas.resultado.value='0';
  }
}
function validarNumeroDoble(element)  {
  var punto=0;
  for(i=0;i<element.value.length;i++) {
    if(element.value.charAt(i)=='.') {
      if(punto==1)
        return false;
      else
        punto=punto+1;
    } else if(element.value.charAt(i)<'0' || element.value.charAt(i)>'9')
      return (false);
  }
  return (true);
}
function RoundTo2dp(X) {
  return Math.round(X * 10000) / 10000;
}

var Separator=";"
var Fields=7;
var days=new Array()
days[0]="Domingo";
days[1]="Lunes";
days[2]="Martes";
days[3]="Miercoles";
days[4]="Jueves";
days[5]="Viernes";
days[6]="Sabado";
var months=new Array()
months[0]="01";
months[1]="02";
months[2]="03";
months[3]="04";
months[4]="05";
months[5]="06";
months[6]="07";
months[7]="08";
months[8]="09";
months[9]="10";
months[10]="11";
months[11]="12";
var wts=new Array()
wts[1]="Abidjan;Costa de Marfil;+;0;;";
wts[2]="Abu Dhabi;Emiratos Arabes;+;4;;";
wts[3]="Adana;Turquia;+;2;;";
wts[4]="Addis Ababa;Etiopia;+;3;;";
wts[5]="Adelaide;Australia;+;10;30;$;";
wts[6]="Aden;Yemen;+;3;;";
wts[7]="Aklavik;Canada;-;9;;*;";
wts[8]="Alexandria;Egipto;+;2;;";
wts[9]="Algiers;Algeria;+;0;;";
wts[10]="Amsterdam;Holanda;+;1;;%;";
wts[11]="Anadyr;Rusia;+;13;;%;";
wts[12]="Anchorage;Estados Unidos;-;9;;*;";
wts[13]="Ankara;Turquia;+;2;;";
wts[14]="Antananarivo; Madagascar;+;3;;";
wts[15]="Antwerp;Belgica;+;0;;%;";
wts[16]="Asuncion;Paraguay;-;3;;";
wts[17]="Athens;Grecia;+;2;;%;";
wts[18]="Atlanta;Estados Unidos;-;5;;*;";
wts[19]="Auckland;Nueva Zelanda;+;12;;";
wts[20]="Aveiro;Portugal;+;0;;%;";
wts[21]="Baghdad;Iraq;+;3;;";
wts[22]="Bamako;Mali;+;0;;";
wts[23]="Bandar Seri Begawan;Brunei;+;8;;";
wts[24]="Bangkok;Tailandia;+;7;;";
wts[25]="Bangui;República Centroafricana;+;1;;";
wts[26]="Banjul;Gambia;+;1;;";
wts[27]="Barcelona;España;+;1;;%;";
wts[28]="Barranquilla;Colombia;-;5;;";
wts[29]="Beijing;China;+;8;;";
wts[30]="Beirut;Lebano;+;2;;";
wts[31]="Belgrade;Serbia;+;1;;";
wts[32]="Berlin;Alemania;+;1;;%;";
wts[33]="Blantyre;Malawi;+;2;;";
wts[34]="Bogota;Colombia;-;5;;";
wts[35]="Bologna;Italia;+;2;;";
wts[36]="Bombay - Mumbai;India;+;6;;";
wts[37]="Brasilia;Brazil;-;3;;";
wts[38]="Bratislava;Eslovaquia;+;1;;%;";
wts[39]="Brazzaville;Congo;+;0;;";
wts[40]="Bridgetown;Barbados;-;4;;";
wts[41]="Brisbane;Australia;+;10;;$;";
wts[42]="Brussels;Belgica;+;1;;%;";
wts[43]="Bucharest;Romania;+;2;;";
wts[44]="Budapest;Hungria;+;1;;%;";
wts[45]="Buenos Aires;Argentina;-;3;;";
wts[46]="Bujumbura;Burundi;+;2;;";
wts[47]="Cairo;Egipto;+;2;;";
wts[48]="Calcutta;India;+;6;;";
wts[49]="Calgary;Canada;-;7;;*;";
wts[50]="Cali;Colombia;+;0;;";
wts[51]="Ciudad de Belize;Belize;-;6;;";
wts[52]="Ciudad de Cabo;Sur Africa;+;1;;";
wts[53]="Ciudad de Mexico;Mexico;-;6;;*;";
wts[54]="Ciudad Guatemala;Guatemala;-;6;;";
wts[55]="Caracas;Venezuela;-;4;;";
wts[56]="Cebu;Filipinas;+;8;;";
wts[57]="Chicago;Estados Unidos;-;6;;*;";
wts[58]="Christchurch;Nueva Zelanda;+;12;;";
wts[59]="Colombo;Sri Lanka;+;5;30;";
wts[60]="Conakry;Guinea;+;0;;";
wts[61]="Copenhagen;Dinamarca;+;1;;%;";
wts[62]="Cotonou;Benin;+;0;;";
wts[63]="Dakar;Senegal;+;0;;";
wts[64]="Dallas;Estados Unidos;-;6;;*;";
wts[65]="Darwin;Australia;+;10;;$;";
wts[66]="Delhi;India;+;5;30;";
wts[67]="Detroit;Estados Unidos;-;5;;*;";
wts[68]="Dhaka;Bangladesh;+;6;;";
wts[69]="Dover;Estados Unidos;-;5;;*;";
wts[70]="Dubai;Emiratos Arabes;+;3;;";
wts[71]="Dublin;Irlanda;+;0;;%;";
wts[72]="Dusseldorf;Alemania;+;1;;%;";
wts[73]="Edmonton;Canada;-;7;;*;";
wts[74]="Fairbanks;Estados Unidos;-;9;;*;";
wts[75]="Florencia;Italia;+;2;;%;";
wts[76]="Fort de France;Martinica;-;4;;";
wts[77]="Frankfurt;Alemania;+;1;;%;";
wts[78]="Freetown;Sierra Leona;+;0;;";
wts[79]="Gaborone;Botswana;+;1;;";
wts[80]="Genova;Suiza;+;1;;%;";
wts[81]="Gibraltar;España;+;1;;%;";
wts[82]="Glasgow;Escocia;+;0;;%;";
wts[83]="Guayaquil;Ecuador;-;5;;";
wts[84]="Hamilton;Bermuda;-;4;;";
wts[85]="Harare;Zimbabwe;+;2;;";
wts[86]="Havana;Cuba;-;5;;*;";
wts[87]="Helsinki;Finlandia;+;2;;%;";
wts[88]="Hobart;Australia;+;10;;$;";
wts[89]="Hong Kong;Hong Kong;+;8;;";
wts[90]="Honolulu;Estados Unidos;-;10;;*;";
wts[91]="Indianapolis;Estados Unidos;-;5;;*;";
wts[92]="Ipswich;Australia;+;10;;$;";
wts[93]="Islamabad;Pakistan;+;5;;";
wts[94]="Istanbul;Turquia;+;2;;";
wts[95]="Jakarta;Indonesia;+;7;;";
wts[96]="Jerusalem;Israel;+;2;;";
wts[97]="Johannesburgo;Sur Africa;+;2;;";
wts[98]="Kabul;Afghanistan;+;5;;";
wts[99]="Kaduna;Nigeria;+;0;;";
wts[100]="Kahira;Egipto;+;2;;";
wts[101]="Kamchatka;Rusia;+;11;;%;";
wts[102]="Kano;Nigeria;+;1;;";
wts[103]="Karachi;Pakistan;+;5;;";
wts[104]="Kathmandu;Nepal;+;6;;";
wts[105]="Kiev;Ucrania;+;3;;";
wts[106]="Kigali;Rwanda;+;1;;";
wts[107]="Kingston;Jamaica;-;5;;";
wts[108]="Kinshasa;Zaire;+;1;;";
wts[109]="Kobe;Japon;+;9;;";
wts[110]="Kosice;Eslovaquia;+;1;;%;";
wts[111]="Kuala Lumpur;Malaysia;+;8;;";
wts[112]="Kuwait;Kuwait;+;3;;";
wts[113]="Kyoto;Japon;+;9;;";
wts[114]="La Paz;Bolivia;-;5;;";
wts[115]="Lagos;Nigeria;+;1;;";
wts[116]="Libreville;Gabon;+;0;;";
wts[117]="Lima;Peru;-;5;;";
wts[118]="Limon;Costa Rica;-;5;;";
wts[119]="Lisboa;Portugal;+;0;;%;";
wts[120]="Lome;Togo;+;0;;";
wts[121]="Londres;Inglaterra;+;0;;%;";
wts[122]="Los Angeles;Estados Unidos;-;8;;*;";
wts[123]="Lubumbashi;Zaire;+;1;;";
wts[124]="Luxemburgo;Luxemburgo;+;1;;%;";
wts[125]="Madrid;España;+;1;;%;";
wts[126]="Manama;Bahrain;+;3;;";
wts[127]="Manila;Filipinas;+;8;;";
wts[128]="Maracaibo;Venezuela;-;5;;";
wts[129]="Maseru;Lesotho;+;2;;";
wts[130]="Mayaguez;Puerto Rico;-;4;;";
wts[131]="Mbabane;Swazilandia;+;2;;";
wts[132]="Medan;Indonesia;+;8;;";
wts[133]="Medellin;Colombia;-;5;;";
wts[134]="Melbourne;Australia;+;10;;$;";
wts[135]="Miami;Estados Unidos;-;5;;*;";
wts[136]="Milan;Italia;+;1;;%;";
wts[137]="Mogadishu;Somalia;+;3;;";
wts[138]="Mombasa;Kenya;+;3;;";
wts[139]="Monrovia;Liberia;+;0;;";
wts[140]="Monte Carlo;Monaco;+;1;;%;";
wts[141]="Montevideo;Uruguay;-;3;;";
wts[142]="Montreal;Canada;-;5;;*;";
wts[143]="Morgantown;Estados Unidos;-;5;;*;";
wts[144]="Moscow;Rusia;+;3;;%;";
wts[145]="Mumbai - Bombay;India;+;5;30;";
wts[146]="Munich;Alemania;+;1;;%;";
wts[147]="Murmansk;Rusia;+;2;;%;";
wts[148]="Muscat;Oman;+;3;;";
wts[149]="N'Djamena;Chad;+;0;;";
wts[150]="Nagasaki;Japon;+;9;;";
wts[151]="Nagoya;Japon;+;9;;";
wts[152]="Nairobi;Kenia;+;3;;";
wts[153]="Naples;Italia;+;1;;%;";
wts[154]="Nassau;Bahamas - BS;-;5;;*;";
wts[155]="New Hebrides;Estados Unidos;+;11;;*;";
wts[156]="Newfoundland;Canada;-;3;;*;";
wts[157]="Niamey;Niger;+;0;;";
wts[158]="Nicosia;Chipre;+;2;;";
wts[159]="Niza;Francia;+;1;;%;";
wts[160]="Nome;Estados Unidos;-;9;;*;";
wts[161]="Nottingham;Inglaterra;+;0;;%;";
wts[162]="Nouakchott;Mauritania;+;0;;";
wts[163]="Nueva York;Estados Unidos;-;5;;*;";
wts[164]="Nuk;Groenlandia;-;3;30;*;";
wts[165]="Odessa;Ucrania;+;3;;";
wts[166]="Oran;Algeria;+;0;;";
wts[167]="Osaka;Japon;+;9;;";
wts[168]="Oslo;Noruega;+;1;;";
wts[169]="Ottawa;Canada;-;5;;*;";
wts[170]="Ouagadougou;Burkina Faso;+;0;;";
wts[171]="Oulu;Finlandia;+;2;;";
wts[172]="Oxford;Inglaterra;+;0;;%;";
wts[173]="Palma;España;+;1;;%;";
wts[174]="Panjim;India;+;5;30;";
wts[175]="Paramaribo;Surinam;-;4;;";
wts[176]="Paris;Francia;+;1;;%;";
wts[177]="Peking;China;+;8;;";
wts[178]="Perth;Australia;+;8;;$;";
wts[179]="Phoenix;Estados Unidos;-;7;;*;";
wts[180]="Ponce;Puerto Rico;-;4;;";
wts[181]="Port Louis;Mauricio;+;4;;";
wts[182]="Port Moresby;Papua Nueva Guinea;+;10;;";
wts[183]="Praga;Republica Checa;+;1;;%;";
wts[184]="Praia;Cabo Verde;-;2;;";
wts[185]="Puerto España;Trinidad and Tobago;-;4;;";
wts[186]="Puntarenas;Costa Rica;-;5;;";
wts[187]="Quebec;Canada;-;5;;*;";
wts[188]="Quito;Ecuador;-;5;;";
wts[189]="Rangoon;Myanmar;+;7;;";
wts[190]="Reykjavik;Islandia;+;0;;";
wts[191]="Riga;Latvia;+;4;;";
wts[192]="Rio de Janeiro;Brazil;-;3;;";
wts[193]="Riyadh;Arabia Saudi;+;3;;";
wts[194]="Rome;Italia;+;1;;%;";
wts[195]="Saigon;Vietnam;+;7;;";
wts[196]="San Petersburgo - Leningrado;Rusia;+;3;;%;";
wts[197]="Salt Lake City;Estados Unidos;-;7;;*;";
wts[198]="Salzburg;Austria;+;1;;%;";
wts[199]="San Francisco;Estados Unidos;-;8;;*;";
wts[200]="San Jose;Costa Rica;-;6;;";
wts[201]="San Juan;Puerto Rico;-;4;;";
wts[202]="Santa Cruz de Tenerife;España;+;0;;%;";
wts[203]="Santiago de Chile;Chile;-;3;;!;";
wts[204]="Santo Domingo;Republica Dominica;-;4;;";
wts[205]="Sao Paulo;Brazil;-;3;;";
wts[206]="Sapporo;Japon;+;9;;";
wts[207]="Sarajevo;Bosnia;+;1;;";
wts[208]="Seattle;Estados Unidos;-;8;;*;";
wts[209]="Seul;Corea del Sur;+;8;;";
wts[210]="Shanghai;China;+;8;;";
wts[211]="Singapore;Singapur;+;8;;";
wts[212]="Sofia;Bulgaria;+;2;;";
wts[213]="Stockholmo;Suecia;+;1;;%;";
wts[214]="Stuttgart;Alemania;+;1;;%;";
wts[215]="Surabaya;Indonesia;+;7;;";
wts[216]="Suva;Islas Fiji;+;12;;";
wts[217]="Sydney;Australia;+;11;;$;";
wts[218]="Taipei;Taiwan;+;8;;";
wts[219]="Tallinn;Estonia;+;2;;%;";
wts[220]="Tampere;Finlandia;+;2;;%;";
wts[221]="Tashkent;Uzbekistan;+;3;;";
wts[222]="Tegucigalpa;Honduras;-;6;;";
wts[223]="Tehran;Iran;+;4;;";
wts[224]="Tel Aviv;Israel;+;2;;";
wts[225]="Tokyo;Japon;+;9;;";
wts[226]="Toronto;Canada;-;5;;*;";
wts[227]="Tripoli;Libya;+;1;;";
wts[228]="Tunis;Tunisia;+;1;;";
wts[229]="Turin;Italia;+;1;;%;";
wts[230]="Ulanbatar;Mongolia;+;8;;";
wts[231]="Valletta;Malta;+;1;;";
wts[232]="Vancouver;Canada;-;8;;*;";
wts[233]="Vaticano;Vaticano;+;1;;%;";
wts[234]="Venice;Italia;+;1;;%;";
wts[235]="Victoria Falls;Zimbabwe;+;2;;";
wts[236]="Vienna;Austria;+;1;;%;";
wts[237]="Vientiane;Laos;+;7;;";
wts[238]="Vladimir;Rusia;+;3;;%;";
wts[239]="Vladivostok;Rusia;+;10;;%;";
wts[240]="Varsovia;Poland;+;1;;%;";
wts[241]="Washington DC;Estados Unidos;-;5;;*;";
wts[242]="Wellington;Nueva Zelanda;+;12;;";
wts[243]="Winnipeg;Canada;-;6;;*;";
wts[244]="Yalta;Ucrania;+;3;;";
wts[245]="Zagreb;Croacia;+;1;;";
wts[246]="Zaragoza;España;+;1;;%;";
wts[247]="Zurich;Suiza;+;1;;";
var ST=null;
var constanta=3600000;
var GMTClockID=null;
var GMTClockRunning=false;
var TSCClockID=null;
var TSCClockRunning=false;
var GMT="";

function GMTClock() {
  var a3;
  var a1 = new Date();
  if(offset == "+")
  {
    a3 = new Date(a1.getTime() - addhm);
  }
  else
  {
    a3 = new Date(a1.getTime() + addhm);
  }

  GMT=a3;

  var z=a1.getFullYear();
  z=""+z;
  var hs=a1.getHours();
  (hs<10) ? hs="0"+hs : hs
  var ms=a1.getMinutes();
  (ms<10) ? ms="0"+ms : ms
  var ss=a1.getSeconds();
  (ss<10) ? ss="0"+ss : ss

  GMTS = days[a3.getDay()]
        + " - "
        + a3.getDate()
        + "/"
        + months[a3.getMonth()]
        + "/"
        + a3.getFullYear()
        + " - "
        + hs
        + ":"
        + ms
        + ":"
        + ss;
  document.getElementById("digits1").value = GMTS;
  stopGMTClock();
  GMTClockID = setTimeout("GMTClock()", 1000);
  GMTClockRunning = true;
}

function where1(si)
{
  offset=GetField(wts[si],3);
  addh=GetField(wts[si],4);
  if(GetField(wts[si],5) != "")
  {
    addm=(GetField(wts[si],5)/60);
  }
  else
  {
    addm=0;
  }
  addhm=(constanta*addh)+(constanta*addm);
  stopTSCClock();
  document.getElementById("digits2").value="";
  GMTClock();
}

function TSCClock()
{
  var a11=new Date(GMT);
  var a33;
  if(offset1 == "+")
  {
    a33 = new Date(a11.getTime() + addhm1);
  }
  else
  {
    a33 = new Date(a11.getTime() - addhm1);
  }

  var z=a33.getFullYear();
  z=""+z;
  var hs=a33.getHours();
  (hs<10) ? hs="0"+hs : hs
  var ms=a33.getMinutes();
  (ms<10) ? ms="0"+ms : ms
  var ss=a33.getSeconds();
  (ss<10) ? ss="0"+ss : ss

;  TSCS = days[a33.getDay()]
        + " - "
        + a33.getDate()
        + "/"
        + months[a33.getMonth()]
        + "/"
        + a33.getFullYear()
        + " - "
        + hs
        + ":"
        + ms
        + ":"
        + ss;

  document.getElementById("digits2").value = TSCS;
  stopTSCClock();
  TSCClockID = setTimeout("TSCClock()", 1000);
  TSCClockRunning = true;
}

function where2(si)
{
  if(si !=0 )
  {
    offset1=GetField(wts[si],3);
    addh1=GetField(wts[si],4);
    if(GetField(wts[si],5) != "")
    {
      addm1=(GetField(wts[si],5)/60);
    }
    else
    {
      addm1=0;
    }
    addhm1=(constanta*addh1)+(constanta*addm1);
    establecerFechas(si);
    TSCClock();
  }
  else
  {
    stopTSCClock();
    document.getElementById("digits2").value="";
    document.getElementById("c2").options[0].selected=true;
  }
}

function stopGMTClock()
{
  if(GMTClockRunning)
    clearTimeout(GMTClockID);

;  GMTClockRunning=false;
}

function stopTSCClock()
{
  if (TSCClockRunning)
      clearTimeout(TSCClockID);

  TSCClockRunning=false;
}

function GetField(Entry,number)
{
  var Out="";
  var FirstChar;
  var LastChar;
  FirstChar=0;
  LastChar=Entry.indexOf(Separator);
  if(number==1)
  {
    Out+=Entry.substring(FirstChar,LastChar);
    return Out;
  }
  if(number==Fields)
  {
    Out+=Entry.substring(Entry.lastIndexOf(Separator)+1,Entry.length);
    return Out;
  }
  for(var i=2;i<=number;i++)
  {
     FirstChar=LastChar+1;
     LastChar=Entry.indexOf(Separator, FirstChar);
  }
  Out+=Entry.substring(FirstChar,LastChar);
  return Out;
}

function writecities(str,n)
{
  if(n=="c2")
  {
    document.writeln('<SELECT class="Celdas" id="c2" NAME="c2" onChange="where2(selectedIndex)">');
  }
  document.writeln("<OPTION VALUE='0'>"+str);
  for(var s=1;s<wts.length;s++)
  {
    document.write("<OPTION VALUE='"+s+"'>"+GetField(wts[s],1)+" / "+GetField(wts[s],2));
  }
  document.writeln("</SELECT>");
}

function establecerFechas(index)
{
	/*
	http://www.timeanddate.com/news/time/us-daylight-saving-extended.html
	2008	9 de mar	2 de nov	34 weeks
	2009	8 de mar	1 de nov	34 weeks
	2010	14 de mar	7 de nov	34 weeks
	*/
	
  var UsaDateIni=new Date(2008,2,9);
  var UsaDateFin=new Date(2008,10,2);  
  /*
  *http://www.timeanddate.com/news/time/europe-dst-ends-2008.html
  The European Union’s (EU) daylight saving schedule runs from the last Sunday in March through the last Sunday in October. An EU directive states that the last Sundays in March and October would be the dates definitively adopted for the daylight saving schedule among EU countries.
  */
  var EUDateIni=new Date(2008,2,26);
  var EUDateFin=new Date(200,9,27);
  
  /*
  * The state’s daylight saving schedule will begin at 2am on the last Sunday in October (October 26) in 2008, when the clocks move one hour forward to Australian Western Daylight Time (AWDT). The clocks will then revert from 3am to 2am, bringing it back to Australian Western Standard Time (AWST) on the last Sunday in March (March 29) in 2009. The previous state government planned for a referendum after this trial, where people will vote either for or against daylight saving time. The referendum was scheduled for a date between May 10 and September 13 in 2009.
  */
  var AUSDateIni=new Date(2008,9,26);
  var AUSDateFin=new Date(2009,2,29);
  /*
  * http://www.timeanddate.com/news/time/chile-extends-daylight-saving-time.html
  2008–2009	domingo, 12 de octubre de 2008	domingo, 15 de marzo de 2009	22 weeks
  2009–2010	domingo, 11 de octubre de 2009	domingo, 14 de marzo de 2010	22 weeks
  2010–2011	domingo, 10 de octubre de 2010	domingo, 13 de marzo de 2011	22 weeks
  */
  var ChiDateIni=new Date(2008,9,12);
  var ChiDateFin=new Date(2009,2,15);
  var dst=GetField(wts[index],6);
  if(dst=='*') {
	if(UsaDateIni<GMT && GMT<UsaDateFin){
	  if(offset1 == "+")
        addhm1=addhm1+constanta;
      else
        addhm1=addhm1-constanta;
	}
  }
  else if(dst=='%') {
    if(EUDateIni<GMT && GMT<EUDateFin){
	  if(offset1 == "+")
        addhm1=addhm1+constanta;
      else
        addhm1=addhm1-constanta;
	}
  }
  else if(dst=='$') {
    if(AUSDateIni<GMT && GMT<AUSDateFin){
	  if(offset1 == "+")
        addhm1=addhm1+constanta;
      else
        addhm1=addhm1-constanta;
	}
  }
  else if(dst=='!') {
    if(ChiDateIni<GMT && GMT<ChiDateFin){
	  if(offset1 == "+")
        addhm1=addhm1+constanta;
      else
        addhm1=addhm1-constanta;
	}
  }
}
function validarCorreo()
{
  if(document.forms[0].Nombres.value=='' || document.forms[0].Apellidos.value=='' || (document.forms[0].Email.value=='' && document.forms[0].Telefono.value==''))
  {
    alert('Por favor ingrese valores en los campos obligatorios');
	return false;
  }
  else if(document.forms[0].Email.value!='')
  {
    return echeck(document.forms[0].Email.value);
  }
  return true;
}
function echeck(str) {
	var at="@";
	var dot=".";
	var lat=str.indexOf(at);
	var lstr=str.length;
	var ldot=str.indexOf(dot);
	if (str.indexOf(at)==-1){
	   alert("El E-mail ingresado no es valido");
	   return false;
	}
	if (str.indexOf(at)==-1 || str.indexOf(at)==0 || str.indexOf(at)==lstr){
	   alert("El E-mail ingresado no es valido");
	   return false;		
	}
	if (str.indexOf(dot)==-1 || str.indexOf(dot)==0 || str.indexOf(dot)==lstr){
	   alert("El E-mail ingresado no es valido");
	   return false;
	}
    if (str.indexOf(at,(lat+1))!=-1){
	   alert("El E-mail ingresado no es valido");
	   return false;
    }
	if (str.substring(lat-1,lat)==dot || str.substring(lat+1,lat+2)==dot){
	   alert("El E-mail ingresado no es valido");
	   return false;
    }
	if (str.indexOf(dot,(lat+2))==-1){
	   alert("El E-mail ingresado no es valido");
	   return false;		 
	}
	if (str.indexOf(" ")!=-1){
	   alert("El E-mail ingresado no es valido");
	   return false;
	}
	return true;
}