function setupFadeLinks() {
  arrFadeLinks[0] = "http://eupi.osi.bg/cgi-bin/e-cms/vis/vis.pl?s=001&p=0069&n=002071&g=";
  arrFadeTitles[0] = "UK and Czechs refuse to join fiscal compact <br><br> Source: BBC";
  arrFadeLinks[1] = "http://eupi.osi.bg/cgi-bin/e-cms/vis/vis.pl?s=001&p=0069&n=002071&g=";
  arrFadeTitles[1] = "Softer draft of fiscal treaty opens door for UK <br><br> Source: EU Observer";
  arrFadeLinks[2] = "http://eupi.osi.bg/cgi-bin/e-cms/vis/vis.pl?s=001&p=0069&n=002071&g=";
  arrFadeTitles[2] = "Balkan workers shut out again by western EU brothers <br><br> Source: Budapest Times";
  arrFadeLinks[3] = "http://eupi.osi.bg/cgi-bin/e-cms/vis/vis.pl?s=001&p=0069&n=002071&g=";
  arrFadeTitles[3] = "The World from Berlin 'There Is No European Emergency Plan' <br><br> Source: Spiegel";
  arrFadeLinks[4] = "http://eupi.osi.bg/cgi-bin/e-cms/vis/vis.pl?s=001&p=0069&n=002071&g=";
  arrFadeTitles[4] = "Interview With Luxembourg's Foreign Minister 'Hungary Should Have Voting Rights Withdrawn' <br><br> Source: Spiegel";
  arrFadeLinks[5] = "http://eupi.osi.bg/cgi-bin/e-cms/vis/vis.pl?s=001&p=0069&n=002071&g=";
  arrFadeTitles[5] = "Davos: George Soros warns of EU's destruction <br><br> Source: BBC";
  arrFadeLinks[6] = "http://eupi.osi.bg/cgi-bin/e-cms/vis/vis.pl?s=001&p=0069&n=002071&g=";
  arrFadeTitles[6] = "Eastern EU states under pressure amid social unrest <br><br> Source: VOA";
}

var m_FadeOut = 200;
var m_FadeIn=23;
var m_Fade = 48;
var m_FadeStep = 10;
var m_FadeWait = 4600;
var m_bFadeOut = true;

var m_iFadeInterval;

window.onload = Fadewl;

var arrFadeLinks;
var arrFadeTitles;
var arrFadeCursor = 0;
var arrFadeMax;

function Fadewl() {
  m_iFadeInterval = setInterval(fade_ontimer, 10);
  arrFadeLinks = new Array();
  arrFadeTitles = new Array();
  setupFadeLinks();
  arrFadeMax = arrFadeLinks.length-1;
  setFadeLink();
}

function setFadeLink() {
  var ilink = document.getElementById("fade_link");
  ilink.innerHTML = arrFadeTitles[arrFadeCursor];
  ilink.href = arrFadeLinks[arrFadeCursor];
}

function fade_ontimer() {
  if (m_bFadeOut) {
    m_Fade+=m_FadeStep;
    if (m_Fade>m_FadeOut) {
      arrFadeCursor++;
      if (arrFadeCursor>arrFadeMax)
        arrFadeCursor=0;
      setFadeLink();
      m_bFadeOut = false;
    }
  } else {
    m_Fade-=m_FadeStep;
    if (m_Fade<m_FadeIn) {
      clearInterval(m_iFadeInterval);
      setTimeout(Faderesume, m_FadeWait);
      m_bFadeOut=true;
    }
  }
  var ilink = document.getElementById("fade_link");
  if ((m_Fade<m_FadeOut)&&(m_Fade>m_FadeIn))
    ilink.style.color = "#" + ToHex(m_Fade);
}

function Faderesume() {
  m_iFadeInterval = setInterval(fade_ontimer, 10);
}

function ToHex(strValue) {
  try {
    var result= (parseInt(strValue).toString(16));

    while (result.length !=2)
            result= ("0" +result);
    result = result + result + result;
    return result.toUpperCase();
  }
  catch(e)
  {
  }
}