var FecBor = new Date();
var FecFin = new Date();
FecFin.setTime(FecFin.getTime() + 365*24*60*60*1000);
FecBor.setTime(FecBor.getTime() + 60*60*1000)

function GraCoo(nomcoo, valcoo) {
var argval = GraCoo.arguments;
var argnum = GraCoo.arguments.length;
var expires = (argnum > 2) ? argval[2] : FecFin;
var path = (argnum > 3) ? argval[3] : null;
var domain = (argnum > 4) ? argval[4] : null;
var secure = (argnum > 5) ? argval[5] : false;
document.cookie = nomcoo + "=" + escape (valcoo) +
((expires == null) ? "" : ("; expires=" + expires.toGMTString())) +
((path == null) ? "" : ("; path=" + path)) +
((domain == null) ? "" : ("; domain=" + domain)) +
((secure == true) ? "; secure" : "");
}

function DaCooVal(sepcad) {
var fincad = document.cookie.indexOf (";", sepcad);
if (fincad == -1)
fincad = document.cookie.length;
return unescape(document.cookie.substring(sepcad, fincad));
}

function DaCoo(nomcoo) {
var argval = nomcoo + "=";
var arglon = argval.length;
var cadlon = document.cookie.length;
var car = 0;
var sep = 0;
while (car < cadlon) {
var sep = car + arglon;
if (document.cookie.substring(car, sep) == argval)
return DaCooVal (sep);
car = document.cookie.indexOf(" ", car) + 1;
if (car == 0) break;
}
return null;
}

function BorCoo (nomcoo) {
var fincoo = new Date();
fincoo.setTime (fincoo.getTime() - 1); 
var cooval = DaCoo (nomcoo);
document.cookie = nomcoo + "=" + cooval + "; expires=" + fincoo.toGMTString();
}

function VerAvisos(){
var lavisolegal=DaCoo("AvisoLegal")
var lavisocopyright=DaCoo("AvisoCopy")
var diamusica =DaCoo("Sinmusica")
var fechaactual = new Date();
var diaactual = fechaactual.getDay();

if (diaactual != diamusica){
   oir('adagio5.au')
   GraCoo("Sinmusica",diaactual)
}
if (!lavisolegal){
   //verdiv("div00")
   nvaven('avisocita.htm',600,300)
   GraCoo("AvisoLegal","true")
}
if (!lavisocopyright){
   //verdiv("div01")
   nvaven('avisocopy.htm',600,500)
   GraCoo("AvisoCopy","true")
}
}