// MCO - 11/01/2005.
// --------------------------------
function writegps(name) {
  var dc = document.cookie;
  var prefix = name + "=";
  var begin = dc.indexOf("; " + prefix);
  if (begin == -1) {
    begin = dc.indexOf(prefix);
    if (begin != 0) return null;
  } else
    begin += 2;
  var end = document.cookie.indexOf(";", begin);
  if (end == -1)
    end = dc.length;

  return document.write(unescape(dc.substring(begin + prefix.length, end)));
};

//-------------------------------------------------------------
// Graba indice del arreglo de tamanos de letras, en una cookie.
function setgps(nom, valor, cant_anosCookie) { // V1.8.
  cant_anosCookie = isNaN(cant_anosCookie) ? 0 : cant_anosCookie;

  if (cant_anosCookie > 0) {
    var expire = new Date ();
    expire.setTime (expire.getTime() + (31553280000 * cant_anosCookie)); // Expira en cant_anosCookie aņos aprox.
    expire = expire.toGMTString();
    document.cookie = nom + "=" + valor + "; path=/; expires=" + expire;
  }
  else {
    document.cookie = nom + "=" + valor + "; path=/;";
  };
}; // setgps.