// Reproductor adjunto por R4dioG.com v1.1
var _r4dioDefaultPlayer, _r4dioTheme, _r4dioAlign='right';
function createPl4yer() {
var p=isSet(arguments[0])?arguments[0]:_r4dioDefaultPlayer;
var dv=dCr();
if (dv) {
switch (_r4dioTheme) {
case 'min':
dv.innerHTML='';
break;
default:
dv.innerHTML='';
}
var ds=dv.style;
ds.position='absolute';
ds.width='99%';
switch (p) {
case 'closed':
createClosed();
break;
case 'wmp':
default:
dGet('pl4yerEmbed').innerHTML='';
_jxcookie('r4dioPlayerState','set','wmp',15);
}
}
}
function createClosed() {
var dv=dCr();
if (dv) {
dv.innerHTML='';
var ds=dv.style;
ds.position='absolute';
ds.width='99%';
_jxcookie('r4dioPlayerState','set','closed',1);
}
}
function loadCookies() {
if (dP=_jxcookie('r4dioPlayerState','read')) {
_r4dioDefaultPlayer=dP;
}
}
function dGet() {if(arguments[0]){return document.getElementById(arguments[0]);}else{return false;}}
function dCr(){var d=dGet('r4dioEmbed');if(!d){var dv=document.createElement('div');dv.setAttribute('id','r4dioEmbed');dv.setAttribute('align',_r4dioAlign);document.body.appendChild(dv);return dv;}else{return d;}}
function isSet($v) {return (typeof($v)!='undefined');}
var _jxcookie = function(_name,_method,_value,_expires) {
switch (_method) {
case "read":
var _namef=_name+"=";
var _cookies=document.cookie.split(';');
for(var _i=0;_i<_cookies.length;_i++) {
var _cookie=_cookies[_i];
while(_cookie.charAt(0)==' ')_cookie=_cookie.substring(1,_cookie.length);
if(_cookie.indexOf(_namef)==0)return _cookie.substring(_namef.length,_cookie.length);
}
return null;
break;
case "set":
if (_expires) {
var _date=new Date();
_date.setTime(_date.getTime()+(_expires*24*60*60*1000));
var _exp="; expires="+_date.toGMTString();} else {var _exp="";}
document.cookie=_name+"="+_value+_exp+"; path=/";
break;
case "delete":
_jxcookie(_name,'set','',-1);
break;
}
};
