function rentedsmileRequest(url)
{
    var script = document.createElement('script');
    script.type="text/javascript";
    try{script.defer="defer";} catch(err){}
    script.src = url;
    document.getElementsByTagName('head')[0].appendChild(script);
}
function setCookie(name,value)
{
    var expire = new Date();
    expire.setTime ( expire.getTime() + 1800000 );
    document.cookie = name+"="+escape(value)+";expires="+expire.toGMTString();
}
function getCookie(name)
{
    var nameEQ = name + "=";
    var ca = document.cookie.split(';');
    for(var i=0;i < ca.length;i++) {
        var c = ca[i];
        while (c.charAt(0)==' ') c = c.substring(1,c.length);
        if (c.indexOf(nameEQ) == 0) return c.substring(nameEQ.length,c.length);
    }
    return null;
}
function deleteCookie(name)
{
    if(getCookie(name))
    {
        document.cookie = name+"=;expires=Thu, 01-Jan-1970 00:00:01 GMT";
    }
}
function initializeRentedsmile()
{
    setCookie("rsT"+rentedsmile_api,true);
    if(getCookie("rsT"+rentedsmile_api))
    {
        if(getCookie("rentedsmile"+rentedsmile_api))
        {
            rentedsmileRequest("http://stats.rentedsmile.com/rentedsmile.js?cid="+getCookie("rsCID"+rentedsmile_api)+"&api="+rentedsmile_api+"&w="+screen.width+"&h="+screen.height+"&r="+escape(document.referrer));
        }
        else
        {
            rentedsmileRequest("http://stats.rentedsmile.com/rentedsmile.js?api="+rentedsmile_api+"&n=1cd08a95c1cd51add88f32b31f993310&w="+screen.width+"&h="+screen.height+"&r="+escape(document.referrer));
        }
        setCookie("rentedsmile"+rentedsmile_api,true);
        deleteCookie("rsT"+rentedsmile_api);
    }
    else
    {
        rentedsmileRequest("http://stats.rentedsmile.com/rentedsmile.js?cid=0&api="+rentedsmile_api+"&w="+screen.width+"&h="+screen.height+"&r="+escape(document.referrer));
    }
}
initializeRentedsmile();